nochmal OnMouseMove

hermes

Hallo,
ich habe 20 Panels untereinander und ändere OnMouseMove die Farbe des Panels,
wird das Panel verlassen setze ich über den gespeicherten Zeiger die ursprüngliche Farbe zurück.

TPanel* old_panel = 0;
void __fastcall TForm1::Panel1MouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
      if(old_panel != 0)
      {
          old_panel->Color = clMenu;
      }
     ((TPanel*)Sender)->Color = cl3DLight;
     old_panel = ((TPanel*)Sender);
}

Ich habe nun noch folgendes Problem,

PANEL1
                                                  CheckBoxes
|---------------------------------------------------------------------|
| Label1                                     X     X     X     X      |        
|---------------------------------------------------------------------|

wenn ich mit dem Mousecursor auf dem Panel bin funktioniert das ganze,
befinde ich mich allerdings auf dem Label oder einer CheckBox läuft
das ganze natürlich nicht mehr richtig.
Gibt es da eine irgendeine Möglichkeit.

Johann

Jansen

Einmal reicht.
Bitte die Faustregel beachten: ein Thema pro Thread, ein Thread pro Thema. Danke!