Namen der ausgewählten dateien auslesen (FileListBox)

bruder jonas · Beiträge: 76

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 · Beiträge: 81

Ganz einfach:

markieren

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;

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme