현재 MAPI를 사용하여 응용 프로그램에서 일반 텍스트 전자 메일을 보내고 있습니다. 사용자가이 함수를 호출 할 때 대화 플래그를 지정하여 전자 메일이 전자 메일 클라이언트에 나타나도록 한 다음 수정하여 보낼 수 있습니다.전자 메일을 HTML 형식으로
이메일을 작성한 후 HTML 형식으로 보내주십시오. 시도하지 MSDN 링크 MAPI는 당신이 그것을 할 MAPI를 사용하여 말을 ExpertsExchange에 관한 기사를 보았다하지만 난 Outlook과 작업의 예를 얻을 수없는이 http://support.microsoft.com/kb/268440
에 대한 sutiable되지 않은이 링크 (에 따르면
다른 어떤 고객도)
procedure ShowMailDlg(ToName,Address,HTMLMessage: string);
var
li: integer;
lMessage: TMapiMessage;
lRecipArray: array of TMapiRecipDesc;
lREs: DWord;
begin
SetLength(lRecipArray,1);
lRecipArray[0].ulRecipClass:=MAPI_TO;
lRecipArray[0].lpszName:=pChar(ToName);
lRecipArray[0].lpszAddress:=pChar(Address);
lMessage.ulReserved:=0;
lMessage.lpszSubject:=nil;
lMessage.lpszNoteText:=pChar(HTMLMessage);
lMessage.lpszMessageType:= nil;//pChar('HTML');
lMessage.lpszDateReceived:=nil;
lMessage.lpszConversationID:=nil;
lMessage.flFlags:=0;
lMessage.lpOriginator:=nil;
lMessage.nRecipCount:=length(lRecipArray);
lMessage.lpRecips:=PMapiRecipDesc(lRecipArray);
lMessage.nFileCount:=0;
lMessage.lpFiles:=PMapiFileDesc(nil);
lRes:=MapiSendMail(0, 0 , lMessage,MAPI_DIALOG, 0);
end;
누구나 내가 이것을 할 수있는 아이디어가있다. 아마 Outlook을 자동화 할 수 있지만 상당히 독립적 인 이메일 클라이언트 (따라서 MAPI)
업데이트
감사의 그것을 유지하고 싶은 : 덕분 제안을 모든 사람에게. 이 기능은 많이 사용되는 질문이 아니므로 SMTP 세부 정보를 구성하도록 사용자에게 요청하는 것은 실제로 옵션이 아닙니다. 평범한 텍스트 이메일을 고수 할 것입니다.
감사
MAPI와 같은 사용자의 기본 전자 메일 클라이언트에서 전자 메일이 팝업되지 않습니다. –