Preciso de uma rotina para retornar registros de um DbGrid
Preciso de uma rotina para retorna registros de um DbGrid :
Codigo grupo
[color=blue:2547b4e670]0001 bebidas[/color:2547b4e670]
gostaria que no evento click campos do tipo [color=blue:2547b4e670]edit[/color:2547b4e670] recebesse o registro de uma grid (o registro selecionado na linha da grid) . Ex: quero que os edits recebam os campos de cada coluna da grid.
Obrigado amigos , pois sei que vcs irão me ajudar .
Marcelo.
Codigo grupo
[color=blue:2547b4e670]0001 bebidas[/color:2547b4e670]
gostaria que no evento click campos do tipo [color=blue:2547b4e670]edit[/color:2547b4e670] recebesse o registro de uma grid (o registro selecionado na linha da grid) . Ex: quero que os edits recebam os campos de cada coluna da grid.
Obrigado amigos , pois sei que vcs irão me ajudar .
Marcelo.
Marcelo Pereira
Curtidas 0
Respostas
Edilcimar
09/10/2004
with query1 ou table1 do
begin
edit1.text := fieldbyname(´coluna1´).asstring;
edit2.text := inttostr(fieldbyname(´coluna2.).asinteger);
etc.....
end;
begin
edit1.text := fieldbyname(´coluna1´).asstring;
edit2.text := inttostr(fieldbyname(´coluna2.).asinteger);
etc.....
end;
GOSTEI 0
Christian_adriano
09/10/2004
Olá,
vc pode fazer dessa forma :
Edit.Text := DBGrid.Columns[0].Field.Text;
Edit2.Text := DBGrid.Columns[1].Field.Text;
Edit3.Text := DBGrid.Columns[2].Field.Text;
Onde 0..1..2.. é o número da coluna do DBGrid.
espero ter ajudado.
t++
Christian.
vc pode fazer dessa forma :
Edit.Text := DBGrid.Columns[0].Field.Text;
Edit2.Text := DBGrid.Columns[1].Field.Text;
Edit3.Text := DBGrid.Columns[2].Field.Text;
Onde 0..1..2.. é o número da coluna do DBGrid.
espero ter ajudado.
t++
Christian.
GOSTEI 0