🚀 go-pugleaf

hello...

i've a problem that drives me crazy. i wrote a program that creates a
contact in a public folder. all works great except that the fax-number
of the contact doesn't show in the outlook address book. after saving
the created contact in outlook, the fax number shows. i know, that
outlook adds some magic hidden fields but i don't find them. i compared
the fields in the server explorer before and after saving: the content
length after saving increases by 340 bytes and the following fields
have different values: DAV:getetag, DAV:id and
http://schemas.microsoft.com/repl/resourcetag. this is how i set the
values (the code is delphi):

item := CreateOLEObject('CDO.Person');

item.FileAs := Adresse.Name1;
item.LastName := Adresse.Name1;
item.FirstName := Adresse.Name2;
item.WorkStreet := Adresse.Strasse;
item.WorkCountry := Adresse.Land;
item.WorkPostalCode := Adresse.PLZ;
item.WorkCity := Adresse.Ort;
item.WorkPostOfficeBox := Adresse.Provinz;
item.WorkPhone := Adresse.Telefon;
item.WorkFax := Adresse.Fax;
item.MobilePhone := Adresse.MobilTelefon;
item.Email := Adresse.Email1;

item.Fields.Item['objectClass'].Value := 'contact';
item.Fields.Item['http://schemas.microsoft.com/exchange/outlookmessageclass']
:= 'IPM.Contact';
item.Fields.Item['urn:schemas:mailheader:subject'] := Adresse.Name1;
item.Fields.Item['urn:schemas:contacts:fileasid'] := 1;
item.Fields.Item['urn:schemas:contacts:middlename'] := '';
item.Fields.Item['urn:schemas:contacts:namesuffix'] := '';
item.Fields.Item['urn:schemas:contacts:personaltitle'] := '';

int := 0;
Item.Fields.Item['http://schemas.microsoft.com/mapi/emailaddresslist']
:= VarArrayOf([int, int, int]);
item.Fields.Item['http://schemas.microsoft.com/mapi/emaillisttype'] :=
9;
item.Fields.Update;

item.DataSource.SaveTo(FolderURL + '/' + Adresse.ID + '.eml',
AdoConnection, 3);

any idea, what is missing in my code.