Форум: "Потрепаться";
Текущий архив: 2003.08.07;
Скачать: [xml.tar.bz2];

Вниз

Отправка e-mail   Найти похожие ветки 

← →
Сергей Енин   (2003-07-23 13:17) [0]

Делаю следующее:

Uses Shellapi;
...
procedure Tform1.label1Click(Sender: TObject);
begin
ShellExecute(0,
"open",
PChar("mailto:"+dbText30.Caption),
nil,
nil,
WS_VISIBLE);

end;


Каким образом в создаваемое сообщение подставить тему?

Заранее благодарен.

---

← →
Sergio_nnm   (2003-07-23 13:28) [1]

Никак. Через ShellExecute нельзя заполнить структуру письма. Используй Mapi или стандартные Delphi-компоненты для отправки писем.

---

← →
Юрий Зотов   (2003-07-23 13:36) [2]

Попробуйте так:

PChar(Format("mailto:%s?subject=%s", [адрес, тема]))

---

← →
Сергей Енин   (2003-07-23 13:52) [3]

> Юрий Зотов


Спасибо, помогло... :)))

---

Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2003.08.07;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.008 c