hallo marabu,
vielen dank für deine hilfe, das war ein guter tipp, funktioniert auch soweit ganz gut, mit einer ausnahme: wenn ich kein vollständiges datum eingebe (z.b. "15.__.__) und dann die tab-taste drücke bekomme ich wieder denselben fehler, die ereignisse key-up, key-down und key-press scheinen allesamt nicht auf den key=vk_tab zu reagieren. weiß vielleicht jemand woran das liegt bzw. warum das so ist? und welche lösung gibts dafür?
gruß
pauletta82
Zitat von
marabu:
Hallo Pauletta,
dein Problem löse ich mit einer Ereignisbehandlung für OnKeyDown():
Delphi-Quellcode:
procedure TForm2.DateMaskKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
with Sender as TMaskEdit do
if Key = VK_DELETE then
begin
Text := StringOfChar(' ', Length(Text));
Key := 0;
end;
end;
Eventuell möchtest du das noch etwas ausfeilen.
Freundliche Grüße