Comate Outlook Mail Schriftart ändern

[andi256]

Hallo,

ich verwende Comate um von meinen Programm eine E-Mail zu erstellen...

Code: Alles auswählen

Procedure.b CreateOutlookMailStandard(Email_addresse$,Subject$, text$)
 Define.COMateObject OutlookObject, olMsg  
 OutlookObject = COMate_CreateObject("Outlook.Application") 
 If OutlookObject 
  olMsg = OutlookObject\GetObjectProperty("CreateItem(0)") 
   If olMsg 
    olMsg\SetProperty("to='"+Email_addresse$+"'") 
    olMsg\SetProperty("Subject='"+ Subject$ +"'") 
    olMsg\SetProperty("Body='" + text$ + "'") 
    olMsg\Invoke("Display") 
    olMsg\Release() 
    Else 
      MessageRequester("Sorry", COMate_GetLastErrorDescription()) 
  EndIf 
 OutlookObject\Release()  
 Else 
  MessageRequester("Sorry - CreateObject", COMate_GetLastErrorDescription()) 
 EndIf
EndProcedure

funktioniert soweit perfekt !

Gibt es eine Möglichkeit die Schriftart im Mail-Text umzustellen bzw. zb. auf (Courier New) zu setzten.

Danke andi256

[dige]

Wenn du die Schriftart deiner E-Mail vorgeben möchtest, musst du das in Html oder RTF machen und eine Multipart Mail bauen.
Da gibt es eine schöne Include von TS-Soft: http://www.purebasic.fr/english/viewtop ... 12&t=50538