Hallo Steven,
heißt das, dass der Code problemlos durchläuft wenn eine Textmarke vorhanden ist ? In diesem Fall müsstest Du abfragen, ob die Textmarke im Dokument vorhanden ist.
Beispiel:
Delphi-Quellcode:
function TOLE_OpenOffice.TxTBookmark(name,inhalt:String):boolean;
var
VBookMark, vTextCursor: OleVariant;
begin
Result := true;
If Document.BookMarks.hasByName(name) = true then
begin
try
vBookMark := Document.BookMarks.getByName(name);
vTextCursor := vBookMark.Anchor.Text.createTextCursorByRange(vBookMark.Anchor);
vTextCursor.SetString(inhalt);
except
Result := false;
end;
end;
end;
Richte dazu Dein Augenmerk auf den Codeschnipsel
If Document.BookMarks.hasByName(name) = true then.