Hallo Christoph,
hier noch eine Alternative:
Delphi-Quellcode:
procedure TDemoForm.StringGridSetEditText(Sender: TObject; ACol,
ARow: Integer; const Value: String);
begin
with Sender as TStringGrid do
if EditorMode
then Caption := 'still editing ...'
else Caption := Format('%d / %d : "%s"', [ACol, ARow, Value]);
end;
Grüße vom marabu