Mist, ich habe die Funktion
NamedValue vergessen.
Delphi-Quellcode:
function TOLE_OpenOffice.NamedValue(vName, vValue: OleVariant): OleVariant;
var
oPropertyValue: OleVariant;
begin
oPropertyValue := createStruct('
com.sun.star.beans.NamedValue');
oPropertyValue.
Name := vName;
oPropertyValue.Value := vValue;
Result := oPropertyValue;
end;
und
oMerge := Service.CreateInstance('com.sun.star.text.MailMerge');
muss natürlich auch abgesetzt werden.