Ich lös das Problem jetzt anders........ nämlich so.....
Delphi-Quellcode:
D := 'C:\Windows\*.*';
SendMessage(ListBox1.Handle,
LB_DIR, DDL_ARCHIVE + DDL_DIRECTORY + DDL_DRIVES + DDL_EXCLUSIVE +
DDL_HIDDEN + DDL_READONLY + DDL_READWRITE + DDL_SYSTEM, Integer(D));
For I := 0 To listbox1.Items.Count - 1 Do
Text := Text + '/' + listbox1.Items[I];
frmMain.Server.Socket.Connections[0]. SendText('300' + Text);
Und "auf der anderen Seite" teil ich das dann in verschiedene Komponenten auf und fertig ist die Illusion
Ricane