Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 23-09-2019
josepicd josepicd is offline
Miembro
 
Registrado: jun 2015
Posts: 57
Poder: 10
josepicd Va por buen camino
Clases recursivas, ¿Como hacerlo?

Supongamos que tengo 3 .pas con 1 clase cada uno

La clase 1 contiene un objeto de clase 2 y otro de clase 3.
La clase 2 no contiene nada relevante
La clase 3 contiene un puntero del objeto de la clase 1.

Al meter los uses de da error de redundancia como es de esperar, ¿Como puedo solucionar esto?


----------- file_1.pas --------------------------------------------
uses file_2, file_3;

PC1 = ^TC1;
TC1 = class
f2 : TC2;
f3 : TC3;
end;
----------- file_2.pas --------------------------------------------
TC2 = class
...
end;
----------- file_3.pas --------------------------------------------
uses file_1;

TC3 = class
ptrC1 : PC1
...
end;
Responder Con Cita
 



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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
como hacerlo?¿ tiagor64 Conexión con bases de datos 4 09-02-2005 16:55:04
Como puede hacerlo? Wascar SQL 2 27-12-2004 15:34:57
Cómo hacerlo ... Jordy Conexión con bases de datos 2 19-08-2004 11:21:39
Cómo hacerlo instalable ? K4RL0S Varios 1 03-01-2004 15:50:31
No se como hacerlo apolo18 Impresión 4 20-05-2003 00:13:27


La franja horaria es GMT +2. Ahora son las 01:56:36.


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