word öffnen und maske ändern

[Albi]

Hallo,

für dein Problem gib es mehrere Lösungen. Entweder du schaust Dir mal die Befehl "Textmarke" an.

Code:

procedure ....
var Bookmark: OleVariant;
Begin
...
...
...
Bookmark:= 'Kundennummer';
if WordApplication1.ActiveDocument.Bookmarks.Exists(Bookmark) then
  begin
    R:= WordApplication1.ActiveDocument.Bookmarks.Item(Bookmark).Range;
    R.InsertAfter('123456'); //Kann auch Feld aus DB sein
  end;
end;

Oder Du schaust Dir mal ekRTF an, damit kannst Du das auch ganz einfach realisieren ohne dich um Word kümmern zu müssen. In meinen Augen, der Große Vorteile liegt darin, dass das auch läuft, wenn kein Word auf dem Rechner installiert ist (*.rtf).