Wie gesagt bereitet mir eine Inputbox in einer For-Schleife einen Fehler.
Wenn ich einfach ein Programm erstellen würde, was, wenn ich auf einen Button klicke folgende procedure macht:
Delphi-Quellcode:
for i:=0 to 3 do begin
eingabe:=inputbox('','','');
end;
dann funktioniert das ja, aber in meinem Falle nicht, da das ganze Programm ein bisschen komplexer ist.
Delphi-Quellcode:
for i:=0 to 3 do begin
if Gegenstand[i].hand=true then begin
eingabe:=inputbox('','','');
end;
end;
Bei folgendem Code hängt sich das Programm auf und makiert die Zeile if Gegenstand[k]... blau. Aber wieso?? Würde diese if-Bedingung nicht hier stehen, würde alles funktionieren.
Weiss nicht, ob das von bedeutung ist, aber Gegenstand ist folgendes:
Delphi-Quellcode:
TGegenstand = class(TImageSprite)
public
constructor Create(AParent: TSprite ); override;
end;
var Gegenstand:=array[0..3] of TGegenstand