Hallo an Alle!
Habe hier ein echt dickes Problem, also für mich. Ich fülle mit einem Opendialog einen Stringarray um diesen Später in eine
ActiveX-Komponente einzubinden. Den Stringarray setze ich mittels einer Variable, die ich mit opendialog1.files.count belege. Führe ich das Prog jetzt aus, öffne ich zuerst ca. 2000 Dateien, von denen ich aber nur den Pfad in den Stringarray einlese. Nach einer gewissen Ladezeit, bekomme ich dann eine Nchricht, das eine der Dateien nicht gefunden worden ist! Dann wird der Ladevorgang einfach abgebrochen. Nachdem ich zu Testzwecken meinen Array mit der tatsächlichen Menge der Bilder gesetzt hatte, bekam ich die
Exception Listenindex(1140) überschritten, obwohl der Array die Länge von 3000 hatte.
Der Code:
Delphi-Quellcode:
count:= opendialog1.files.count;
setlength(temp_bildarray,count);
for i:= 0 to count-1 do
begin
filename:=opendialog1.files.strings[i];
temp_bildarray:=filename;
end;
Kann opendialog nur maximal 1140 Dateien öffnen? Bei der Überprüfung hatte count nach dem Abbruch bei jedem Versuch 1140!
Ich bin mit meinem Latein am Ende.
gruß Brandtson