jkrieger.de/ unit rtf10: Beispiel

unit rtf10: Beispiel

  RTFOpen('c:\temp\test.rtf', 'Testdatei', 'Jan Krieger');
  RTFWriteLn('Hier steht Text ...');
  RTFSetAlign(alCenter);
  RTFSetFontStyle([italic,bold,underlined,sstrike]);
  RTFSetFontSize(20);
  RTFWriteLn('das geht auch größer und zentriert');
  RTFResetStyles;
  RTFLineBreak;RTFLineBreak;
  RTFWriteTab;
  RTFWrite('(das war total unleserlich)');
  RTFClose;

Ergibt als Ausgabe eine datei, die Word so darstellt:

printable version of: https://www.jkrieger.de/programming/delphi/rtf_test.html
last updated: 04.08.2019
Contents/Design: © 2000-2019 by Jan Krieger
Konatkt: webmaster@jkrieger.de
Impressum: https://www.jkrieger.de/impressum.html
Datenschutzerklärung: https://www.jkrieger.de/datenschutz.html