|
ｿｽ@ｿｽｿｽWORDｿｽｿｽｿｽｿｽｿｽﾉ托ｿｽｿｽﾌフｿｽ@ｿｽCｿｽｿｽｿｽｿｽｿｽｿｽﾌ包ｿｽｿｽｿｽｿｽｿｽｿｽ...
|
ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽEpapy's softwarelibrary
ｿｽｿｽｿｽｿｽｿｽｿｽﾂゑｿｽｿｽﾈゑｿｽ 2009/07/01(ｿｽｿｽ) 15:07:48
WORDｿｽｿｽｿｽｿｽｿｽﾉ托ｿｽｿｽﾌフｿｽ@ｿｽCｿｽｿｽｿｽｿｽｿｽｿｽﾌ包ｿｽｿｽｿｽｿｽｿｽｿｽﾇ会ｿｽｿｽiｿｽﾊ置ｿｽﾍゑｿｽｿｽいｿｽｿｽﾅゑｿｽｿｽjｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
Delphiｿｽﾌ簡単ｿｽﾈプｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
DelphiｿｽｿｽWORDｿｽ操作すｿｽｿｽｿｽｿｽ@ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽかｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽCｿｽｿｽｿｽ^ｿｽ[ｿｽlｿｽbｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ、Mr.XRAYｿｽｿｽｿｽｿｽｿｽHPｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽかｿｽ轤ｸｿｽｿｽｿｽﾜゑｿｽｿｽﾅゑｿｽｿｽB
ｿｽﾇなゑｿｽｿｽｿｽｿｽAｿｽﾆりあｿｽｿｽｿｽｿｽｿｽAFormｿｽｿｽﾌボｿｽ^ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽWORDｿｽｿｽｿｽｿｽｿｽｿｽJｿｽｿｽｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽｿｽｿｽｿｽﾆ、WORDApplicationｿｽｿｽWORDDocumentｿｽﾍどゑｿｽｿｽ痰､ｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
Turbo Delphi2006ｿｽｿｽgｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽ 2009/07/01(ｿｽｿｽ) 21:24:24
ｿｽﾅ終ｿｽIｿｽﾉなにゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌゑｿｽｿｽかｿｽｿｽﾜゑｿｽｿｽが、
ｿｽｿｽｿｽｿｽMr.XRAYｿｽｿｽｿｽｿｽﾌｿｽｿｽ[ｿｽhｿｽｿｽｿｽｿｽtｿｽHｿｽ[ｿｽｿｽExｿｽｿｽgｿｽｿｽｿｽﾌゑｿｽｿｽｿｽｿｽｿｽｿｽ闡ｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽﾔ簡単ｿｽﾉゑｿｽｿｽﾈゑｿｽWordｿｽﾌ包ｿｽｿｽﾍゑｿｽｿｽｿｽｿｽｿｽTXTｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾅ別保托ｿｽｿｽｿｽｿｽﾄ、
ｿｽｿｽｿｽｿｽｿｽTMemoｿｽｿｽｿｽｿｽｿｽｿｽﾅ読み搾ｿｽｿｽﾞのゑｿｽｿｽｿｽｿｽNｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽﾂゑｿｽｿｽﾈゑｿｽ 2009/07/02(ｿｽｿｽ) 17:56:20
Mr.XRAYｿｽｿｽｿｽｿｽｿｽHPｿｽﾉゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ[ｿｽhｿｽｿｽｿｽｿｽtｿｽHｿｽ[ｿｽｿｽｿｽｿｽRｿｽｿｽｿｽpｿｽCｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾆゑｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
ｿｽuFastMM4.dcuｿｽｿｽｿｽｿｽｿｽﾂゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽvｿｽﾆゑｿｽｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽｿｽｿｽoｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽﾌフｿｽ@ｿｽCｿｽｿｽｿｽﾍどゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽ閧ｵｿｽｿｽｿｽ轤｢ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
DEKO 2009/07/02(ｿｽｿｽ) 18:11:01
http://sourceforge.net/projects/fastmm/files/
ｿｽｿｽｿｽｿｽｿｽｿｽﾉなゑｿｽﾜゑｿｽｿｽB
ｿｽﾈゑｿｽｿｽAMr.XRAYｿｽｿｽｿｽｿｽﾌサｿｽCｿｽgｿｽﾉゑｿｽLｿｽqｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽA
Turbo(2006) ｿｽﾌｿｽｿｽｿｽｿｽｿｽｿｽ}ｿｽlｿｽ[ｿｽWｿｽｿｽｿｽｿｽ FastMM ｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽB
http://mrxray.on.coocan.jp/Others/UsageFastMM.htm
ｿｽVｿｽｿｽｿｽｿｽ(ｿｽｿｽｿｽｿｽｿｽﾄ奇ｿｽｿｽSｿｽﾅゑｿｽ)FastMM ｿｽｿｽgｿｽｿｽｿｽKｿｽvｿｽｿｽｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽｿｽﾎ、
uses ｿｽｿｽｿｽｿｽ FastMM ｿｽｿｽOｿｽｿｽｿｽﾄコｿｽｿｽｿｽpｿｽCｿｽｿｽｿｽｿｽｿｽ骼厄ｿｽｿｽｿｽoｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾈゑｿｽｿｽｿｽ 2009/07/02(ｿｽｿｽ) 18:37:58
WordApplication1.Connect;
WordApplication1.Documents.Add(Template, NewTemplate, _WordDocumentType,_Visible);
//WordDocumentｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽﾌ接托ｿｽｿｽｿｽｿｽｿｽ
WordDocument1.ConnectTo (WordApplication1.ActiveDocument as _document);
//WordFontｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽﾌ接托ｿｽｿｽｿｽｿｽｿｽ
WordFont1.ConnectTo(WordApplication1.Selection.Font);
WordApplication1.Selection.TypeText('ｿｽｿｽｿｽｿｽﾉゑｿｽｿｽｿｽ');
ｿｽｿｽｿｽｿｽﾈ包ｿｽｿｽﾉ記ｿｽﾚゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽOkｿｽﾅゑｿｽｿｽB
ｿｽｿｽﾔ簡単ｿｽﾈのは、WordｿｽｿｽﾅマｿｽNｿｽｿｽ(VBA)ｿｽ操作しｿｽﾄ、VBAｿｽﾅ搾ｿｽｿｽ黷ｽｿｽRｿｽ[ｿｽhｿｽｿｽDelphiｿｽﾉ置ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽﾎゑｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽ瘧ｱWordｿｽﾌバｿｽ[ｿｽWｿｽｿｽｿｽｿｽｿｽﾉゑｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾟゑｿｽｿｽﾙなゑｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽXｿｽｿｽｿｽｿｽｿｽ[ｿｽｿｽｿｽﾅゑｿｽｿｽB
ｿｽﾈ擾ｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽﾂゑｿｽｿｽﾈゑｿｽ 2009/07/02(ｿｽｿｽ) 21:02:12
DEKOｿｽｿｽｿｽありがｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽuses ｿｽｿｽｿｽｿｽ FastMM ｿｽｿｽOｿｽｿｽｿｽﾄコｿｽｿｽｿｽpｿｽCｿｽｿｽｿｽｿｽｿｽ骼厄ｿｽｿｽｿｽoｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾆりあｿｽｿｽｿｽｿｽｿｽAｿｽﾈゑｿｽｿｽ竄ｳｿｽｿｽﾌ包ｿｽｿｽ@ｿｽﾅゑｿｽｿｽｿｽﾄみまゑｿｽｿｽB
ｿｽﾅゑｿｽA
WordApplication1.Documents.Add(Template, NewTemplate, _WordDocumentType,_Visible);
ｿｽﾌ、NewTemplate, _WordDocumentType,_Visibleｿｽﾅエｿｽｿｽｿｽ[ｿｽｿｽｿｽoｿｽｿｽiｿｽﾔゑｿｽｿｽgｿｽｿｽｿｽｿｽｿｽoｿｽｿｽjｿｽﾌでゑｿｽｿｽｿｽｿｽAusesｿｽﾉ会ｿｽｿｽｿｽｿｽﾇ会ｿｽｿｽｿｽｿｽｿｽKｿｽvｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
Mr.XRAY 2009/07/03(ｿｽｿｽ) 09:15:16
Mr.XRAYｿｽﾅゑｿｽｿｽD
>(Template, NewTemplate, _WordDocumentType,_Visible);
ｿｽｿｽｿｽｿｽｿｽﾍ茨ｿｽｿｽｿｽｿｽﾌ変撰ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽD
ｿｽｿｽｿｽﾌままで「ｿｽｿｽｿｽｿｽ`ｿｽﾌ趣ｿｽｿｽﾊ子ｿｽvｿｽﾌエｿｽｿｽｿｽ[ｿｽﾆなゑｿｽﾜゑｿｽｿｽD
ｿｽ痰ｦｿｽﾎ以会ｿｽｿｽﾌコｿｽ[ｿｽhｿｽｿｽA,Bｿｽﾅ難ｿｽｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽﾆなゑｿｽﾜゑｿｽｿｽD
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private ｿｽ骭ｾ }
public
{ Public ｿｽ骭ｾ }
function HogeHoge(A,B : Integer): Integer;
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
var
C : Integer;
begin
C := HogeHoge(A,B);
end;
function TForm1.HogeHoge(A, B: Integer): Integer;
begin
Result := A + B;
end;
end.
ｿｽｿｽｿｽｿｽｿｽﾌ変撰ｿｽｿｽﾉは，ｿｽｿｽｿｽﾌ場合ｿｽCｿｽKｿｽｿｽｿｽlｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽKｿｽvｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽD
Delphiｿｽﾅは，ｿｽKｿｽｿｽｿｽﾏ撰ｿｽｿｽﾌ型ｿｽｿｽｿｽ`ｿｽｿｽｿｽﾈゑｿｽｿｽｿｽﾎ，ｿｽｿｽｿｽﾌ変撰ｿｽｿｽﾍ使ｿｽpｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽD
ｿｽ^ｿｽﾌ抵ｿｽ`ｿｽｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽﾌどゑｿｽｿｽﾅ行ｿｽｿｽｿｽｿｽｿｽﾍ，ｿｽｿｽｿｽﾌ変撰ｿｽｿｽｿｽCｿｽｿｽｿｽﾌプｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽﾇゑｿｽｿｽﾌようｿｽﾉ暦ｿｽｿｽpｿｽｿｽｿｽ驍ｩｿｽﾉゑｿｽｿｽｿｽﾄ，ｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾟまゑｿｽｿｽD
ｿｽｿｽﾌコｿｽ[ｿｽhｿｽﾌ場合ｿｽCｿｽ痰ｦｿｽﾎ，Button1ｿｽNｿｽｿｽｿｽbｿｽNｿｽｿｽﾅゑｿｽｿｽｿｽｿｽgｿｽpｿｽｿｽｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽｿｽﾎ，
ｿｽﾈ会ｿｽｿｽﾌ様ｿｽﾉゑｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽD
procedure TForm1.Button1Click(Sender: TObject);
var
C : Integer;
A,B : Integer;
begin
A := 100;
B := 30;
C := HogeHoge(A,B);
end;
>(Template, NewTemplate, _WordDocumentType,_Visible);
ｿｽｿｽｿｽｿｽｿｽﾌ茨ｿｽｿｽｿｽｿｽﾌ型ｿｽﾉつゑｿｽｿｽﾄは，
[Servers]ｿｽ^ｿｽuｿｽﾌコｿｽｿｽｿｽ|ｿｽ[ｿｽlｿｽｿｽｿｽgｿｽﾌ場合ｿｽCDelphiｿｽﾌヘｿｽｿｽｿｽvｿｽﾉは撰ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽが，
VBAｿｽﾌヘｿｽｿｽｿｽvｿｽｿｽｿｽﾈ会ｿｽｿｽﾌ包ｿｽｿｽ@ｿｽﾅ知ｿｽ驍ｱｿｽﾆゑｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽD
ｿｽｿｽｿｽ驍｢ｿｽﾍ，ｿｽ¥ｿｽ[ｿｽXｿｽRｿｽ[ｿｽh(Turbo 2006ｿｽｿｽｿｽﾄ，ｿｽ¥ｿｽ[ｿｽXｿｽRｿｽ[ｿｽhｿｽｿｽｿｽﾈゑｿｽｿｽﾌゑｿｽｿｽｿｽ?)ｿｽﾅ確ｿｽFｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽD
ｿｽﾏ撰ｿｽｿｽﾌ意厄ｿｽｿｽﾍ，ｿｽﾏ撰ｿｽｿｽﾌ厄ｿｽｿｽOｿｽｿｽｿｽ逅ｿｽｿｽｿｽｿｽｿｽ驍ｩｿｽCｿｽｿｽｿｽ[ｿｽhｿｽｿｽVBAｿｽﾅ抵ｿｽｿｽﾗるこｿｽﾆになゑｿｽﾜゑｿｽｿｽD
ｿｽRｿｽ[ｿｽhｿｽ竓ｮｿｽ@ｿｽ¥
http://mrxray.on.coocan.jp/Others/A_IDETechnique.htm#05
ｿｽﾖ撰ｿｽｿｽﾌ宣言ｿｽ¥ｿｽｿｽ
http://mrxray.on.coocan.jp/Others/A_IDETechnique.htm#06
Mr.XRAY 2009/07/03(ｿｽｿｽ) 09:20:03
>ｿｽｿｽﾌコｿｽ[ｿｽhｿｽﾌ場合ｿｽCｿｽ痰ｦｿｽﾎ，Button1ｿｽNｿｽｿｽｿｽbｿｽNｿｽｿｽﾅゑｿｽｿｽｿｽｿｽgｿｽpｿｽｿｽｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽｿｽﾎ，
>ｿｽﾈ会ｿｽｿｽﾌ様ｿｽﾉゑｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽD
ｿｽｿｽｿｽｿｽｿｽﾌ変撰ｿｽｿｽｿｽｿｽﾍ，ｿｽｿｽ`ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ難ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽKｿｽvｿｽﾍゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽD
ｿｽｿｽｿｽｿｽﾌ場合ｿｽCｿｽ痰ｦｿｽﾎ，ｿｽﾈ会ｿｽｿｽﾅゑｿｽｿｽｿｽﾊは難ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽD
procedure TForm1.Button1Click(Sender: TObject);
var
C : Integer;
D,E : Integer;
begin
D := 100;
E := 30;
C := HogeHoge(D,E);
end;
