Zitat von
DarkItachi:
..Ich will dabei aber Winsock
API benutzen und nicht irgendeine Komponente!...
... wie der Server .. Ordnerliste sendet und .. Client sie dann in einen ShellListView einfügt?
Am besten wäre ein kleiner Code für den Server!^^
Hallo DarkItachi, anbei Native Sample.
NetBookServer.dpr und NetBookClient.dpr
IpAdresse, Port, und die zu übertragenden Directory Listings, sind in untenstehenden Codeabschnitten änderbar.
Delphi-Quellcode:
//-- Kommandos der Clients auswerten
if sCommand = 'OrdnerlisteErstellen' then
DoSearch('C:\lazarus\test\*.*') else
if sCommand = 'FOO' then else
if sCommand = 'BAR' then else
_ms.Write(DEFAULT_RESPONSE, Length(DEFAULT_RESPONSE));
with SyncServerStartUpStruct do begin
Port := 8088; //-- Server Listening Port
ThreadsPerCPU := 1; //-- Threads pro CPU
OnData := OnDataProc; //-- Callback für Daten
OnError := OnErrorProc; //-- Callback bei Errors
end;
with SyncClientStruct do begin
Port := 8088;
Host := PChar('127.0.0.1');
ptrData := outBuffer;
cbSize := outSize;
end;
Die Daten nun einfach in eine TreeView Komponente einfügen.
Für einen Remote-Directory Browser ist eine ShelllistView nicht geeignet.
lg. Astat