colocar evento onkeypress no oncreate

Question

Galera como eu fa�o tipo pra quando a aplica��o carregar se a tecla C estiver pressionada ele executar uma a��o ?valeu...

Fer_nanda · Answer

Acho q � isso q est� precisando. No KeyDown do form coloque

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key = 67 then showmessage(�fa�a alguma coisa�);
end;

At�

R�mulo Barros · Answer

Siga os passo que fer_nanda falou e, no evento OnShow do Form, force o pressionamento de uma tecla....

Koringa · Answer

[quote:f97d6aeeec=�Undeclared Identifier�]Siga os passo que fer_nanda falou e, no evento OnShow do Form, force o pressionamento de uma tecla.[/quote:f97d6aeeec]

� mas eu gostaria que tipo caso o cra clique no .exe par abrir a aplica��o com a tecla P pressionada ela abre outro form entende ? mas nao deu certo nao. ( Tipo ele n�o precisa pedir para pressionar ou voce esta pressionando e ele reconhece ou nao )

Se souberem agradeco

valeu pelas dicas

Xanatos · Answer

Bom com letra eu nao sei... mas com control, alt, shift voce pode conseguir com essa funcao! voce nao vai colocar ela em um form mas sim na unit principal!!!

if KeyboardStateToShiftState = [ssShift] then
    MessageBox(0, �Shift Pressionado.�, �Agenda�, MB_ICONSTOP);

As letras � complicado pois se teu executavel estiver e um lugar com outros arquivos ...quando voce digital o P o windows automaticamente procura por um arquivo que comece com P e vai ser chato isso!!! :idea: [/code]

F�rum colocar evento onkeypress no oncreate #238325