FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Problema de objeto que hereda de Timage
Hola, estoy creando un programa que se encarga de interconexionar bloques. Estoy intentando que en un Tpanel pueda tener los bloques que serviran para su interconexion (en el se podran mover libremente los bloques). Cada bloque tiene una imagen.
Tengo dos codigos hechos, el primero que funciona bien (con la imagen como objeto dentro de una clase) y otro que no funciona (no aparece la imagen en el Tpanel; esta hecha heredando de timage) Funciona: la imagen se ve sobre el Tpanel
No funciona: la imagen no se ve sobre el Tpanel
Si pudierais ayudarme os estaria muy agradecido. |
#2
|
||||
|
||||
Mi recomendación en este caso y en otros similares, donde las porciones de código son grandes, es que subas un proyecto de ejemplo.
Seguro que en ese caso hay quien se anime a probarlo y te pueda ayudar de forma más eficaz. De esta forma, vuiendo el código, es difícil averiguar o intuir dónde puede estar el problema.
__________________
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 el consejo, haber si puedo subir el proyecto ahora despues.
Un saludo. |
#4
|
|||
|
|||
Que tal hermano, pues tuve el mismo problema, intenté heradar de TImage y no funcionó, así que tuve que hacer una clase que tiene dentro una imagen que después pintaré en pantalla, algo como lo que tienes al principio, te pongo el codigo y revisa si te sirve:
Clase: Código:
type TCelda2 = class(TObject) imagen:TImage; x,y,contenido:integer; conquistado:boolean; frescoComoLechuga:boolean; private public constructor Create(); end; Código:
constructor TCelda2.Create; begin imagen:=TImage.Create(Form1); imagen.Parent:=Form1; end; Código:
var aux:TCelda2 begin a:=TCelda2.Create; a.imagen.Top:=0; a.imagen.Left:=0; a.imagen.Width:=120; a.imagen.Height:=120; a.imagen.Picture.Bitmap.LoadFromResourceName(HInstance,'Bitmap_1'); |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Cargar imagen en Un TImage guardada en campo Blob o Objeto OLE en accsess | gulder | Varios | 1 | 28-11-2008 18:54:43 |
Problema con Timage | JerS | Varios | 12 | 26-06-2008 19:12:49 |
Responder a un click en un objeto (tImage) mostrado en un tStatusBar | sitrico | OOP | 4 | 16-06-2006 21:34:39 |
Clase que hereda de TForm | rocio84 | OOP | 3 | 29-10-2005 12:54:27 |
Problema con un TImage | Jan_polero | Gráficos | 1 | 29-11-2004 23:15:11 |
|