Einzelnen Beitrag anzeigen

Kostas

Registriert seit: 14. Mai 2003
Ort: Gerstrhofen
1.060 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

Mouse over auf selbstgezeichnetes Element auf dem canvas.

  Alt 26. Nov 2006, 15:55
Hallo Zusammen,

ich habe ein ActiveX-Control welches auf der gesamten Form ausgebreitet ist, und möchte
darauf Grafiken ablegen die ein OnMouseOver event liefern.
Das Problem ist, wenn ich versuche irgendein Delphi Control wie z.B.: ein Button, TImage
oder ein TShape darauf abzulegen, "fallen" diese duch das ActiveX-Control auf die Form.
Was jedoch geht ist, ich bekomme den hdc von diesem ActiveX-Control und kann dadurch
auf sein canvas Zeichnen und bmps ablegen.
Auf diesem ActiveX-Control werden mehrere hundert Grafiken gezeichnet und bmps abgelegt.

Aktuell habe ich das so gelöst, das ich bei jeder Mausbewegung das Array mit den Koordinaten
der einzelnen Grafiken und bmps durchgehe und per PtInRect prüfe ob die aktuelle Mausposition darüber ist.
Es funktioniert zwar, ist jedoch extrem stümperhaft.

Hat jemand eine Idee wie ich geschlossene Grafiken wie Rechtecke, Dreiecke, Kreise und bmps
auf den canvas platzieren kann die ein OnMouseOver event auslösen können?

Gruß Kostas
  Mit Zitat antworten Zitat