Pling bei Focuswechsel

[NoGAD]

Huhu. Klappt leider nicht.

Delphi-Quellcode:

if Key = VK_RETURN then
  begin
      PostMessage(GetParentForm(Self).Handle, wm_NextDlgCtl, Ord((ssShift in Shift)), 0);
      Key := 0;
  end;

Es plingt immer noch