Hi,
Ich habe 18 Interger Werte jeweils den Variable P1...P18 und PZ1...PZ18 deklariert!
Nun soll eine For-Schleife mit ihrer Schleifenvariablen "a" den Wert von P[a] und PZ[a] auslesen!
Es kommt aber immer eine Fehlermeldung, ein Array-Typ erforderlich!
Hab aber noch kein valides Array hinbekommen!!
Könnt ihr mir helfen??
Danke im vorraus
The MOD Nachtrag zu: „Array mit Delphi“
For i:=1 to 18 do
begin
For y:=i to 18 do
begin
P1:=90 ;
P2:=190 ;
P3:=90 ;
P4:=190 ;
P5:=230 ;
P6:=150 ;
P7:=60 ;
P8:=60 ;
P9:=60 ;
P10:=60 ;
P11:=60 ;
P12:=30 ;
P13:=30 ;
P14:=90 ;
P15:=60 ;
p16:=60 ;
p17:=50 ;
p18:=60 ;
PZ1:=50 ;
PZ2:=50 ;
PZ3:=50 ;
PZ4:=60 ;
PZ5:=40 ;
PZ6:=40 ;
PZ7:=40 ;
PZ8:=50 ;
PZ9:=60 ;
PZ10:=70 ;
PZ11:=40 ;
PZ12:=150 ;
PZ13:=150 ;
PZ14:=150 ;
PZ15:=90 ;
PZ16:=190 ;
PZ17:=190 ;
PZ18:=150 ;
P:=P[i]+Pz[y];
If (y-i)=0 then
q:=p
else
q:=p/(y-i) ;
Also so funktioniert es nicht!!!!!
Es liegt am P[i] und P[y], laut Debuger!!
Ich habe die ganzen P,PZ als Integer und das q als Real deklariert und zusätzlich
das Array, so wie von dir beschrieben, lokal deklariert!!!
Funktioniert nicht!!!! Wenn ich die Integers stehen lasse kommt die Fehlermeldung "redefinierung" und wenn ich nur das array stehen habe kommt "undefiniert..."
Also was muss ich tun??
mfg the_mod
