Kak Astanavt Rabotu Script
PRivet
kak mojna ostanavit rabotu script, kak u delphi Ctrl + F2,
Script
Begin
AdoQuery1:=TAdoQuery.Create(self);
for i:=1 to 10000 do
begin
application.proccessmessage;
for y:=1 to 190000 do
Begin
application.proccessmessage;
for k:=1 to 20000 do
Begin
application.proccessmessage;
end;
end;
end;
AdoQuery1.Free;
end.
u mne ect na main form button Run Script i tagji stop scritp,
kogda run script najat script rabotayt hachu kogda najimat stop hchu ostanavit script kak eto mojna,
kak mojna ostanavit rabotu script, kak u delphi Ctrl + F2,
Script
Begin
AdoQuery1:=TAdoQuery.Create(self);
for i:=1 to 10000 do
begin
application.proccessmessage;
for y:=1 to 190000 do
Begin
application.proccessmessage;
for k:=1 to 20000 do
Begin
application.proccessmessage;
end;
end;
end;
AdoQuery1.Free;
end.
u mne ect na main form button Run Script i tagji stop scritp,
kogda run script najat script rabotayt hachu kogda najimat stop hchu ostanavit script kak eto mojna,