Delphi-Quellcode:
begin
if Form2.ListBox1.ItemIndex >= 0 then
SetLength(MeinArray, lIndex + 1);
MeinArray[lIndex].RealFileName := Form2.OpenDialog1.FileName;
MeinArray[lIndex].DisplayName := Form4.Edit1.Text;
lIndex := Form2.ListBox1.ItemIndex;
Form2.ListBox1.Items.Add(MeinArray[lIndex].DisplayName);
end;
[...]
hab es so mal angepasst...hoffe das stimmt jetzt so für euch.
Der Fehler bei der Bereichsprüfung ist immernoch präsent.
Sry wenn ich euch nicht direkt folgen kann oder etwas direkt nicht verstehe, ich mach das nicht jeden tag und es ist schon spät
