Понадобилось сделать смс рассылки. Был порадован массой готовых решений для Delphi. Остановился на https://smsc.ru/ Вот мой небольшой пример Цифры здесь означают (<id>, <количество sms>, <стоимость>, Читать на сайте автора.