Показать сообщение отдельно

  #2  
Старый 28.05.2010, 01:16
090808
Познающий
Регистрация: 15.03.2009
Сообщений: 87
Провел на форуме:
893829

Репутация: 34
Отправить сообщение для 090808 с помощью ICQ
По умолчанию

Цитата:
Сообщение от heretic1990  
неет, надо определить сколько раз сработал таймер. например я включил таймер, в нём код программы, каждый раз время выполнения её разное. если использовать цикл, то можно былобы не париться и использовать переменная:=переменная+1; но с таймером такое не прокатывает.
короче надо узнать сколько раз сработал код программы в таймере.
Код:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Timer1.tag:=Timer1.tag+1;
Form1.caption:=IntToStr(Timer1.tag);
end;
 
Ответить с цитированием