Delphi және Word арасында байланысты орындау үшін формаға келесі компоненттер орнатылды – WordApplication, WordDocument, WordParagraphFormat және WordFont (сурет 4.1)

Delphi және Word арасында байланысты орындау үшін формаға келесі компоненттер орнатылды – WordApplication, WordDocument, WordParagraphFormat және WordFont (сурет 4.1).

«Вставить в Word» пернесін басқанда келесі код орындалады:

procedure TForm5.BitBtn2Click(Sender: TObject);

var Template,NewTemplate,ItemIndex:OleVariant;

begin

try

Template := EmptyParam;

NewTemplate := True;

ItemIndex := 1;

try

Wordapplication1.Connect;

except

MessageDlg('ОШИБКА!!! Word не может быть установлен!!!', mtError, [mbOk], 0);

Abort;

end;

Wordapplication1.Visible := True;

WordApplication1.Caption := 'Новый документ';