/*
OnKeyPress example
This event handler from a cross-platform application displays a message dialog box specifying which key was pressed:
*/ 
void __fastcall TForm1::FormKeyPress(TObject *Sender, char &Key)
{
  char keyString[25];
  KeyString[0] = Key;
  strcpy(&keyString[1], " Was Pressed");
  MessageDlg(keyString, mtInformation, TMsgDlgButtons() << mbOk, 0);
} 
