Начало скрипта с таймером примерно таким должно быть)
const
name = '123456';
var
Timer01: TTimer;
TimerCyrcle: integer;
procedure Init;
begin
Timer01:=TTimer.Create(nil); //выделяем память и т.п.
Timer01.OnTimer:=@OnTimer01; //привязываем процедуру к событию
Timer01.enabled:=true; //начальное положение включен(true)/выключен(false)
Timer01.interval:=2000; //интервал(в миллисекундах) как часто таймер срабатывает
end;
procedure OnTimer01(Sender: TObject);
begin
а теперь разжуй для особых.возьми например любой скрипт и распиши что да как!!!
Регистрация: 14.06.2011
Сообщений: 13
Популярность: 14
Сказал(а) спасибо: 16
Re: Поработаем вместе?
