Incompatible types: 'TMouseButton' and 'TGLMouseButton'

[Pyr0cracker]

Hi,
ich habe ein kleines Problem und hänge da gedanklich gerade fest...

Ich habe folgende Procedur:

Delphi-Quellcode:

procedure TSpiel.GLSceneViewer_SpielMouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  //Konsole.Visible:= not Konsole.visible;
   case iModus of
       0:begin
        if Button = mbLeft then {linke maustaste}
        begin
[...]

Button bezieht sich auf TMouseButton in Controls.pas.
mbLeft ist leider erneut in GLCrossPlatform.pas unter TGLMouseButton (GLScene) definiert.

Zitat:

[Error] formSpiel.pas(169): Incompatible types: 'TMouseButton' and 'TGLMouseButton'

Gibts da eine Möglichkeit zu definieren, dass mbLeft aus Controls 'benutzt' wird?

Gruß,
Dorian