Zitat von
Sharky:
irgendwie ist das seltsam. Meinen Code kann ich ohne Probleme nutzen (habe ich ja auch vorher getestet).
Woher kommt denn in deinem Code das SelectetField? Ich sehe weit und breit keine Variable dafür.
Sollte auch so aussehen:
Delphi-Quellcode:
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
if (Column.Field is TMemoField) then
begin
DBMemo1.DataSource := DBGrid1.DataSource;
DBMemo1.DataField := DBGrid1.SelectedField.FullName;//<- geändert
end
else
begin
DBMemo1.DataSource := nil;
end;
end;
Wenn ich ganz ehrlich sein soll, keine Ahnung. Habe ein wenig getestet und siehe da es klappte.