Ну вот наконец-то, мы добрались и до отправке sms-сообщений через sms-шлюз средствами Delphi. Теоретическую часть sms-шлюза мы знаем, а также знаем как отправлять email-сообщения средствами Delphi. Это нам все и пригодится в данной статье. Давайте вспомним, что отправка sms-сообщений через sms-шлюз сводится к бональной отправки email-сообщения на эмаил пользователя сотовой связи. Но не будем забывать, что у того пользователя, которому мы отправляем sms-сообщения через sms-шлюз должна быть подключена данная услуга, иначе просто Вам на эмаил будет приходить письмо о том, что не была доставленое сообщение в связи с тем, тем и тем. Так что давайте отправлять сообщения с smtp-сервера Rambler. Тут все без разницы откуда отправлять, главное, чтобы работал sms-шлюз у данного абонента и оператора. Как всегда для начала мы создаем подключение, то есть подключаемся к нашему smtp-серверу. Для этого на событии формы OnCreate мы пишем следующий код
Метки: sms-шлюзы, отправка почты на Delphi, отправка смс, отправка смс средствами Delphi через смс-шлюзы
- TidSMTP
- TidAntiFreeze
- TButton
Метки: idSMTP, sms-шлюзы, отправка почты на Delphi, отправка смс, отправка смс средствами Delphi
В этой статье я хотел бы поговорить про sms-шлюз, а точнее как средставми Delphi отправить sms-сообщение через sms-шлюз вашего телефонного оператора. Скажу сразу, что к отправке сообщений, через sms-шлюз средствами Delphi мы будем подходить постепенно, то есть в этой части мы рассмотрим только теоритическую часть, а затем уже приступим к программированию, главное понять тонкости этой технологии. Хочу сказать так, что любой оператор сотовой связи имеет свой sms-шлюз, ну время сейчас такое, но не у каждого они бесплатные или не у каждого они вообще открыты для кого либо. Например у моего оператора сотовой связи, sms-шлюз платный, и соответсвенно я не смогу со своей программы отправлять сообщения через шлюз любому человеку этого оператора сотовой связи, если у него не подключена эта услуга. У моего оператора эта услуга платная и соответственно необходимо мне отправить текст сообщения на номер смс, чтобы ее подключить.
Метки: sms-шлюзы, отправка смс, отправка смс средствами Delphi
Многие задавались вопросом — А как же сделать прозрачный фон в TGroupBox. Этот прозрачный фон и вовсе ненужен, если Вы в своей программе используете скины например, то есть готовые компоненты, которые позволяют скинизировать Вашу программу, а также если Вы не используете никакого дизайна в своей программе. А теперь давайте поступим так, установите на форму компонент TImage и в свойстве Align задайте — alClient. Теперь в свойстве Picture компонента TImage загрузите какую-нибудь фотографию. Отлично, многие с помощью данного компонента делаю себе дизайн программы, как в частности я сделал в AS ImageDecoder. Теперь давайте на наш компонент TImage установим компонент TLabel. Отлично теперь скомпилируем программу и видим, какой некрасивый фон написана Caption TLabel. Но тут решается все просто, у данного компонента (TLabel) есть замечательное свойство — Transparent, при установки которого в значение True, убирается данный фон и становится прозрачным. Такого в компоненте TGroupBox например нету и если мы его установим на TImage, увидим тоже самое, что не красиво смотрится и фон не прозрачный.
Метки: TGroupBox, прозрачный фон TGroupBox, прозрачный фон в компонентах
Довольно много есть задач, при которых нужно собрать все внутренние например ссылки со страницы, или вообще все. Так вот в данной статье мы об этом и поговорим, уже много прошли статей по парсингу и смысл здесь не поменяется, все теже компоненты, все таже наша функция парсинга страниц, здесь нам необходимо только лишь добавить то, чтобы у нас собирались все ссылки, а не первая попавшееся. Для этого я решил использовать метки, самому даже смешно, метки ;))). Ну это дело поправимо, мы можем и цикл использовать, тут как говорится на вкус и цвет товарищей нет. Конечно с регулярными выражениями тут все просто, но я до них пока что не дошел. Так что пробуем и делаем пока, что как умеем.
Повторюсь насчет компонентов, которые нам необходимы
- TIdHTTP
- TIdAntiFreeze
- TButton1
- TProgressBar
Вроде бы все компоненты перечислил. Итак приступим к нашей работе.
Метки: idAntifreeze, Idhttp, парсинг, парсинг html-страниц, парсинг данных, получение ссылок с сайта