Как изменить дату и время файла

Советы » Файлы » Как изменить дату и время файла

procedure

ChangefileStamp(filename: TFileName; newtime: TDateTime); var

vhnd: Integer; begin

vhnd := FileOpen(filename, fmOpenReadWrite); FileSetDate(vhnd, Datetimetofiledate(newtime)); FileClose(vhnd); end

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com