Hey Leute
und zwar schmiert mir mein programm immer ab, allerdings ist es kein fehler, sonder irgendeine zugrifsverletzung.
Delphi-Quellcode:
type
TForm1 = class(TForm)
Panel1: TPanel;
ListBox1: TListBox;
Button1: TButton;
ListBox2: TListBox;
Button2: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
feld : array of integer;
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var i, y : integer;
x : string;
begin
y:=0;
for i:=1 to 30 do begin
x:=IntToStr(random(100)+1);
listbox1.Items.Add(x);
[B]feld[y]:=StrToInt(x);[/B]
y:=y+1;
end;
end;
end.
die zeigt er mir beim fett gedruckten an.
bitte um hilfe.