Fórum ListBox1KeyDown() como que chamo esse evento? #153204

09/04/2003

0

Delphi

tenho que chamar esse evento dentro de um botão. Como poderia fazer isso?

Quero que quando pressionar um botão, faça a chamada dele.

Tenho que passar parâmetros?

Muito obrigado e Bom dia!!!

:arrow: :) Ajudante do Papai Noel :)


Anonymous

Anonymous

Responder

Posts

09/04/2003

E_gama 

procedure TForm1.Button1Click(Sender: TObject);
var Key: Word;
begin
  Key := 0;
  ListBox1KeyDown(Sender, Key, [])
end;


Onde [b:2eda344816]Key[/b:2eda344816] é o código do tecla que você estaria simulando o pressionamento, e o parametro entre conchetes, é o estado das teclas Ctrl, Alt, Shift e botões do mouse. Pode ter o sseguintes valores:

[b:2eda344816]ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble[/b:2eda344816]

Se quiser simular, por exemplo que além do pressionamento da tecla, ainda considere que as teclas Ctrl e Alt estejam pressionadas, faça como o código abaixo:

procedure TForm1.Button1Click(Sender: TObject);
var Key: Word;
begin
  Key := 0;
  ListBox1KeyDown(Sender, Key, [ssCtrl, ssAlt])
end;



Responder

Gostei + 0

09/04/2003

Anonymous

Obrigado rapaz muito útil sua explicação, acredito que agora minha idéia dará certo.

Um abraço. :lol:


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar