//--------------------------------------------------------------------------- void __fastcall TNakladnaForm::FormKeyPress(TObject *Sender, char &Key) { switch(Key) { case VK_RETURN: ButtonInsertClick(*Sender); break; case VK_INSERT: ButtonInsertClick(*Sender); break; } }
void __fastcall TPrihodForm::EditDateKeyPress(TObject *Sender, char &Key) { switch(Key) { case VK_RETURN: ButtonInsertClick(*Sender); break; case VK_INSERT: ButtonInsertClick(*Sender); break; } }