Сделал, возможно немного не то но суть будет ясна
Ставьте в свойстве таймера нужное время...
Код:
procedure TForm1.Timer1Timer(Sender: TObject);
var
i: integer;
begin
i:=0;
while i<100 do
begin
Edit1.Text:=Memo1.Lines[i];
i:=i+1;
end;
end;
end.
Цитата:
|
Сообщение от scroyler
Здравствуйте.
И что бы каждые 30сек нажималась определенная кнопка (битбтн) пока включен таймер
|
А зачем чтобы нажималась определенная кнопка??? Может стоит поставить еще один таймер и пусть просто выполняется процедура этой кнопки через определенное время???
АААААА не то сделал, ща переделаю.....