Late binding sometimes is your friend:
Set objWord = CreateObject("Word.Application")
Wscript.Echo "Version: " & objWord.Version
Wscript.Echo "Build: " & objWord.Build
objWord.Quit
The accompanying Delphi code:
uses System.Win.ComObj; procedure TTestVersionAgnosticWordMainForm.GetWordApplicationInfoButtonClick(Sender: TObject); var WordApplication: OleVariant; Version: OleVariant; Build: OleVariant; begin WordApplication := CreateOleObject('Word.Application'); try try Version := WordApplication.Version; Build := WordApplication.Build; LogMemo.Lines.Add(Version); LogMemo.Lines.Add(Build); finally WordApplication.Quit; end; finally WordApplication := Unassigned; // release it end; end;
–jeroen
Filed under: Delphi, Delphi XE, Delphi XE2, Delphi XE3, Delphi XE4, Development, Scripting, Software Development, VBScript
