Ну ось нарешті, ми добралися і до відправлення sms-повідомлень через sms -шлюз засобами Delphi. Теоретичну частину sms-шлюзу ми знаємо, а також знаємо як відправляти email-повідомлення засобами Delphi. Це нам все і стане в нагоді в даній статті. Давайте згадаємо, що відправка sms-повідомлень через sms -шлюз зводиться до бонально відправки email-повідомлення на Емаіл користувача стільникового зв'язку. Але не будемо забувати, що у того користувача, яким ми відправляємо sms-повідомлення через sms-шлюз повинна бути підключена дана послуга, інакше просто Вам на Емаіл буде приходити лист про те, що була доставлені повідомлення в зв'язку з тим, тим і тим . Так що давайте відправляти повідомлення з smtp-сервера Rambler. Тут все без різниці звідки відправляти, головне, щоб працював sms -шлюз у даного абонента і оператора. Як завжди для початку ми створюємо підключення, тобто підключаємося до нашого smtp-сервер. Для цього на подію форми OnCreate ми пишемо наступний код
Як бачите підключення у нас готове і тому йому підтвердження, якщо при компіляції нашої програми не вискачіло ніякої помилки, значить можна сказати «все добре«. Далі як ми вже проходили створюємо наше повідомлення і відправляємо його.