admszczep napisał(a):Chce w zdarzeniu Table beforeDelete przerwać kasowanie tylko jak ?
Zdarzenie
OnBeforeDelete nie odnosi siÄ™ do kombinacji klawiszy Ctrl+Del lecz do zdarzenia w tabeli przed skasowaniem rekordu. W tym zdarzeniu tego nie zablokujesz.
Ustaw formularzowi właściwość
KeyPreview na
true. Następnie utwórz dla formularza zdarzenie
OnKeyDown i wprowadź w nim taki kod:
void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
{
if(Shift.Contains( ssCtrl ) && Key == 46) Key = 27;
}
To powinno zablokować tą kombinację klawiszy w tym oknie, a nie tylko w tabeli. Co się jeszcze tyczy zdarzenia
OnBeforeDelete to jeżeli nic nie skasujesz w tabeli to i zdarzenie nie wystąpi.