Ich habs!
Ich hab mir mal gedacht, schaust Dir mal genauer an, was Du in der ShowProz. überhaupt machst.
Am anfang rufe ich folgende Prozuder auf:
Delphi-Quellcode:
procedure TMainFormMC2004.LVFktFuellen;
//ListView KK Funktionen mit Daten aus dem Loks-Record füllen
var
i: integer;
begin
ListViewKKFkt.Clear;
for i := 0 to MC2004.MenueInit.FktAnzahl -1 do
begin
ListViewKKFkt.Items.Add;
with ListViewKKFkt.Items.Item[ListViewKKFkt.Items.Count -1] do
begin
Caption := IntToStr(MC2004.MenueInit.FktStamm[i].FktID);
SubItems.Add(MC2004.MenueInit.FktStamm[i].FktName);
SubItems.Add(IntToStr(MC2004.MenueInit.FktStamm[i].FktAdresse));
SubItems.Add(IntToStr(i));
end;
end;
Check;
end;
Ich füge den Inhalt des Arrays in die LV ein.
Hab mal die Proz. ausgeklammert und der Fehler ist weg.
Ach, ich bin so glücklich.
Die frage ist nun, wie umgehe ich das?
Ich brauch ja die Prozeduren da drin. Irgendwo verständlich da noch nichts im Array drin ist. Wenn ich vorher was in den Arrays lade und dann die TS umschalte ist das Problem nicht. Da auch Inhalt in den Arrays drin ist.
Hmm...
*grübel*
Grüsse, Daniel
