Окошко подсказки в редакторе, как в Delphi

[s.Creator]

Alter, вопрос почему изменяешь Canvas.Font,
а восстанавливаешь Memo1.Font ?

Недавно набрел в Graphics.pas на класс TFontRecall
C ним можно написать так

var
  OldF :TFontRecall;
//...
begin 
  OldF := TFontRecall.Create(Canvas.Font);
  Try
    Canvas.Font.Assign(Memo1.Font);

//...

  Finally
    OldF.Free;
  End;

[Alter]

Сообщение от s.Creator

Alter, вопрос почему изменяешь Canvas.Font,
а восстанавливаешь Memo1.Font ?

Сон давал о себе знать, мог и перепутать что возвратить и что запомнить. Но ведь потом то заметил что ошибся НЕ много, а так там правильно.