CompareDate gibt immer 1 aus...

[Codix32]

Zitat von himitsu:

Und bezüglich des

Delphi-Quellcode:

    Except
     Zeitraum(now);
    end;

Einfach so was "Anderes" machen, ohne dem Bediener seinen Fehler zu nennen, ist nicht die feine englische Art.

Himitsu, was meinst Du mit "was Anderes"?

Zitat von himitsu:

Und zusätzlich ist diese Art der Fehlerbehandlung eh "ungünstig", dazumal es sowieso absichtlich ein TryStrToDate oder StrToDateDef gibt, was man besser statt einer Exception verwenden sollte.

Danke Himitsu, aber so gut bin ich nicht im Programmieren. Ich bewundere allerdings Deine Kenntnisse und habe großen Respekt. Und danke für den Tip. Allerdings hat Editkeydown genau das gemacht, was ich wollte.

Nochmals Allen vielen Dank