Войти

Показать полную графическую версию : Проблемы с запуском почтового клиента


vetal_dnepr
12-04-2008, 13:37
Добрый день!
Может кто подскажет в решении следующей проблемы:
Необходимо что бы при нажатии кнопки открывался e-mail клиент и добавлялся адресат, тема и тело (только обязательно Lotus Notes - установлен только он)

при следующем коде Lotus вообще не запускается:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
ShellExecute(0,NULL,"mailto:test@mail.ru?subject=hello&body=test",NULL,NULL,SW_SHOW);
}

Если же использовать следующий код то Lotus запускается, но возникает вопрос как создать новое письмо с необходимыми данными (адресат, тема и тело)???

void __fastcall TForm1::Button1Click(TObject *Sender)
{
ShellExecute(0,NULL,"notes.exe",NULL,NULL,SW_SHOW);

Заранее большое спасибо!
}

Drongo
13-04-2008, 21:08
vetal_dnepr, Может так:
ShellExecute(Handle, NULL, "mailto:test@yandex.ru?subject=Tema", NULL, NULL, SW_SHOWNORMAL);
Вместо
SW_SHOW
использовать
SW_SHOWNORMAL
Вот небольшой код:
Есть Label1 в которой написано "какая-то строка и адрес: Test@yandex.ru" при наведении курсора на эту строку в событии Label1 Label1MouseEnter строка окрашивается в синий цвет. Аналогичное поведение, в Label1MouseLeave когда курсор мыши покидает эту строку. Цвет становится опять чёрным. Событие Label1Click срабатывает на щелчок.
//Когда мышь над Label1 надпись окрашивается в синий цвет---------------------
void __fastcall TForm1::Label1MouseEnter(TObject *Sender)
{
Label1->Font->Color = clBlue;
}
//Когда мышь покидает Label1 надпись стаёт снова чёрной----------------------
void __fastcall TForm1::Label1MouseLeave(TObject *Sender)
{
Label1->Font->Color = clBlack;
}
// Вызов OutluckExpress, для создания почтового сообщения---------------------
void __fastcall TForm1::Label1Click(TObject *Sender)
{
ShellExecute(Handle, NULL, "mailto:Test@yandex.ru?subject=Tema", NULL, NULL, SW_SHOWNORMAL);
}

Drongo
13-04-2008, 21:30
(только обязательно Lotus Notes - установлен только он) »Ой, кажется я поторопился... Тогда не знаю... :dont-know

vetal_dnepr
14-04-2008, 10:29
Drongo, Все равно спасибо....




© OSzone.net 2001-2012