Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#5

AW: OLE, Word, Doc-Inhalt in Doc schreiben

  Alt 23. Jul 2010, 15:18
Ungetestet; könnte aber funktionieren:
Delphi-Quellcode:
Selection.Find.ClearFormatting;
Selection.Find.Text := '<langtext>';
(*
ggf. noch weitere Properties einstellen
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
*)

if Selection.Find.Execute then
  Selection.InsertFile(....
Andreas
  Mit Zitat antworten Zitat