Hai,
das müsste eigentlich im OnKeyDown funktionieren:
Delphi-Quellcode:
procedure TForm1.DBEdit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_DELETE then
begin
Key := 0;
end;
end;
Stephan B.
"Lasst den Gänsen ihre Füßchen"