Richedit mit mehreren Registerkarten

[martin_]

Hallo,
mein Programm besteht aus MainMenü, TPageControl mit mehreren TabSheets und auf jedem TabSheet befindet sich ein TRichEdit.
Der Wechsel zwischen den Tabs funktioniert mit Ctrl+Tab.
Benutzer befindet sich innerhalb Tabsheet auf Richedit und betätigt Tab Taste --> soll gleiches Verhalten wie in Word.
Problem ist wenn Property WantTabs auf True ist verhält sich Richedit wir in Word, nur wie funktioniert dann der Wechsel zw. den Tabs?

[Bummi]

Kepreview auf dem Form einschalten

Delphi-Quellcode:

procedure TForm5.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
   if (ssCtrl in Shift) and (key=9) then
      begin
      SeitenwechselImPageControl.
      key :=0;
      end;

end;