FileClose()

FileClose() – File Handle freigeben

Mit FileClose kann eine Datei anhand ihres Handles geschlossen werden. Sie erhalten das Handle beim Öffnen der Datei mit FileOpen().
Wurde mit FileOpen() ein gültiges Handle bezogen, dann MUSS die Datei nach der Bearbeitung über FileClose() geschlossen werden! => Deshalb immer StartSeq ... Always ... StopSeq verwenden!

Parameter	Beschreibung
aFileHandle:N	FileHandle

Rückgabewert

Keiner

Beispiel

CODE

| nHandle, dDatum, nDatum, nError |

nHandle := FileOpen('C:\TEMP\U_Zahlung.Pas', _OR(fo_ReadWrite, fo_Shared)),
if nHandle > -1 then
   startseq,
      dDatum := FileDateToDateTime(FileGetDate(nHandle)),
      WriteLn(dDatum),
      nDatum := DateTimeToFileDate(Date() + TimeEx()),
      WriteLn(nDatum),
      nError := FileSetDate(nHandle, nDatum),
      if nError <> 0 then
         WriteLn('Fehlercode ' + Str(nError)),
      else
         WriteLn('Neues Datei-Datum ' + DateTimeToStr(FileDateToDateTime(nDatum))),
      endif,
   always,
      FileClose(nHandle),
   stopseq,
endif,

Weitere Verknüpfungen

FileOpen()