(Moderator)
Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
Delphi 2006 Professional
|
Re: Dynamisches Array verursacht brutalen Fehler.
29. Jul 2005, 17:01
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
Temp1 := Length(MyArray) + 1;
Setlength(MyArray, Temp1);
MyArray[Temp1 - 1].a := Temp1;
label1.Caption := IntToStr(Temp1);
end;
Jens Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
|