Entwickler-Ecke

Dateizugriff - Namen der ausgewählten dateien auslesen (FileListBox)


bruder jonas - Mo 22.07.02 22:26
Titel: Namen der ausgewählten dateien auslesen (FileListBox)
hallo,

wenn ich 3 dateien einer FilelistBox auswähle möchte ich diese 3 dateinamen in einer messagebox anzeigen,.

wie schaffe ich es, das alle 3 namen ausgelesen werden?

danke


b.brecht - Mo 22.07.02 22:40

Ganz einfach:

Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
procedure readout;
var a:integer; dateien:string;
begin
dateien:='';
FOR a:=0 to FileListBox1.Items.Count - 1 do
       if FileListBox1.Items[a].selected=true then  
                 dateien:=dateien+FileListBox1.Items[a]+' | ';
Showmessage(dateien);
end;