Falls du schnell mal z.b. eine andere Font zuweisen willst, dann mach dir einfach zwei richtige Setter Methoden:
Delphi-Quellcode:
type
TMemo = class(..)
private
FTextHintFont: TFont;
private
procedure SetTextHintFont(const Value: TFont); inline;
..
published
property TextHintFont: TFont read FTextHintFont write SetTextHintFont;
..
end;
..
procedure TMemo.SetTextHintFont(const Value: TFont);
begin
FTextHintFont.Assign(Value);
end;