FileListBox

[Klaus01]

Zitat von fuknersascha:

Also wenn ich auf der ersten Form die FileListBox durschlaufen lasse, läuft sie ohne Probleme durch und die Bilder werden nacheinander in das Image geladen.

Wenn ich jetzt auf die andere Form wechsel auf der die ander FilelistBox ist bekomme ich einen Fehler und zwar

Klasse EInOutError 'datei nicht gefunden'

Hallo Sascha,

vielleicht solltest Du, wenn du die Bilder oder Dokumente lädtst, den Pfad mit einbauen
wo die Bilder und Dokumente liegen.

Image1.Picture.LoadFromFile(FileListBox1.FileName); Wenn Du die Dokumente startest wird das current working directory auf das gelegt wo die Dokumente liegen.
Startest Du nun die Anzeige der Bilder, werden die Bilder bei den Dokumenten gesucht.

Image1.Picture.LoadFromFile(ExtractFilePath(ParamStr(0))+'Bilderverzeichnis\'+FileListBox1.FileName); und ähnlich auch bei den RTF dokumenten.

Und wenn Du die Bilder nicht zweimal laden willst, sollte auch das gehen:

Delphi-Quellcode:

if (bild = '.jpg') then 
  begin 
    Image1.Picture.RegisterFileFormat('jpg', 'Jpeg', TjpegImage); 
    Image1.Picture.LoadFromFile(FileListBox1.Filename); 
    Form3.Image1.Picture.Assign(Image1.Picture)
  end;

Grüße
Klaus