schriftart

[PierreB]

ja, der code war doch richtig !!!!!!!!

setzt nen button und bei on click kommt rein:

Code:

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

schon fertig !!