FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
Sender as...
Hola amigos.
Soy un poco novato con delphi y con la POO y tengo un problema que he intentado solucionar por diferentes vías,aunque sin éxito.Les cuento. Tengo una clase heredada de TPanel a la que le he añadido algunos atributos.
Mi propósito es el poder arrastrar,ubicar y poder rotar objetos de esta clase por el form. Tengo también un objeto TImage el cual va insertado en mi objeto Tbarco1 y la manera que uso para poder mover el conjunto sobre el form es la siguiente:
Es en esta última TForm1.barcoDblClick(Sender: TObject); donde tengo el problema. Quiero poder acceder desde ella a los atributos de mi objeto Tbarco1,pero al intentarlo haciendo (Sender as Tbarco1).atributo... me da error de typecast en ejecución.Creo que más o menos entiendo el motivo,ya que el evento DblClick se produce sobre el TImage(he probado a asociar la rutina al objeto Tbarco1 en vez de al de tipo TImage,pero no se produce evento alguno al clikear sobre él). La verdad es que el diseño que he hecho de la clase Tbarco1 no me convence demasiado,aunque no doy para mucho más. Desde ya muchas gracias. Un saludo |
#2
|
||||
|
||||
En lugar de hacer el CAST sobre el Sender, pruebalo sobre su .Parent como has hecho anteriormente; Que si no me equivoco (por lo que he visto) será el TBarco.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#3
|
|||
|
|||
Gracias por responder Neftali.
Ya probé esa opción y si no reuerdo mal el .Parent es un TwinControl que tampoco se por donde cogerlo,ya que no parece poseer los atributos que me interesan. |
#4
|
||||
|
||||
Seguramente ese .Parent (TWinControl) es tu TBarco.
De todas formas, creo que deberías replantearte el diseño de TBarco, como tú bien dices y ver si te interesa derivarlo de un TImage directemente, o de un TPanel (en ese caso yo pondría el TImage -o TBitmap- como propiedad de TBarco).
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#5
|
|||
|
|||
Heyyyy!!
Nada como un buen casting bien hecho. Gracias Neftali,ya funciona,con un ligero cambio:
Con respecto al replanteamiento de la clase,pues ya estuve probando tal y como me comentas,colocando la imagen como atributo de la clase,pero al hacer el InsertControl no se lo traga. De momento seguiré trabajando con lo que tengo. Gracias de nuevo. Saludos |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Sender que no envia.... | Phacko | Varios | 5 | 30-03-2005 17:52:58 |
Programa Grafico | buitrago_listas | Varios | 4 | 10-03-2005 13:34:07 |
Formato numerico en controles y SENDER | Phacko | Conexión con bases de datos | 4 | 07-02-2005 18:40:54 |
Sobre la variable Sender | yusnerqui | OOP | 5 | 25-10-2004 16:12:24 |
El evento OnActivate | esquerda21 | Varios | 8 | 18-06-2003 18:03:35 |
|