n-dimens/pascalabcnet: The new generation Pascal programming language for .NET

TestSamples/CompilationSamples/AodlTest.pas

12 строк457 B

Бондарев Иван

initial commit

14 май 2015, 22:35

14 май 2015, 22:35e6e67c1

{$reference 'AODL.dll'}
uses System, AODL.Document, AODL.Document.TextDocuments, AODL.Document.Collections, AODL.Document.Content.Text;
var doc : TextDocument;
    pCollection : ParagraphCollection;
begin
doc := new TextDocument();
doc.New();
pCollection := ParagraphBuilder.CreateParagraphCollection(doc,'Privet world!',true,ParagraphBuilder.ParagraphSeperator);
foreach p : Paragraph in pCollection do
doc.Content.Add(p);
doc.SaveTo('Letter.odt');
end.