[goodvin1709]

еще хочу спросить
вот код:
Оффтоп

Procedure UseScroll;
begin
keybd_event(VK_F1, MapVirtualKey(VK_F1, 0), 0, 0);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
T:=1;
timer2.Enabled:=true;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
 timer2.Enabled:=false;
end;

procedure TForm1.Timer2Timer(Sender: TObject);
begin
timer2.Enabled:=false;
if EnchantLevel<MaxEnchant then
begin
if T=1 then
begin
UseScroll;
T:=2;
timer2.Enabled:=true;
end;
if T=2 then
begin
SetCursorPos(point1.X,point1.Y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Mouse_Event(MOUSEEVENTF_LEFTUP,0,0,0,0);
T:=3;
timer2.Enabled:=true;
end;
if T=3 then
begin
SetCursorPos(point2.X,point2.Y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Mouse_Event(MOUSEEVENTF_LEFTUP,0,0,0,0);
T:=1;
timer2.Enabled:=true;
end;
end;
end;

Почему кликает по точке но и подтверждает точку вот только пропускает почему то

if T=2 then
begin
SetCursorPos(point1.X,point1.Y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Mouse_Event(MOUSEEVENTF_LEFTUP,0,0,0,0);
T:=3;
timer2.Enabled:=true;
end;

Тупо не выбирает пушку,аналог автокликера и пожалуйсто подскажите как отправлять в мне нужное свернутое окно все действия.