P2のコードで「DisplayText」を「AsString」に変更すると、表示値でなく実際のデータ値がEditに表示されます。
procedure TForm1.DBGrid1CellClick(Column: TColumn);begin Edit1.Text := Column.Field.AsString; end;
