Autor Beitrag
nightmare
Hält's aus hier
Beiträge: 12



BeitragVerfasst: Sa 15.11.03 20:41 
Hi erstma .. !
Ich hab ein Problem...

Ich das mein Programm die Größe ALLER Datein von einem FTP-Server
( Die Verbindung hab ich mit Indys FTP... ) zusammenrechnet...
So eine Art Space-Scanner...

Mein Problem: Ich bekomm keine Schleife hin, die auch ALLE Unterordner durchsucht.... Kann mir einer Helfen ???

thx und cya !
masterworld
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 20



BeitragVerfasst: So 16.11.03 06:02 
Killmag10 schrieb....

Allso die dateien und ordner findest du mit:

FindFirst , FindNext und Findclose

Beispiel:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
var 
  SearchRec: TSearchRec; 

procedure TForm1.SearchClick(Sender: TObject); 
begin 
  FindFirst('c:\Programme\delphi4\bin\*.*', faAnyFile, SearchRec); 
  Label1.Caption := SearchRec.Name + ' ist ' + IntToStr(SearchRec.Size) + ' Byte groß.'; 
end; 

procedure TForm1.AgainClick(Sender: TObject); 
begin 
  if (FindNext(SearchRec) = 0) then 
        Label1.Caption := SearchRec.Name + ' ist ' + IntToStr(SearchRec.Size) + ' Byte groß.' 
  else 

    FindClose(SearchRec); 
end;

Das sollte dir vielleicht helfen.

Moderiert von user profile iconTino: Delphi-Tags hinzugefügt.
BungeeBug
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 901



BeitragVerfasst: So 16.11.03 09:07 
Hi,

da gibbet nen Befehl für, das können die meisten FTP Server selbst und ohne Hilfe des Cleinten. Lies einfach mal das RFC für FTP ... ich hab den Befehl nicht mehr im Kopf.
nightmare Threadstarter
Hält's aus hier
Beiträge: 12



BeitragVerfasst: So 16.11.03 13:35 
Hi, danke für die Antworten !
@masterworld: Das mit dem FindFirst und FindNext geht nur auf Datenträgern... beim FTP geht das nich meine ich irgendwo gelesen zu haben.. ( wär aber nen Versuch wert ! )
Zitat:
BungeeBug: Lies einfach mal das RFC für FTP

Was is RFC ?

Edit: FTP-Protokolls (File Transfer Protocol) (RFC 959) <-- das steht in der Hilfe.. aber was das bedeutet steht nich dabei :D

Edit2:*g* ich hab da noch das gefunden: www.rfc-editor.org/rfc/rfc959.txt ... werd ma durch suchen ob da was zu insgesammter größe oder voller Dateiliste oder sowas steht...

Edit3: Hab das mit dem FindFirst und so getestet... klappt nich... schade
trotzdem danke für die Antwort !!

Ich hätte noch ne andere Idee..
Ich setz die ma um, wenns klappt post ich die..
(wenn jemand den Befehl für den Server kennt was BungeeBug da gesagt hat schicks mir bitte... weil der Algo wirklich nich einfach wird...
Da Dateien und Ordner vermischt sind und nur 1 Erkennungsmerkmal haben...
masterworld
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 20



BeitragVerfasst: Mo 17.11.03 05:19 
Mal ne Frage. Gibt es auf einem FTP eine Begrenzung der Unterordner, z.B. 8?
Licki
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 132

Knoppix, Win 95, Win 2000, Win NT, Win 98, Win XP
Delphi 3
BeitragVerfasst: Mo 17.11.03 09:55 
Nein, warum sollte es? Ein FTP-Server ist ein Rechner wie jeder anderer...
nightmare Threadstarter
Hält's aus hier
Beiträge: 12



BeitragVerfasst: Mo 17.11.03 15:13 
Das macht das ganze ja schwer :D
masterworld
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 20



BeitragVerfasst: Di 18.11.03 00:15 
Ja wenn man sich da festlegen könnte, wär das machbar, aber so :roll: