Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

gihbatalha

delphi

Recommended Posts

Eu tenho uma tabela de parcelas e preciso pegar o valor pra jogar nos edits (chamados parc1, parc2, ...)

EX:

cod_parc valor

1 554

2 546

 

no php eu faria semelhante a isso:

for ($i=1;$i<=$row[45];$i++){
  $sql = mysql_query('select cod_parc,vecto_parc,vl_parc,boleto,vltotal,data_pgto_parcela,valor_pago_parcela,
	 codigo,obs_parc,bc from parcelas where cod_parc ="'.$row[1].'-'.$i.'" and cliente="'.$row[0].'"');
  while ($linha = mysql_fetch_row($sql)){  
  ?>
  
  <tr>
    <td><input type='text'    name='Cod<?php echo $i;?>'   value='<?php echo $linha[0];?>'/></td>
   <td><input type='text'     name='Vecto<?php echo $i;?>' value='<?php echo $linha[1];?>'/></td>
   <td><input type='text'     name='Vl<?php echo $i;?>'    value='<?php echo $linha[2];?>'/></td>
 </tr>
 
 <?php 	 }} ?>
Gostaria de saber como fazer algo semelhante no delphi, obrigada

Compartilhar este post


Link para o post
Compartilhar em outros sites

While Not TABELA.Eof Do

Begin

TextBox1.Text:=TABELA.FieldByName('Nome_Do_Campo').AsString;

TABELA.Next;

End;

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.