Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by himitsu,
23. Apr 2011
for i := 1 to 20 do
begin
Star := TStart.Create; // man könnte sich glatt fragen, wie du den mehrfachen Hinweis mehrer Leute überlesen konntest
Star.PosX := StrToInt(MemoLoadPos.Lines);
Star.PosY := StrToInt(MemoLoadPos.Lines);
end;
bzw., da nur die ersten 6 befüllt werden
for i := 1 to 20 do
Star := TStart.Create;
for i := 1 to 6 do
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by himitsu,
23. Apr 2011
Das BEGIN natürlich noch vor das Create (und natürlich mit der richtigen Variante des Create)
for i := 1 to 20 do
begin
Star := TStar.Create;
Star.PosX := ...
Ansonsten kann es nicht schaden, wenn du in den Projektoptionen mal die Überlauf- und die Bereichsprüfung aktivierst.