Registros Filhos (TODOS)

[AlexandreADC]

Olá pessoa, não sei o objetivo desta mudança, mas está me trazendo muito transtorno...

Todos os registros filhos, a partir de certo momento começaram a necessitar de um parâmetro na criação,

ex:

function TRegistroC110List.New(AOwner: TRegistroC100): TRegistroC110;

begin

Result := TRegistroC110.Create(AOwner);

Add(Result);

end;

Onde teria que passar o AOwner...

Poxa, se eu faço "with RegistroC100.RegistroC110.New do begin"

ele deveria implicitamente passar o Ownder dele como o RegistroC100, já que ele nada mais é do que uma propriedade do Registro C100.

Ele tava funcionando certinho, zero bala até essa alteração, no qual eu teria que mudar todo meu código... Também não encontrei resultados para explicar o motivo desta alteração... Alguém poderia me explicar?

Att

[Isaque Pinheiro]

Olá pessoa, não sei o objetivo desta mudança, mas está me trazendo muito transtorno...

Todos os registros filhos, a partir de certo momento começaram a necessitar de um parâmetro na criação,

ex:

function TRegistroC110List.New(AOwner: TRegistroC100): TRegistroC110;

begin

Result := TRegistroC110.Create(AOwner);

Add(Result);

end;

Onde teria que passar o AOwner...

Poxa, se eu faço "with RegistroC100.RegistroC110.New do begin"

ele deveria implicitamente passar o Ownder dele como o RegistroC100, já que ele nada mais é do que uma propriedade do Registro C100.

Ele tava funcionando certinho, zero bala até essa alteração, no qual eu teria que mudar todo meu código... Também não encontrei resultados para explicar o motivo desta alteração... Alguém poderia me explicar?

Att

Sim, com todo prazer explicarei.

Acontece que muitos usuário estão perdidos na hierarquia, e estavam usando o componente de forma errada gerando problemas e demanda de perguntas no fórum por não entenderem quais registros eram filhos e quais, e pela jeito que você desenvolveu, também poderia cair nesse erro e te dar trabalho para acha-lo.

Bom é muito fácil você resolver seu problema, com mudanças mínimas.

Ao invés de "with RegistroC100.RegistroC110.New do begin"

Use : "with RegistroC100.RegistroC110New do begin"

Essa última forma irá garantir que vc esteja instanciando o registro C110 como filho do C100

Abraço.

[AlexandreADC]

Entendo...

Agradeço pela rápida resposta e explicação sobre o assunto

Um grande abraço!