Hey Paul; are you actually getting it to work by putting VK_RETURN there? My
compiler screws its nose unless I use ascii.
Cheers,
Al+
> procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
>   Shift: TShiftState);
> begin
>      if (Key = VK_RETURN) and (GetKeyState(VK_CONTROL) and $80 <> 0) then
>      begin
>             // do stuff
>      end;
> end;

---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz

Reply via email to