MergeText()

When i use merge, the displayname of the mergefield is left in the text with the merged contents

What is wrong?

wps.clear;
        wps.LoadFromStream(source);
        wps.ReformatAll(true);
        wps.OnMailMergeGetText := MailMergeGetText;
        wps.InsertPointAttr.Hidden := true;
        wps.MergeText('',true);
        wps.TextSaveFormat := 'RTF';
        Result := TMemoryStream.Create;
        wps.SaveToStream(Result);


MailMergeGetText


    o := wps.FieldLocate(inspname,'', true, [wplocGlobalSearch]);
    s := o.Source;


......


    Contents.Clear;
    Contents.Options :=     Contents.Options + [mmDeleteThisField];
    Contents.StringValue := AsRTF ; //something depending on s

i did try that already, but the problem is not, that the fields are left over, but just the displayname of the field is appended to the inserted text with the same attributes as the inserted Text (non-RTF insertion) and with neutral attributes in case of RTF Insertion

When i use the same form with supermerge, everything is fine

Chuck

sorry, i don't have the time to try it now, for the moment i use the supermerge. As soon as i have a little time, i investigate a little further

chuck