Hallo,
ich bekomme WPT-Dokumente mit Mailmerge-Feldern und diese enthalten eine Kennzeichnung, was da gefüllt werden soll.
(Im Namen enthalten ist der Typ des Feldes, so z.B. Textfeld_15)
Im WPRichText1MailMergeGetText passiert nun in etwa folgendes:
Code
var
type:integer;
if copy(inspname, 1, 8) = 'Textfeld' then
begin
type := StrtoInt(copy(inspname, pos('-', inspname) + 1, 10));
case type of
1: Contents.StringValue := Adressen.Strasse;
2: Contents.StringValue := Adressen.PLZ;
3: Contents.StringValue := Adressen.Ort;
....
15: Contents.StringValue := Format('%d / %d', [(Page + 1), Pages]);
16: Contents.StringValue := IntToStr(Page + 1);
....
end;
end;
Alles anzeigen
Wie aber komme ich an die Seitennummer des Feldes?
Ciao
Stefan