jezeli twój notatnik operuje na obiekcie np. Memo1 to
dla zdarzenia OnShortCut na Form1 ( czy jak go tam nazwałes zrób cos takiego :
void __fastcall TForm1::FormShortCut(TWMKey &Msg, bool &Handled)
{
if((Msg.CharCode == 'A') && (ActiveControl == Memo1) &&
(0x4000 & GetKeyState(VK_CONTROL)))
{
Memo1->SelectAll();
Handled = true;
}
}