Die Ereignisroutine von OnColExit bei OnKeyUp aufrufen. Das könnte in etwa so aussehen:
Delphi-Quellcode:
procedure Tform1.DBGrid1ColExit(Sender: TObject);
begin
// Hier wird berechnet:
end;
procedure Tform1.DBGrid1KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
Case key of
// Wenn Return gedrückt wird:
#13 : DBGrid1ColExit(Sender);
end;
end;
KeyPreview muss beim Formular dafür auf True stehen.