TabSheets mit ShortCuts wechseln

[Shaman]

Hallo zusammen

Ich habe einen Nachfahren von TPageControl erstellt, um ein paar zusätzliche Funktionen zu implementieren. So möchte ich die TabSheets mit Alt + PageUp/Down durchblättern können. Wie mache ich das, wenn ein Control auf einem TabSheet den Fokus hat? Brauche also so etwas wie KeyPreview aus der Sicht von TPageControl.

Gruss
Shaman

[toms]

Hi,

Hast du schon hier nachgeschaut?
http://groups.google.ch/groups?hl=de...Cut&btnG=Suche

[Shaman]

Danke, hat aber nichts gebracht :(

[Stevie]

Ich bin mir nicht ganz sicher, aber bekommt dein TabSheet nicht zuerst die Tastatureingabe und leitet sie an das fokussierte Control weiter? Hast du schonmal versucht, die entsprechende Message im TabSheet zu überschreiben?

[Shaman]

Ich hab KeyDown von TPageControl überschrieben, aber es wird nur ausgeführt, wenn das TabSheet selbst den Fokus hat und nicht etwa ein Edit darauf.

[toms]

Zitat:

Zitat von Shaman

So möchte ich die TabSheets mit Alt + PageUp/Down durchblättern können.

Koenntest ja auch Strg + Tab nehmen. Das funktioniert naemlich schon.

[Shaman]

Hey, danke! :thumb:

Hab ich nicht gewusst. Jetzt konnte ich schauen, wo das geregelt ist, nämlich in CMDialogKey.
Nun kann ich das beliebig anpassen.

Gruss
Shaman

[toms]

Zitat:

Zitat von Shaman

Hey, danke! :thumb:

Hab ich nicht gewusst. Jetzt konnte ich schauen, wo das geregelt ist, nämlich in CMDialogKey.
Nun kann ich das beliebig anpassen.

Gruss
Shaman

Habe dir ja einen Link gepostet. Dort stand auch, dass man das in CMDialogKey machen koenne.