Отправка Email через программу по умолчанию

[ScreN]

Здравствуйте. Всех с Наступающим новым годом!
Помогите мне.
Нужно сделать отправку файла, как в WordPad.
Нажимаешь на Отправить... , он открывает Email-клиент по умолчанию стоящий в Windows, и прикрепляет к письму файл.
Так вот.
Есть процедура, нажатия на пункт отправить

procedure TForm1.SendFileEmailClick(Sender: TObject);
begin
shellexecute(handle,
'Open',
'mailto:?attachment="FileName"',
nil, nil, sw_restore);
end;

Все вроде как нормально, программа запускается, в данном случае, у меня стоит Email-клиент The Bat.
После нажатия на пункт отправить, запускается программа, но файл не прикрепляется.
Подскажите пожалуйста что сделать, чтобы файл прикрепился?

Желательно напишите полностью код обработки. Так как я новенький в делфи.
Заранее спасибо!

[mihali4]

Может, хоть в новом году станете пользоваться поиском?
Или хотя бы смотрите в самый низ этой страницы, да, да, этой самой, на которой эти слова написаны - ведь все дано реализовано...
"Похожие темы" называется (это так, для особо одаренных).
http://programmersforum.ru/showthread.php?t=29269

[ScreN]

Вы наверное меня не поняли... Мне нужно отправить файл по емайл.. не стандаотными средствами делфи.. а через прогу установленную по умолчанию
А те примеры что есть на форуме.. все только через стандартные средства делфи

[mihali4]

В тех примерах как раз осуществляется отправка писем через установленный в системе по умолчанию почтовый клиент. Дельфи лишь вызывает его и передает параметры.

[ScreN]

А зачем тогда ставить компонент IdSMTP? Он же ведь проводит соединения с сервером почты.. А мне соединять не надо.. просты вызвать программу по умолчанию.. В ней уже все настройки по соединению есть.. Зачем IdSMTP?

[mihali4]

shellexecute(handle,'Open', 'mailto:adres@domen3.domen2.ru?subj ect=Тема%20для%20письма&Body=Тело%2 0письма%0D%0A%0D%0Aтут%20тут%0D%0Aе щё%0D%0Aвот%20тут',nil, nil, sw_restore);

Разумеется надо добавить в uses
ShellAPI
И всё...

Пробелы не ставить.
Пробел: %20
Абзац: %0D%0A

[ScreN]

Вот именно этот код я и имел ввиду. Но как добавить именно файл в письмо.
Прикрепить его к письму?

[ScreN]

А вы знаете что вот это способ.
shellexecute(handle,'Open', 'mailto:adres@domen3.domen2.ru?subj ect=Тема%20для% 20письма&Body=Тело%20письма%0D%0A%0 D%0Aтут%20тут%0 D%0Aещё%0D%0Aвот%20тут',nil, nil, sw_restore);

Не поддерживает прикрепление файла к письму!