¡Hola a todos!
Cita:
|
Empezado por Egroc
..."(MyCanvas as TCanvas).Pen" Las propiedades que llama son las mías pese al cast...
|
Tengo mis dudas al respecto.
Cita:
|
Empezado por Egroc
...¿Es entonces inviable lo que pretendo?...
|
Por la forma en que están estructuradas esas propiedades en la clase TCanvas de Delphi 7 (los campos donde se almacenan son privados, no tienen métodos de lectura virtuales, los métodos de escritura no sobrescriben el objeto interno, a diferencia de otras clases no hay un método virtual para crear o indicar la clase de sub objeto que queremos), es inviable sin recurrir al viejo y poco recomendable truco de
molde de acceso a campos privados.
Tal vez si nos detallas más tu caso podamos orientarte hacia una solución óptima.
Un abrazo al óleo.
Al González.
