Uruchomienie programu pocztowego

Aby po kliknięciu etykiety Label1, której wygląd upodobniamy do odnośnika (np. podkreślenie, niebieski kolor, kursor w kształcie dłoni) uruchomiony został domyślny program pocztowy wywołujemy funkcję Windows API ShellExecute() podając adres pocztowy poprzedzony słowem "mailto:", jeśli chcemy dodatkowo dołączyć temat listu zaraz za adresem wpisujemy ?subject=temat (należy dołączyć bibliotekę shellapi.h na początku pliku):

Unit1.cpp

#include <shellapi.h>

void __fastcall TForm1::Label1Click(TObject *Sender)
{
   ShellExecute(GetDesktopWindow(), "open", "mailto:thehetman@poczta.fm?subject=temat", NULL,                 NULL, SW_SHOWNORMAL);
}