Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 10-11-2005
alextmb alextmb is offline
Miembro
 
Registrado: nov 2005
Posts: 14
Poder: 0
alextmb Va por buen camino
Ayuda con apuntadores o punteros

hola soy un novato en delphi que tiene una duda ojala me puedan ayudar gracias
tengo 100 paneles en un apuntador que esta declarado APanel:array [1..100] of TAPanel y quiero saber como le hago para poder crear un label en cada uno de ellos, lo intente de esta forma lj1[ac]:=TLabel.Create(APanel[ac]); y no quizo ejecutar mi codigo

Última edición por alextmb fecha: 10-11-2005 a las 22:27:47.
Responder Con Cita
  #2  
Antiguo 10-11-2005
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Código Delphi [-]
lj1[ac] := TLabel.Create(APanel[ac]);
lj1[ac].Parent := APanel[ac];

// Saludos
Responder Con Cita
  #3  
Antiguo 10-11-2005
alextmb alextmb is offline
Miembro
 
Registrado: nov 2005
Posts: 14
Poder: 0
alextmb Va por buen camino
Gracias

de antemano gracias pero no logro funcionar, lo que quiero es crear un label sobre un apuntador de un panel y al poner //// lj1[ac]:=TLabel.Create(APanel[ac]); //// me marca un error incompatibles types 'TComponet' and 'TAPanel'
TAPanel esta declarado asi
Type
TAPanel = ^TPanel
public
APanel:array[1..100] of TAPanel

por su ayuda gracias

Última edición por alextmb fecha: 10-11-2005 a las 22:26:30.
Responder Con Cita
  #4  
Antiguo 10-11-2005
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 28
jachguate Va por buen camino
Aparentemente TAPanel no deriva de TComponent, por tanto, no puede ser el owner de los labels.
__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
  #5  
Antiguo 10-11-2005
alextmb alextmb is offline
Miembro
 
Registrado: nov 2005
Posts: 14
Poder: 0
alextmb Va por buen camino
gracias, una ultima duda logree supuestamente crea un label dentro de un panel para hacer una prueba pero no aparece a que crees que se deba? mi codigo es este[quote]
public
a:TLabel;

Procedure TForm.Button1(Sender:Objet)
begin
a:=TLabel.Create(Panel1);
end;
Responder Con Cita
  #6  
Antiguo 10-11-2005
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Es lo mismo, mientras el Label no tenga padre no hay manera que lo veas.

¿De dónde viene esta declaración?

Código Delphi [-]
type
  TAPanel = ^TPanel

Si tu la hiciste, quítale el gorrito, y si es de algun código ajeno, que dios te agarre confesado.

Es raro tener que usar apuntadores a objetos ya que un objeto es de por sí un apuntador.

Si no hay nada que puedas cambiar pues creo que bastaría entonces agregar el gorrito en la asignación:

Código Delphi [-]
lj1[ac].Parent := APanel[ac]^;
Responder Con Cita
  #7  
Antiguo 10-11-2005
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 28
jachguate Va por buen camino
Cita:
Empezado por roman
¿De dónde viene esta declaración?

Código Delphi [-]
type
  TAPanel = ^TPanel
No me había percatado de esto (la falta de etiquetas tiene algo que ver.. )

TAPanel, es entonces, en efecto, un apuntador a un apuntador, por tanto, habrá que hacer lo ya dicho por mi amigo roman.

Hasta luego

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
  #8  
Antiguo 10-11-2005
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Cita:
Empezado por jachguate
habrá que hacer lo ya dicho por mi amigo roman.
¿Confesarse?



// Saludos
Responder Con Cita
  #9  
Antiguo 10-11-2005
alextmb alextmb is offline
Miembro
 
Registrado: nov 2005
Posts: 14
Poder: 0
alextmb Va por buen camino
Muchas Gracias
Responder Con Cita
  #10  
Antiguo 10-11-2005
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 28
jachguate Va por buen camino
Cita:
Empezado por roman
¿Confesarse?



// Saludos
confieso que es una posibilidad latente..
__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 01:31:37.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi