Forum: Netzwerke
Delphi
by Master_Jochen,
4. Sep 2009
So ein problem weniger vieleicht hilft diese lösung ja auch jemand anderem weiter
procedure TForm1.ListDirectory(path:string);
var
SR: TSearchRec;
i:integer;
begin
i:=length(path);
if(path<>'\')then path:=path + '\';
Forum: Netzwerke
Delphi
by Master_Jochen,
4. Sep 2009
Hey dakne mjustin,
Ich werde mir das gleich mal ansehen wenn ich ne funktion extrahiert habe um alle ordner anzuzeigen werde ich dir auch hier posten....
PS: Denn was ich hasse sind threads die enden mit "Habe ne andere lösung gefunden"... und diese dann aber nicht gepostet wird :firejump:
Forum: Netzwerke
Delphi
by Master_Jochen,
3. Sep 2009
Mhh ja die anleitung sieht echt klasse aus bin leider nie darauf gestoßen :wall:
aber ich bin mit meinem project doch schon etwas weiter mitlerweile sprich chat funktioniert und ich kann command senden und der server führt sie aus
Für das ordner problem muss ich vieleicht nen neuen treat erstellen ....
wie gesagt ich kenne funktionen die du meinst aber ich muss ja auch die leeren ordner...