schriftart

[Yan]

Das müsste funktionieren:

Delphi-Quellcode:

if FontDialog1.Execute then
begin
  Memo1.Font := FontDialog1.Font;
end;