FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
#1
|
|||
|
|||
Componente
Hola a todos:
Resulta que estoy creando un componente similar a un combo, es un editor con un boton adentro. Es un TGraphicControl y ya esta dibujado , el problema es que me gustaria saber si alguien sabe como hacer para que el click del mouse responda solo en determinada area del componente, mas precisamente sobre el area del boton, ya que presiono donde presiono el boton se "hunde". Probe con GetCursorPos, realizando calculos con la posicion del cursor, defini una region y probe con la funcion ptInRegion (que se supone deberia funcionar puesto que Marco Cantu la utiliza y segun el funciona) y no hay caso. Gracias de antemano |
#2
|
||||
|
||||
¿Por qué usas GetCursorPos? Si estás trabajando con el clic del ratón, lo lógico es que redefinas el método MouseDown (o MoseUp) y éste ya te pasa las coordenadas. Por otra parte imagino que te bastará con PtInRect en lugar de PtInRegion. Al no tener que definir una región, sino sólo un rectángulo, es más difícil que haya algún error.
// Saludos |
#3
|
|||
|
|||
Andaaaaaaaaaaaaaaaaa....
jejejejeje
Mil gracias master, me salvaste la vida. Lo hice asi : En el create Boton:=Rect(Width-Height,2,Width-1,Height-1); Y en el MouseDown If (Assigned(KeyDown)) Then Begin Punto.X:=Msg.XPos; Punto.Y:=Msg.YPos; If PtInRect(Boton,Punto) Then Begin ... End; End; Espero les sirva para algo |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Componente VCL a OCX | Pook | OOP | 4 | 27-04-2006 10:27:24 |
Componente | chalys | Varios | 1 | 20-10-2005 08:11:47 |
Apuntar una propiedad de un componente a otra de otro componente | Majo | Varios | 10 | 24-03-2004 19:46:39 |
Componente!! | merlin | Varios | 0 | 24-12-2003 10:59:42 |
componente bd 32 | rrojano | Conexión con bases de datos | 0 | 20-06-2003 18:24:08 |
|