Problem mit TMaskEdit Feld und Datum

[pauletta82]

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