Description: this code can be achieved using the following functions wordappalication components, the following code at the start Word with the following code : begin try Wordapplication.Connect except MessageDlg ( 'Word may not be installed', mtError, [mbOk], 0) Abort end Wordapplication.Visible : = True WordApplication.Caption : = 'Delphi automation' end
File list (Check if you may need any files):
Download