Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Outlook

Matveih1 © (2008-12-01 16:04:00)
Как из Delphi открыть стандартное окно Outlook для отправки сообщений с заполненным полем «Кому»?

blackman (2008-12-03 16:16:00) [1]
Тогда на все случаи жизни для тех кто...
Через почтовую программу по умолчанию, Mapi, Smtp и COM
http://articles.org.ru/docum/email.php

Anatoly Podgoretsky (2008-12-03 00:00:00) [2]
> blackman (02.12.2008 22:33:10) [10]

Ну это не проблема. А для тех кто не умеет программировать есть много консольных утилит.

blackman (2008-12-02 22:33:00) [3]
Anatoly Podgoretsky © (01.12.08 19:15) [7]
Сделаем без клиента что бы его не беспокоить :)
Отправка письма средствами Delphi, без использования почтового клиента
http://articles.org.ru/cfaq/index.php?qid=2288

Anatoly Podgoretsky (2008-12-02 19:56:00) [4]
Наверно зря советовал.

timekiller (2008-12-02 17:16:00) [5]
Оу полезная темма, как-то тоже искал..

ps: Anatoly Podgoretsky © а вы покупайте ноутбук=)) как вы мне тоже когда-то зачем-то советовали

Anatoly Podgoretsky (2008-12-01 19:15:00) [6]
> clickmaker (01.12.2008 16:44:06) [6]

Ну да, поскольку не только, то, что Outlook не является клиентом по умолчанию, но еще может и не установлен совсем, это первое.
А если кто то решит запуститт Outlook вместо моего любимого супер пупер клиента, то я буду серьезно огорчен и приму меры, что бы подобное болеше не повторялось.

clickmaker (2008-12-01 16:44:00) [7]
и если там не outlook.exe, выдавать сообщение "Отправка почты невозможна"

Сергей М. (2008-12-01 16:38:00) [8]
Ну по кр.мере заглянуть сюда:

HKEY_CLASSES_ROOT\mailto\shell\open\command
HKEY_LOCAL_MACHINE\SOFTWARE\Classes\mailto\shell\open\command

Matveih1 (2008-12-01 16:34:00) [9]
А как контролировать?

Сергей М. (2008-12-01 16:27:00) [10]

> Matveih1 © (01.12.08 16:26) [2]

А контролировать при этом, является ли MSO почтовым клиентом по умолчанию, кто за тебя будет, Пушкин ?)

Matveih1 (2008-12-01 16:26:00) [11]
Работает!!! Спасибо!!!

Как можно проще (2008-12-01 16:17:00) [12]
Ну, например, можно попробовать таким образом:

procedure Button1Click(Sender: TObject); var strEmail, strSubject, strBody, Param: string; begin strEmail := 'matveich1@yandex.ru'; strSubject := 'Здесь тема письма'; strBody := 'А здесь содержание письма (можно оставить пустым)'; Param := 'mailto:' + strEmail + '?subject=' + strSubject + '&Body=' + strBody; ShellExecute(Form1.Handle, 'open', PChar(Param), nil, nil, SW_SHOWNORMAL); end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »