uses ShellApi; procedure TForm1.Button4Click(Sender: TObject); begin ShellExecute(Handle, 'open', 'mailto:[email protected]?subject=Hola', nil, nil, SW_SHOW); end;