DBGRID ¿como seleccionar fila y obtener datos de la fila ?

[rrf]

A ver si esto te sirve...

Utilizo los IBX con Delphi 7 y he hecho algo parecido a lo que tú comentas.

En el evento AfterScroll del IBDataset (seguramente existe ese mismo evento en otro tipo de Dataset), pones una condición if..then que se cumplirá cuando estés en el form que tiene ese DBGrid.

Dentro de ese if..then pones la asignación del contenido de cada campo al edit que le corresponda.

Sería algo así:

Código Delphi [-]
procedure TDModule.DataSet_AfterScroll(DataSet: TDataSet);
begin

  if Ante_el_DBGrid   // variable boolean que indica que está ante el DBGrid
  then
    begin
      Form_con_DBGrid.Edit1.text := DataSet_Campo1.asstring ;
      Form_con_DBGrid.Edit2.text := inttostr(DataSet_Campo2.asinteger) ;
      // ...
      // Etc, etc...
    end ;        

end;

Así, cada vez que hagas clic en el DBGrid o te muevas por él con las teclas de flecha, se pone en marcha este evento y se actualizan los Edit con el contenido de los campos.

Espero que te sirva.

[Yhimy_1]

Yo lo he trabajado así , y funciona correctamente ! espero que le sea de ayuda .

procedure TForm1.dbgrd1CellClick(Column: TColumn);
begin
     if cbbOpciones.ItemIndex =1 then
     begin
         txtNombre.Text      :=   Column.Field.DataSet.Fields[1].Value;
         txtCompanyName.text :=   Column.Field.DataSet.Fields[2].Value;
         txtCompanyId.Text   :=   Column.Field.DataSet.Fields[3].Value;
         txtCountry.Text     :=   Column.Field.DataSet.Fields[4].Value;

     end
     else if  cbbOpciones.ItemIndex =2 then
     begin
           txtCompanyId.Text   :=   Column.Field.DataSet.Fields[3].Value;
     end;


end;