20.04.2013, 08:45
|
|
LMD-DML
|
|
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
|
|
Цитата:
Сообщение от Sagat
...ка сделать чтобы соблюдалось условие.
|
Оно и соблюдается
Код:
...
if (FileDate > -1) and (FileDate1 > -1) and (FileDate > FileDate1) then
CopyFile(Pchar(Edit1.Text + '\'+SearchResult.Name),
Pchar(Edit2.Text + '\' + SearchResult.Name), true);
...
|