Como posso inserir uma linha de código no Delphi para simular um click em um botão?
Você pode adicionar o código no evento OnClick do botão mesmo, assim, ele só funcionará quando for clicado.
Porém, você pode chamar esse evento do botão de outra maneira além do clique.
Ex:
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('teste');
end;
Este é o código inteiro colocado no botão, o que se refere ao clique sobre o mesmo.
Agora para chamar este evento, basta em algum lugar do seu código, adicionar a linha:
Button1.Click;
Assim você não clicará no botão mas o evento referente a seu clique será executado mesmo assim
Use a função mouse_event() do Delphi que manipula o ponteiro do mouse.
exemplo:
{pressiona o botao esquerdo por 20 segundos e levanta}
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Sleep(20);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
Comments
Você pode adicionar o código no evento OnClick do botão mesmo, assim, ele só funcionará quando for clicado.
Porém, você pode chamar esse evento do botão de outra maneira além do clique.
Ex:
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('teste');
end;
Este é o código inteiro colocado no botão, o que se refere ao clique sobre o mesmo.
Agora para chamar este evento, basta em algum lugar do seu código, adicionar a linha:
Button1.Click;
Assim você não clicará no botão mas o evento referente a seu clique será executado mesmo assim
Use a função mouse_event() do Delphi que manipula o ponteiro do mouse.
exemplo:
{pressiona o botao esquerdo por 20 segundos e levanta}
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Sleep(20);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);