Como Definir Uma Classe Dentro Da Outra

[Guest - phil_rpg -]

eu trabalho com java e sei que tem conceitos de clases internas.

existe esse mesmo conceito pra delphi?

obrigado! ;)

[Ricardo Bianchin]

Na verdade em delphi uma classe pode conter objetos

ex.: tdata conterá classes tnum

TNum=class

public

Valor:integer;

procedure PergValor;

end;

TData=class

public

Dia, mês, Ano:TNum

end;

mas não dará pra usar antes de instanciar os objetos, então no construtor da data

você cria e no destrutor, deve liberar:

TData=class

public

Dia, mês, Ano:TNum

constructor Create;

destructor Destroy;override;

end;

constructor TData.Create;

begin

Dia:=TNum.create;

mês:=TNum.create;

Ano:=TNum.create;

end;

destructor TData.Destroy;override;

begin

Dia.Free;

mês.Free;

Ano.Free;

end;

espero ter entendido tua pergunta!

se não, tamos ai

Ricardo