Pegando Dados no Dbgrid

Delphi

01/07/2003

Como é que eu faço , para
Quando eu der um duplo clique em uma linha do Dbgrid , os meus edits e maskedits receberem os dados que contem naquela linha ?
Obrigado Antecipadamente


Dimasarantes

Dimasarantes

Curtidas 0

Respostas

Okama

Okama

01/07/2003

No evento OndblClick insira o código: 

procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
  Edit1.Text := Table1.FieldByname(´Campo1´).AsString;
  Edit2.Text := Table1.FieldByname(´Campo2´).AsString;

  MaskEdit1.Text := Table1.FieldByname(´Campo3´).AsString;
  MaskEdit2.Text := Table1.FieldByname(´Campo4´).AsString;
end;



Table1 é o mesmo datasource do DBGrid


GOSTEI 0
POSTAR