Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.08.27;
Скачать: CL | DM;

Вниз

Date change of File s   Найти похожие ветки 

 
ronyn   (2006-07-27 20:38) [0]

Сравниваю даты создания файлов вот так:
if fileexists(sn3+searchrec.Name) then   begin     //если файл существует то
                  sw:=(oldstartdir+searchrec.Name);                // вот тут надо пишет Делфи тип string и TSearchRec  привести
                  so:=(startdir+searchrec.Name);             // и тут тоже, хотя searchrec.NAME имеет тип TFileName
            if sw.Time>so.Time then begin deletefile(so);          //если дата создания первого позже даты создания второго
                                          copyfile(sw,so,1);          //то действия....
                                    end;

Собсно, какие ошибки? Как типы привести (TSearchRec и String)?
Есть лучший способ сравнить даты редактирования (создания) файлов?

                        Заранее благодарен.


 
Джо ©   (2006-07-28 04:59) [1]

> Собсно, какие ошибки?

Форматирование кода. От него голова болит.

П.С. Знаю, что придирка, но с оглядкой на "Протчее".


 
Думкин ©   (2006-07-28 05:25) [2]

sw & so  - типа тоже строки или весьма крутые объекты со свойством присваивать при присвоении строки весь объект со всеми настроенными свойствами?


 
lexer ©   (2006-07-28 10:16) [3]

sw, so: string;

if FileExists(sn3 + searchrec.Name) then
begin
 sw:=(oldstartdir + searchrec.Name);              
 so:=(startdir + searchrec.Name);
 if FileAge(sw) > FileAge(so) then
   CopyFile(PAnsiChar(sw), PAnsiChar(so), 0);
end;


 
ronyn   (2006-07-29 00:49) [4]

Спасибо!



Страницы: 1 вся ветка

Текущий архив: 2006.08.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.039 c
2-1155149113
ArtemESC
2006-08-09 22:45
2006.08.27
Наследование...


15-1153980738
IceBeerg
2006-07-27 10:12
2006.08.27
Где XP хранит список часто используемых программ?


15-1153830461
SergejV
2006-07-25 16:27
2006.08.27
Компонент блокнота с нумерацией строк


15-1154418847
vidiv
2006-08-01 11:54
2006.08.27
Как восстановить администратора?


1-1152901145
Vetas
2006-07-14 22:19
2006.08.27
как отловить закрытие приложения из DLL