OnMouseLeave für die TPaintbox?

[dr. love]

is gar nicht soo schwer...

1. zum start des Programms:

aktuelle Mausposition ermitteln und daraus bestimmen, ob die maus in der paintbox liegt (über Mouse.Position.x, Mouse.Position.y, PaintBox1.Left, PaintBox1.Top, PaintBox1.Width, PaintBox1.Heigth kann man das bestimmen und dann in den Wahrheitswert INPAINTBOX1: boolean schreiben)

2. modifiziere das Ereignis ONMouseMove deines Formulars folgendermaßen:

mach das gleiche wie unter 1., schreibe das ergebnis (also ob die maus in der paintbox liegt) aber in eine andere variable, z.B. INPAINTBOX2: boolean;

3. Vergleiche INPAINTBOX1 und INPAINTBOX2

wenn INPAINTBOX1=true und INPAINTBOX2=false
dann ...(hier folgen deine anweisungen für das ereignis OnPaintBoxMouseLeave)

jetzt noch den Wert von PAINTBOX2 in PAINTBOX2 schreiben und fertig

4. fast vergessen: das ereignis ONMouseMove des Formulars musst du auch noch dem Ereignis OnMouseMove der PaintBox1 zuordnen.

wenn du einen expliziten Quelltext brauchst sag nochma bescheid... muss ich ein paar Formulierungen nachschaun