|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
Чтобы проверить FileDate, файл открывать не надо.
Код:
if FileAge(Edit1.Text+'\'+searchResult.Name) > FileAge(Edit2.Text+'\'+searchResult.Name) then CopyFile(Pchar(Edit1.Text+'\'+searchResult.Name), Pchar(Edit2.Text+'\'+searchResult.Name),true) |