|
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
Delphi 12 Athens
|
Re: Pfad ermitteln einer Datei
13. Jan 2004, 13:09
Und noch mal, mit Matzes Vorschlag drin:
Delphi-Quellcode:
Var i: Integer;
S: String;
S := 'Hallo.txt';
For i := 67 {C} to 90 {Z} do
If GetDriveType(PChar(Chr(i) + ':\')) = DRIVE_FIXED Then
FindAllFiles(Chr(i) + ':', S, True);
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
|