Работа с таймером! И обратным отчетам и с Мемо1

[Fahman]

Всем хай) Доброго времени суток господа))
В общем у меня много вопросов накопилось по работе с таймером...

1) Например я спарсил время, а время записано в Мемо1 таким образом:

11:00
12:00
17:00

Вот есть label где отображается мое время, и есть время которое записано в Мемо1

Теперь как мне сделать так чтобы когда мое время и время которое записано в мемо1 выполнилась функция? Или например когда моя программа свернутая чтоб она сама разворачивалась)

2) например создал программу при первом открытии у меня начал идти отчет таймера с 24:00:00 (ч,м,с)
Я по сидел в программе и закрыл ее и у меня прошло время например 1 час, получается надо час отнять и сохранить куда нить да по надежней чтоб после перезпгрузки компа и открытии заново этой же программы у меня уже шел отчет с 23:00:00 и так далее....

3)
Например тот же самый способ как и в первом примере, то время которое я спарсил и время мое которое отображается с label если они сходятся то выполняется действие, но мне надо наоборот чтоб за 5 минут например выполнилась одно действие...
Дайте пару примеров, или где по читать подобное ?

[ClMlD]

1) Например я спарсил время, а время записано в Мемо1 таким образом:

11:00
12:00
17:00

Вот есть label где отображается мое время, и есть время которое записано в Мемо1

Теперь как мне сделать так чтобы когда мое время и время которое записано в мемо1 выполнилась функция? Или например когда моя программа свернутая чтоб она сама разворачивалась)

Создайте переменные например HAlarm,MAlarm,SAlarm:Integer;
С помощью Copy вырежьте из Memo значение и присвойте их нужной переменной. Так как вы используете Timer то прямо там сделайте проверку if then else и если значение будет равно то уже выполняйте действия

2) например создал программу при первом открытии у меня начал идти отчет таймера с 24:00:00 (ч,м,с)
Я по сидел в программе и закрыл ее и у меня прошло время например 1 час, получается надо час отнять и сохранить куда нить да по надежней чтоб после перезпгрузки компа и открытии заново этой же программы у меня уже шел отчет с 23:00:00 и так далее....

Если вы закроете программу , то ваша программа не как не узнает что прошел час , если только она будет использовать время Windows и при закрытии она сохраняла бы время закрытия в файл или реестр а при запуске она бы сщетала сколько прошло времени от закрытия до запуска

3)
Например тот же самый способ как и в первом примере, то время которое я спарсил и время мое которое отображается с label если они сходятся то выполняется действие, но мне надо наоборот чтоб за 5 минут например выполнилась одно действие...
Дайте пару примеров, или где по читать подобное ?

Так тут просто например ставьте чекбокс если он true тогда после того как присвоите переменной MAlarm значение напишите еще - 5 // MAlarm:=StrToInt( Copy(memo1.lines[0], 0, 2))-5;// если чекбокс false присваивайте значение без вычитания

[alextrof94]

Зачем вообще парсить и в мемо записывать, затем чтобы опять спарсить? В системе есть прекрасный тип TTime. Парсите, в него записывайте, если надо отобразить, уже отображайте из переменной этого типа...

[Аватар]

Сообщение от alextrof94

В системе есть прекрасный тип TTime. Парсите, в него записывайте, если надо отобразить, уже отображайте из переменной этого типа...

Это как? Можно подробнее? Насчет записывания в TTime

[ClMlD]

ИМХО TTime это функция которая возвращает текущие время , не разу не пробовал что либо ей присваивать =)

[alextrof94]

TTime - это тип. Функция - Time (для слепых, там одна буква в начале).

procedure TForm1.FormCreate(Sender: TObject);
var
  tm1:TTime;
begin
  tm1:=time; //типу времени присваиваю результат функции возврата времени
  Caption:=TimeToStr(tm1); //меняем капшен формы на время записанное в TTime переменную
//так же к типу TTime применимы почти все функции, которые применяются к TDateTime, оба типа истинно целочисленные, по этому и считаются как целочисленные. 
//Только TTime хранит в себе дату первого дня эры никса. "FormatDateTime('hh:ss', tm1);" выдаст часы и секунды, без минут.
end;

Специально для "умных" людей, которые простейшего загуглить не могут.
Я надеюсь вам про типы TDate и TDateTime рассказывать не надо?

[Fahman]

Ну есть такой экономический календарь и там показывает время во сколько выйдет новость, вот я и решил парсить в мемо1 потом сделать оповещяние так как бывает сижу за компом так что могу отвлечься и забыть вообще) а это не есть хорошо) спасибо за ответы буду тестировать)

[alextrof94]

Создай динамический массив из TTime. Если надо еще и даты указывать, то TDateTime.
Работай с этим массивом напрямую. А если надо выводить информацию, то выводи ее из массива куда угодно. Не будь тем, кого говнокодер (я) считает говнокодером.
Работая напрямую с массивом типа TTime (TDateTime), ты ускоришь работу программы (не надо будет парсить каждое значение), и облегчишь написание программы (не надо будет писать функцию парсинга).
Вывод на мемо будет простой:

Memo1.clear;
for i:=0 to TimesCount do
 Memo1.Lines.Add(TimeToStr(TimeArray[i]));

[ClMlD]

Фу сколько пантов