Topic: Как создать скрипт нажатия на кнопку несколько раз подряд
Здравствуйте можно ли с помощью скрипта сделать так что бы кнопка нажималась столько раз сколько указано в TextBox?
Заранее спасибо
1 2019-11-27 10:05:14 (edited by RasNikGal 2019-11-27 10:05:58)
2 2019-11-27 12:15:33 (edited by sibprogsistem 2019-11-27 12:15:48)
Re: Как создать скрипт нажатия на кнопку несколько раз подряд
procedure Form1_Edit1_OnChange (Sender: TObject);
var i:integer;
begin
i:=0;
While i <> Form1.Edit1.Value do
begin
i:=i+1;
sleep(1000);
Application.ProcessMessages;
Form1.Button1.Click;
Form1.Label1.Caption:='кнопка нажата '+ IntToStr(i )+' раз';
end;
end;Re: Как создать скрипт нажатия на кнопку несколько раз подряд
Спасибо