Das funktioniert aber nur, wenn alle Felder einer
Query-/Table-Komponente angezeigt werden und die Reihenfolge auch die gleich ist, ansonsten versuchs mal so:
edit1.Text := dbgrid1.Columns.Items[Column].Field.AsString;
Achtung: Nicht getestet, nur ausm Kopp zusammengeschustert.
Edit: Mist, marabu war schneller, ... und simpler