Microsoft Word ile otomasyon:
uses ComObj;
procedure TForm1.Button1Click(Sender: TObject);
var
Word97: Variant;
begin
Word97 := CreateOLEObject('Word.Application');
Word97.Documents.Add;
Word97.Selection.TypeText('Wow BOB woW');
Word97.Visible := True;
Word97:= UnAssigned;
end;