Problem mit meiner CalcEdit-Komponente

[TStringlist]

Wenn man die Komponente mit TAB oder SHIFT+TAB verlässt, dann verliert sie also in jedem Fall ihren Focus. Ergo könntest du es auch mal über die WM_KillFocus-Message versuchen, bzw. über eine dementsprechende Botschaftsbehandlungsroutine:

Delphi-Quellcode:

procedure KillFocusHandler(var Msg : TMessage); message WM_KillFocus;

  .
  .

procedure TCalcEdit.KillFocusHandler(var Msg : TMessage);
begin
  inherited;
  MemoCalc.Visible := false; 
  MemoCalc.Clear; 
  ...
end;