Outlook: Email mit Signatur erstellen

[Keldorn]

Hallo,

ich versuche verzweifelt, eine Email in Outlook zuerstellen, bei der die eingestellte Signatur mit drangehangen wird.
Solange ich keinen Text einfüge, ist die Signatur in der Mail drin, sobald ich einen Text per body setze, ist sie weg.
Frage ich htmlbody ab, steht vor item.display aber auch keine Signatur drin. In einem VB-Forum habe ich irgendwo gefunden, man solle mal vorher "getinspector" aufrufen -> ok, dann habe ich die Signatur im htmlbody stehen, aber ändern kann ich sie nicht, jegliches schreiben des htmlbody führt zu einer Exception "unzulässige Funktion" und wenn auch genau das Ausgelesene zurückgeschreiben wird ...

Mein code sieht bisher so aus:

Delphi-Quellcode:

Var FOutlookApplication: Variant;
    FMailitem:Olevariant;
...
    FOutlookApplication := CreateOleObject('Outlook.Application');
    try
      Emailtext:='hier steht ein Text';

      FMailitem := FOutlookApplication.CreateItem(olMailItem);
      FMailitem.subject := 'Betreff';
      FMailitem.ReadReceiptRequested := true;
      FMailitem.Recipients.Add('[e-mail]');

      FMailitem.BodyFormat := olFormatHTML;
      FMailitem.getinspector;
      showmessage(FMailitem.htmlbody);

      s:=FMailitem.htmlbody;
      FMailitem.HtmlBody := s; //führt zu unzulässige Funktion ???????????

      FMailitem.display;

Hat jemand eine Idee, wie ich Text und Signatur in die Mail bekomme ?

Viele Grüße Frank