TMemo scrollt bei hidden Form nicht

[ddcool]

Klingt gut, funktioniert aber leider nicht.
Es ist zum verrückt verden. Ich mache folgendes um die Form zu verstecken und wieder anzuzeigen:

Verstecken bei minimieren:

Delphi-Quellcode:

procedure TfrmMain.WMSysCommand(var Msg: TWMSysCommand);
begin
  if Msg.CmdType = SC_MINIMIZE then
  begin
    TrayIcon.Visible := True;
    Self.Hide;
  end else inherited;
end;

Wieder anzeigen bei Doppelklick auf TrayIcon:

Delphi-Quellcode:

procedure TfrmMain.TrayIconDblClick(Sender: TObject);
begin
  Self.Show;
  TrayIcon.Visible := False;
end;

Vielleicht hilft das noch weiter. Ich bin mit meinem latein etwas am Ende!


Grüße

ddcool