Como Colocar Mais De Um Campo Da Mesma Tag

[anselmooa]

Boa tarde pessoal,

 

eu preciso passar a tag obscont, eu consegui resolver o problema de como passar a tag graças a ajuda de vcs, agora surgiu uma outra dúvida. Preciso repetir os campos dessa tag e não sei como fazer.

 

Quando é uma vez só eu estou passando assim:

        with compl.ObsCont.Add do
        begin
          xCampo := 'numtransporte'; //NUMERO DE TRANSPORTE
          xTexto := cdsCtrc.FieldByName('NUMTRANSP').AsString;
        end;
 

porém preciso repetir a tag xcampo e xtexto com outros valores... qual a maneira correta de fazer?

 

        with compl.ObsCont.Add do
        begin
          xCampo := 'numtransporte'; //NUMERO DE TRANSPORTE
          xTexto := cdsCtrc.FieldByName('NUMTRANSP').AsString;

          xCampo := 'novocampo';

          xTexto := 'novovalor';

        end;
 

ou devo repetir a estrutura toda?

        with compl.ObsCont.Add do
        begin
          xCampo := 'numtransporte'; //NUMERO DE TRANSPORTE
          xTexto := cdsCtrc.FieldByName('NUMTRANSP').AsString;
        end;

        with compl.ObsCont.Add do
        begin
          xCampo := 'novocampo';
          xTexto := 'novovalor';
        end;
 

 

Obrigado

 

Anselmo

[Juliomar Marchetti]

        with compl.ObsCont.Add do
        begin
          xCampo := 'novocampo';
          xTexto := 'novovalor';
        end;

 

Está seria a ideia

caso queira algumas ideias diferentes chegou a ver o projeto acbrnfemonitor que tem no svn ?

é feito algumas coisas dessa forma

[Italo Giurizzato Junior]

Boa noite Anselmo,

 

O ObsCont é uma lista de registros que contem dois valores: xCampo e xTexto.

 

Portanto temos que executar o ADD para cada registro.

 

O que você pode fazer é colocar o trecho que alimenta os campos dentro de um loop, exemplo:

 

for i:=1 to x do

 begin

        with compl.ObsCont.Add do
          begin
            xCampo := 'novocampo';
            xTexto := 'novovalor';
          end;

 end;

[anselmooa]

Bom dia Pessoal,]

 

    Mais uma vez muito obrigado pela força.

 

Abraço a todos

 

Anselmo