Moin!
Ich habe diesen Process:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| procedure tform1.ausprobieren;
var box:tlistbox;x,y,z:integer;
begin
for y:=1 to 5 do
begin
for x:=1 to anzpausen do
begin
if aryaufsichten[aryversuch[x,y],x,y]>0 then
begin
box:=findcomponent('listbox'+inttostr(4+y)) as tlistbox;
box.Items.add(listbox1.items[aryversuch[x,y]-1]);
dec(aryaufsichten[aryversuch[x,y],x,y]);
end;
usw... |
Wenn ich jetzt das Programm starte, kommt die Fehlermeldung : Fehler beim project1.exe ist eine exception der klasse outofrecources aufgetreten. Meldung:"Zeile kann nicht eingefügt werden".Prozess wurde angehalten blabla...
Dabei ist die Zeile 12 Markiert. Der Fehler ist aber bestimmt in Zeile 11 oder?
Was ist das Problem?
PS:Der Wert in aryversuch ist maximal um einen größer als listbox1.items.count und NICHT negativ.
mfg
Knust
Moderiert von 
Narses: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Do 31.01.2008 um 00:32
.
