Pascal and Delphi

How to open MS Word from Delphi

Please support our Pascal and Delphi advertiser: Programming Forums - DaniWeb Sister Site

•

Join Date: Oct 2009

Posts: 2

Reputation: alikSmehoff is an unknown quantity at this point

Solved Threads: 0

alikSmehoff alikSmehoff is offline

Offline

Newbie Poster

How to open MS Word from Delphi

Oct 25th, 2009

Hello,
how can I open MS Word application in my Delphi program?
I think, it is necessary to work with ActiveX or maybe there is any other way or some free software for this purpose?

•

Join Date: Jun 2007

Posts: 36

Reputation: fayyaz is an unknown quantity at this point

Solved Threads: 6

fayyaz

Offline

Light Poster

Oct 25th, 2009

•

Originally Posted by alikSmehoff

Hello,
how can I open MS Word application in my Delphi program?
I think, it is necessary to work with ActiveX or maybe there is any other way or some free software for this purpose?

Hello
This is a simple program that open Word Document in Delphi

 Help with Code Tags 
 Pascal and Delphi Syntax (Toggle Plain Text) 
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Buttons,ComObj, DB, ADODB, OleServer, Word2000, StdCtrls;
 
type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.Button1Click(Sender: TObject);
var
    XApp:Variant;
begin
    XApp:=CreateOleObject('Word.Application');
    XApp.Visible:=true;
    XApp.documents.add;
end;
 
end.
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Buttons,ComObj, DB, ADODB, OleServer, Word2000, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
    XApp:Variant;
begin
    XApp:=CreateOleObject('Word.Application');
    XApp.Visible:=true;
    XApp.documents.add;
end;

end.

•

Join Date: Oct 2009

Posts: 2

Reputation: alikSmehoff is an unknown quantity at this point

Solved Threads: 0

alikSmehoff alikSmehoff is offline

Offline

Newbie Poster

Oct 25th, 2009

No, it isn't exactly what I want.
I need to open MS Word application IN my Delphi program, on program's form.

•

Join Date: Oct 2009

Posts: 2

Reputation: shanza is an unknown quantity at this point

Solved Threads: 0

shanza

Offline

Newbie Poster

Oct 28th, 2009

thanks for this information. nice and useful topic.

Gentle Yoga
Lululemon athletica

•

Join Date: Nov 2009

Posts: 40

Reputation: BitFarmer is an unknown quantity at this point

Solved Threads: 4

BitFarmer

Offline

Light Poster

Nov 10th, 2009

You can do it by using a TOleContainer component placed on your form, read the help on this componet, you have all you need in there, also you can "mix" word menus with yours if neccesary.