Вопрос по времени

← →
Ио (2006-02-20 10:51) [0]

Подскажите, как сотворить так, чтобы в строго определённое время (например в 6 00) нажималась кнопка на форме (допустим BUTTON1). Что надо добавить на форму и что писать в процедуре...
PS: только не посылайте в справку, там я ничего не нашёл...

← →
Плохиш © (2006-02-20 10:58) [1]

> только не посылайте в справку, там я ничего не нашёл...

И даже про TTimer тоже ничего?

← →
Ио (2006-02-20 11:01) [2]

TTimer видел... Только как сделать вышенаписанно я не понял...

← →
Плохиш © (2006-02-20 11:28) [3]

У TButton есть метод Click, то же описан в справке.

← →
HF-Trade © (2006-02-20 12:36) [4]

> Ио

Edit1.Text:=FormatDateTime("hh"+":"+"mm", Time);

Вставь в таймер...
мде...

← →
Алхимик © (2006-02-20 13:17) [5]

TimeX - время Х
FlagClicked - логическая переменаая, указывающая что кно

Timer1.Interval := <частота проверки в мсек.>;
Timer1.Enable := true;

Обработка события OnTimer:
begin
// если время нажимания кнопки пришло и кнопка ещё не нажималась
if (Time > TimeX) and (not FlagClicked) then begin
<нажимаем кнопку>
FlagClicked := true; // устанавливаем признак "кнопка нажата"
end;
end;

← →
Плохиш © (2006-02-20 13:34) [6]

> Алхимик © (20.02.06 13:17) [5]

Сброс FlagClicked дописать забыл ;-)

> if (Time > TimeX) and (not FlagClicked) then begin

ну если быть уж точным то это условие может сработать как в 6 так и в 7 все зависит от FlagClicked

Вопрос по времени Найти похожие ветки