DBGrid Inhalt einer Zelle per klick in TEdit übernehmen?

[smart]

Wie kann ich von DBGrid den Inhalt einer Zelle per klick auf dieser Zelle in einem TEdit übernehmen?

[Jasocul]

Im OnCellClick-Ereignis:

Delphi-Quellcode:

edit1.text := query1.Fields[Column].AsString;

Wenn nicht eindeutig ist, welches Query zuständig ist:

Delphi-Quellcode:

edit1.text := dbgrid1.datasource.dataset.Fields[Column].AsString;

[marabu]

Fast richtig:

Delphi-Quellcode:

procedure TDataForm.DBGridCellClick(Column: TColumn);
begin
  CellEdit.Text := Column.Field.AsString;
end;

Grüße vom marabu

[Thanatos81]

Das funktioniert aber nur, wenn alle Felder einer Query-/Table-Komponente angezeigt werden und die Reihenfolge auch die gleich ist, ansonsten versuchs mal so:

Delphi-Quellcode:

  edit1.Text := dbgrid1.Columns.Items[Column].Field.AsString;

Achtung: Nicht getestet, nur ausm Kopp zusammengeschustert.

Edit: Mist, marabu war schneller, ... und simpler :thumb:

[smart]

Vielen Dank für Eure Antworten. Hat alles hingehauen.

Heike.