掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
MS-WORDの文書ファイルを読込んでテキスト表示するには？ (ID：15533)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
おっ，ちぃこさんこんにちは． 起動中のワードに限りますが(必要なら非表示に)以下のコードはどうでしょうか．TWordApplicationを使用した例です．ワードを起動して文書を開いて いるものと仮定しています． //============================================================================= // 起動中のワード文書のテキストをテキストファイルに保存 // ただしテキストボックス等は無視される // usesにClipbrdが必要 //============================================================================= procedure TForm1.Button1Click(Sender: TObject); var AFileName: OleVariant; SL : TStringList; begin AFileName :=ChangeFileExt(Application.ExeName,'.txt'); WordDocument1.Range.Copy; SL:=TStringList.Create; try SL.Text:=Clipboard.AsText; SL.SaveToFile(AFileName); finally SL.Free; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.