[Drongo]

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);
}