Problem bei Parameterübergabe an WORD

[Uli Becker]

Hallo,

ich verwende TWordApplication in Delphi6, um in einem Dokument Platzhalter durch Texte aus einer Datenbank zu ersetzen.

Dies schlägt fehl, wenn die zu übergebende Zeichenkette eine gewisse Länge überschreitet. Wie kann ich das Problem lösen?

Hier der Code:
<pre>
sel.find.text := '#Platzhalter#';
sel.find.Replacement.text := dm.DocTableMemo1.value;
sel.Find.Execute(Replace:=wdReplaceAll);
</pre>

Die Fehlermeldung: <b>Parameter für Zeichenkette zu lang.</b>

Vielen Dank im Voraus Uli Becker

[Wolfgang Lemmermeyer]

Hallo Uli,

ich verwende für die Datenübergabe "Textmarken", da konnte ich bisher keine Längenbeschränkung feststellen:

vWhat := OleVariant(wdGoToBookmark);
vBookmark:='Textmarke';
sDummy:='Wert'
try
msWord.Selection.GoTo_(vWhat, EmptyParam, EmptyParam, vBookmark);
msWord.Selection.TypeText(sDummy);
except
end;

Grüße
Lemm

[Uli Becker]

Hallo Lemmy,

Werd's gleich ausprobieren.

Gruß Ul

[U Ahrendt]

Hallo,<br>
<br>
versuch doch Textmarken zu nutzen:<br>
MyWordApp.FillBookmark('NAME_DER_TEXTMARKE','LANGE R TEXT...');<br>
<br>
Gruß,<br>
Ulric

[U Ahrendt]

Upps...Synchron-Posting ;-

[Uli Becker]

Vielen Dank, Lemmy, funktioniert natürlich perfekt.

Gruß Ul