Mouse Gesten

[Hoeen]

hi!

ich wollte mal ein wenig mit den Mouse Gesten vom Borland C++ Builder 5 arbeiten...

habe folgenden Code erstellt:

void __fastcall TFrMain::Image1MouseDown(TObject *Sender,

      TMouseButton Button, TShiftState Shift, int X, int Y)

{

  MouseDwn = true;

  MUSIK();

}



void __fastcall TFrMain::Image1MouseUp(TObject *Sender,

      TMouseButton Button, TShiftState Shift, int X, int Y)

{

  MouseDwn = false;

}



void TFrMain::MUSIK()

{

  do

  {

    Beep(MousePos,500);

  } while(MouseDwn);

}




void __fastcall TFrMain::Image1MouseMove(TObject *Sender,

      TShiftState Shift, int X, int Y)

{

  MousePos = X;

}

dummerweise geht er aus der Funktion MUSIK nie raus, ist quasi eine Endlosschleife. Wie kann ich es schaffen, dass er aus Musik rausgeht, wenn ich die linke Mousetaste loslasse???

Gruß

Hoeen

[Hoeen]

oh, sorry, zu schnell gepostet...

habe erst programmiert und dann gedacht

hat sich also erledigt...