Codeblock Onlinehilfe

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

| 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