Hallo Leute,
wenn ich via Delphi-Code im Word einen text suche und markiere - kann ich den text aus einer
DB ins Word schreiben..
Wenn aber das "Feld im Word" gar nicht existiert soll kein text eingefügt werden ..
ich suche so eine Art: "If word.selection.selectedText.count > 0 then ..."
Jemand eine Idee?
thanX
Erich
Delphi-Quellcode:
...
word.Selection.Find.ClearFormatting;
word.Selection.Find.Text:='<<Feld>>';
word.Selection.Find.Replacement.Text:='';
word.Selection.Find.Forward:=true;
word.Selection.Find.Format:=false;
word.Selection.Find.MatchCase:=false;
word.Selection.Find.MatchWholeWord:=false;
word.Selection.Find.MatchWildcards:=false;
word.Selection.Find.MatchSoundsLike:=false;
word.Selection.Find.MatchAllWordForms:=false;
word.Selection.Find.Execute;
word.Selection.TypeText (Text := '..wurde ersetzt' );
word.Selection.TypeParagraph;
...