FreePascal.ru

Сравниваю дату и время текущие в лейбле и указанные в задании, но ничего не происходит

В общем процесс работы программы:
Пользователь создает задание в котором указывает следующие параметры:
- копировать или переносить
- директория откуда
- директория куда
- дата выполнения задания
- время выполнения задания

После чего, при нажатии на кнопку "создать задание", создается текстовый ...

А как у Вас с английским?

Не очень, но как переводится date и time я понимаю...
Не понимаю как мне реализовать процесс:
Программа смотрит в каталог, котором лежат текстовые файлы. Имя текстового файла содержит дату и время, когда надо выполнить задания, а параметры задания записаны в самих файлах ...

ssadragon писал(а):

levchukvv писал(а):GetLocalTime? Честно нет.

Ну да в принципе НО!
Самый простой вариант

Код: Выделить всё

Var
CurrDateTime: TDateTime;
CurrTime: TTime;
CurrDate: TDate;
...
Begin
CurrDateTime := Now;
CurrTime := Time;
CurrDate := Date;
End;

Так-с можно комментарии?

Vadim писал(а):levchukvv
Как получить текущие дату и время знаете?

GetLocalTime? Честно нет.

Либо вариант менее изящный - Вы оставляете свою программу запущенной и она морочит процессору голову, проверяя каждую минуту "сколько времени" и при совпадении текущего и указанного времени выполняет процедуру копирования.

Мне пока этого бы хватило, но я незнаю как реализовать

Преобразуйте дату в строку.

Помогло. А как мне теперь научить вот эту функцию:
function CopyDirectory( StrFrom, StrTo : string) : Boolean;
var
F : TShFileOpStruct;
begin
F.wFunc:=FO_COPY;
F.pFrom:=PChar(StrFrom + #0);
F.pTo:=PChar(StrTo+#0);
F.fFlags ...

FPC штатный прикол с непониманием кодировки адреса файла, если там русские буквы есть.

В последней версии lazarus с этим проблем не должно быть. вроде бы

Добавлено спустя 1 минуту 5 секунд:
Вот написал процедуру, при нажатии кнопки "Создать задание", выполняется это:

procedure TForm2&#46 ...

ssadragon Непонял, что именно этот код делает?

Хочу написать простенькую программу, с помощью которой можно было бы создавать задания, с указанием даты, времени и места куда и откуда копировать (или вырезать).
Пока накидал только формы.
Незнаю как именно реализовать, можно ли обойтись только этой программой или придется обращаться к штатным ...

Подскажите, я не совсем понял как работает эта функция?