Beim Drucken eines richtext die Schriftgrösse vom Richtext

[Power-Poler]

Du wilst doch nur wisen, wie ich es gemacht habe, oder
Naja, ok:

Delphi-Quellcode:

procedure TForm3.Button1Click(Sender: TObject);
begin
richedit1.Lines.savetofile('Datei.txt');
if printdialog1.execute
then richedit1.print('datei.txt');
end;

3 Zeilen