Edit per SetWindowLong auf Zahleneingaben begrenzen geht net

[Pr0g]

Hallo,

ich habe auf einer Form ein TEdit und wollte dies per

Delphi-Quellcode:

  // EdtNeubesuchNach auf Zahlen beschränken
  SetWindowLong(
    EdtNeubesuchNach.Handle,
    GWL_STYLE,
    GetWindowLong(EdtNeubesuchNach.Handle, GWL_STYLE) or ES_NUMBER);

auf Zahleneingaben beschränken, doch es klappt in der Form nicht. Wenn ich eine anderen Form aus dem Programm, oder ein anderes Projekt nehmen, geht alles problemlos. Nur in der Form klappt der Code nicht. Woran kann das liegen?

MfG Pr0g