Показать сообщение отдельно
  #1  
Старый 03.10.2018, 15:38
Gakuro Gakuro вне форума
Прохожий
 
Регистрация: 18.01.2012
Адрес: о. Сахалин
Сообщения: 34
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию сообщения SendTo

Не могу отправить сообщение на почтовый ящик, помогите плииз:
Код:
var sEmail:String;
begin
  sEmail:='mailto:'+sendEmail+'?subject='+sendSubject+'&body='+sendText;
  ShellExecute(Handle,'open',PChar(sEmail),nil,nil,SW_SHOWNORMAL);
end;
sendEmail - имя ящика, строка типа 'zzzzz@mail.ru';
sendSubject - строка темы: 'поздравление';
sendText - текст сообщения (текст короткий);
Админ: 3-дневный бан за несоблюдение правил форума по офрмлению кода

При запуске мне пишут: "Не удалось из-за неправильной установки клиента почты по умолчанию".
Что-то не хватает наверное...
Ответить с цитированием