Source position: extdlgs.pas line 176
protected procedure TCalculatorForm.CalcKey(
Sender: TObject;
var Key: Char
);