Seite 1 von 1
Datei überprüfen
Verfasst: 18.02.2005 02:20
von sobi
Hallo,
gibt es eine Möglichkeit zu überprüfen, ob eine Datei bereits existiert?
LG
Simon
Re: Datei überprüfen
Verfasst: 18.02.2005 02:24
von traumatic
FileSize()
Re: Datei überprüfen
Verfasst: 18.02.2005 02:34
von sobi
traumatic hat geschrieben:FileSize()
Das ist zwar ein guter Anfang, habe jedoch folgendes gefunden:
Result.w = FileExists(String) in der Helpfuncs Lib.
So, jetzt bin ich glücklicher!
Simon
Re: Datei überprüfen
Verfasst: 18.02.2005 08:04
von DarkDragon
sobi hat geschrieben:traumatic hat geschrieben:FileSize()
Das ist zwar ein guter Anfang, habe jedoch folgendes gefunden:
Result.w = FileExists(String) in der Helpfuncs Lib.
So, jetzt bin ich glücklicher!
Simon
Wo ist da der Unterschied? Mit FileSize bekommt man sogar noch mehr zurück.
Verfasst: 18.02.2005 13:16
von bluejoke
FileExists() ist soweit ich weiß nur ein anderer Name für FileSize(), nur dass FileExists u.U. nur 1 bei werten > 0 und 0 bei werten < 0 zurückliefert
Verfasst: 18.02.2005 16:18
von Ynnus
Alternativ auch "xxx = Readfile()". "xxx" muss dann eben etwas anderes als 0 sein. Ist aber vielleicht langsamer als die andere Routine, müsste man mal testen.
Verfasst: 18.02.2005 17:06
von nco2k
ist FileExists() nicht aus einer userlib ?! das heisst wenn sich etwas in PB ändert kann es sein dass diese lib dann nicht mehr funktioniert.
FileSize() ist aufjedenfall der korrekte weg, alles andere wäre meiner meinung nach ziemlich sinnlos.
c ya,
nco2k
Verfasst: 18.02.2005 17:31
von ts-soft
Für solche Sachen hab ich mir immer kleine wiederverwendbare Proceduren geschrieben. Im laufe der Zeit werden es immer mehr und man spart viel Zeit beim Programmieren. UserLibs sollte man nur in besonderen Fällen benutzen. Hab mal die von Dir gesuchte Funktion erstellt.
Code: Alles auswählen
Procedure.l FileExists(Filename.s)
If FileSize(Filename) => 0 ; 0 Byte Dateien können auch existieren
ProcedureReturn #True
EndIf
ProcedureReturn #False
EndProcedure
; Beispiel:
If FileExists("C:\AUTOEXEC.BAT")
MessageRequester("FileExists-Ergebnis", "Datei existiert", #MB_ICONINFORMATION)
Else
MessageRequester("FileExists-Ergebnis", "Datei existiert nicht", #MB_ICONERROR)
EndIf
Kannste frei verwenden oder auch sein lassen

Verfasst: 19.03.2005 20:33
von pogi02
und was bringt diese Funktion???
Nur damit der name von FileSize auf FileExist gewandelt wird?
Da nehm ich doch gleich Filsize oder? ist doch schneller und nicht so kompliziert
Verfasst: 19.03.2005 21:15
von ts-soft
>> und was bringt diese Funktion???
Bei häufigerem Gebrauch spart man sich das nachsehen in der Hilfe, welche Werte von FileSize zurückgegeben werden. Wenn im gesamten Programm diese Überprüfung nur einmal nötig ist, kann man sich die Funktion natürlich sparen.
>> Da nehm ich doch gleich Filsize oder? ist doch schneller
Richtig, in der Zeit könnte man viele wichtige Dinge erledigen
>> und nicht so kompliziert
Vielleicht wäre ein Click-To-Exe Baukasten einfacher für Dich ?