hast du schonmal versucht diesen Befehl an die übergeordneten Komponenten (an Parent bzw. die Form) zu senden?
PS:
Delphi-Quellcode:
. #13 : begin
Key := #0;
Parent.Perform(WM_NEXTDLGCTL, 0, 0);
end;
#8, '0'..'9', '.': ;
else Key := #0;
end;
inherited;
end;