Delphi уроки - Почтовик и Автозаполнение полей
В этом уроке я покажу вам, как открыть почтовую программу установленную в системе по умолчанию и на автомате заполнит необходимые поля для отправки сообщения (кому, копия, текст сообщения).
Ну что поехали... Я надеюсь что Delphi у вас уже открыт, поэтому сразу создаем новый проект и кидаем на форму один компонент Button с закладки Standard. Больше на форме у нас ничего не будет.
Теперь переходим в код и добавим в раздел uses модуль ShellApi. Дальше, создаем обработчик событий на кнопке, между begin и end прописываем вот такой код:
ShellExecute(GetDesktopWindow,'open',
'mailto:Имя получателя
'?Subject=Тема'+
'&Body=Текст сообщения'+
'&CC=Копия'+
'&BCC= Скрытая копия',
0,0,SW_SHOWNORMAL);
Запускаем - тестим - улыбаемся )
Вот и всё, в моём The Bat код работает, прям базовая отправка смс через компьютер получается ))
P.P.S. Хотите вперед всех остальных посетителей сайта получать свежие Видео уроки, Аудио подкасты, статьи по Delphi.
Участвовать в конкурсах и постепенно вливаться в нашу команду ?!
Тогда прямо сейчас подписывайтесь на бесплатную мультимедийную рассылку сайта delphiexpert.ru
Нас уже больше чем 1500 человек !
Похожие материалы
- ASPack - Компрессор исполняемых файлов
- Програмно открываем CD-rom
- Зеленая кнопка
- Компонент для сортировки listview
- Поиск файлов на компьютере (mfilescan)
Последние из рубрики
- Delphi видео урок-OpenGL часть 4. Прозрачность
- Отвязное видео с подведением итогов конкурса будильников
- Delphi уроки - Drag&Drop, перетаскивание строк в компоненте DBGrid