FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Estructuras de datos en clases (CLASS y STRUCT)
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
Estructuras de datos en clases (CLASS y STRUCT)
Posted: Wed Feb 27, 2008 09:45 PM
Quisiera saber como definir una estrctura de datos (STRUCT) como DATA de una clase (CLASS).

Menudas preguntas que hago a estas horas... pa mi
Mi abuelo dec铆a: Los aviones vuelan porque Dios quiere, y los helic贸pteros ni Dios sabe porque vuelan.

FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
Re: Estructuras de datos en clases (CLASS y STRUCT)
Posted: Sat Mar 01, 2008 04:03 PM
JmGarcia wrote:Quisiera saber como definir una estrctura de datos (STRUCT) como DATA de una clase (CLASS)

:-)
Mi abuelo dec铆a: Los aviones vuelan porque Dios quiere, y los helic贸pteros ni Dios sabe porque vuelan.

FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Estructuras de datos en clases (CLASS y STRUCT)
Posted: Sun Mar 02, 2008 08:14 PM

JM,

A la DATA le das el nombre que quieras, y desde la inicializaci贸n del objeto, usas la DATA para almacenar la estructura.

De todas formas, si este tema esta relacionado con el anterior, de las estructuras anidadas, insisto, hazlo en C. Te evitar谩s quebraderos de cabeza y tendr谩s la certeza de hacerlo bien (ya que el lenguaje C es muy estricto y no admite errores).

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
Estructuras de datos en clases (CLASS y STRUCT)
Posted: Mon Mar 03, 2008 06:44 PM
Antonio Linares wrote:A la DATA le das el nombre que quieras, y desde la inicializaci贸n del objeto, usas la DATA para almacenar la estructura.

Entonces podr铆a ser algo asi:
#include "FiveWin.Ch"
#include "CStruct.ch" 

pragma pack(4)

typedef struct _IP_ADDR_STRING {;
  LONG Next;
  CHAR IpAddress[16];
  CHAR IpMask[16];
  LONG  Context;
} IP_ADDR_STRING, *PIP_ADDR_STRING;

CLASS TLoQueSea
   DATA oEstrutura
   METHOD New()

METHOD New()
::oEstrutura:=(struct IP_ADDR_STRING)

return Self

.../...
Mi abuelo dec铆a: Los aviones vuelan porque Dios quiere, y los helic贸pteros ni Dios sabe porque vuelan.

FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Estructuras de datos en clases (CLASS y STRUCT)
Posted: Mon Mar 03, 2008 07:00 PM

No, no es asi.

Lee la pregunta que te he hecho en la otra conversaci贸n relacionada con esta.

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion