|
ご無沙汰しております。
いつもお世話になっておりますyumapaです。
さてplWordフォームを利用させて頂いております。
規定文書を呼び出し、テキスト内の文字列を置き換えたいと
下記のようにしましたが、置き換え動作が行われません。
procedure TplWordForm1.AfterWordFileOpen(Sender: TObject);
var DateStr:string;
begin
LockWindowUpdate(Handle);
DateStr:=FormatDateTime('yyyy"年"m"月"d"日"',Now);
Self.ReplaceString('『日付』',DateStr);
{画面更新の再開}
LockWindowUpdate(0);
FileChanged:=False;
end;
継承したplWordフォームにボタンを貼り付け、ボタンクリックを
すれば同様のコーディングで置き換えがなされます。
しかし、今回は規定文書を呼び出し、文書表示が完了した後
何らの操作をすることなく自動的に指定文字列の置き換えを
させたいと思います。
宜しくご指導下さい。
|