Para saber se ALT+S foi pressionado, por exemplo, utilize o código:
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Char(Key)='S') and (ssAlt in Shift) then
ShowMessage ('ALT + S');
end;
Não deve-se utilizar a unit QT em aplicações VCL... a
Você está usando CLX ou VCL?
Daniel Polistchuck
Consulting Services Manager
Borland Software Corporation
Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947
[EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/
A Borland Software Corporation é líder global em soluções independentes
2 matches
Mail list logo