26.07.2006, 16:56 | #1 |
Участник
|
Нужно: автоматически сформировать письмо (сабж, текст, получатели) и открыть его в аутлуке для того, чтобы пользователь его скорректировал и отправил. Так же нужно, чтобы в письмо подставилась текущая подпись пользователя (что настраивается в Сервис/Параметры/Сообщение/Подписи - у каждого юзера своя соотвественно). Вот с последним пунктом проблема. Кто-нибудь знает, как заставить вставиться подпись?
Пишу вроде этого: Код: CREATE(OutlookApp); OutlookApp.GetNamespace('MAPI'); MailItem := OutlookApp.CreateItem(0); MailItem."To" := 'vasya@mail.ru'; MailItem.Subject('Test subj'); MailItem.HTMLBody('HtMl'); MailItem.Display(1); IF MailItem.Sent THEN ... |
|
26.07.2006, 20:13 | #2 |
Участник
|
Ещё одна проблема, что-то вроде:
Код: MailItem.Body := MailItem.Body + recExtendedCommentLine.Comment; Что ж делать-то? |
|