Re: ДАТА и ВРЕМЯ...
Дмитрий огромное Вам СПАСИБО!!!
Друзья кому интересно скрипт РАБОЧИЙ...
правда кое что поправил...поменял местами...Дмитрий надеюсь правильно!!!procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean); begin iTimer := 90; //задаём время в сек... Timer.Enabled := True; // Start timer Timer.OnTimer := @OnTimer; // event procedure end; procedure Form1_OnShow (Sender: string; Action: string); begin Timer := TTimer.Create(nil); // создать таймер Timer.Interval := 1000; end;
ЕЩЁ РАЗ СПАСИБО!!!
можете выложить свой проект для примера?