Ну вот наконец-то, мы добрались и до отправке sms-сообщений через sms-шлюз средствами Delphi. Теоретическую часть sms-шлюза мы знаем, а также знаем как отправлять email-сообщения средствами Delphi. Это нам все и пригодится в данной статье. Давайте вспомним, что отправка sms-сообщений через sms-шлюз сводится к бональной отправки email-сообщения на эмаил пользователя сотовой связи. Но не будем забывать, что у того пользователя, которому мы отправляем sms-сообщения через sms-шлюз должна быть подключена данная услуга, иначе просто Вам на эмаил будет приходить письмо о том, что не была доставленое сообщение в связи с тем, тем и тем. Так что давайте отправлять сообщения с smtp-сервера Rambler. Тут все без разницы откуда отправлять, главное, чтобы работал sms-шлюз у данного абонента и оператора. Как всегда для начала мы создаем подключение, то есть подключаемся к нашему smtp-серверу. Для этого на событии формы OnCreate мы пишем следующий код

Читать полностью »

Метки: , , ,



Admin Опубликовано: 26 Июль 2010
Плавно подходим мы к отправке sms-сообщений через sms-шлюз операторов сотовой связи. В данной статье мы рассмотрим как вообще можно отправить сообщение (email-сообщение) средствами Delphi. Отсылать email-сообщения мы будем через TidSMTP. То есть получается, что, нам надо знать адресс smtp-сервера, с которого мы будем отсылать сообщение. Обычно, сервисы, которые предоставляют услуги почты, перед их адрессом приписывается smtp и получается адресс smtp-сервера. В итоге возьмем rambler.ru. Соответственно, подставим smtp и получим smtp.mail.ru — это и есть адресс нашего smtp-сервера, порт почти везде одинаков данных серверов и он равняется 25. Это нам все пригодится при подключении к нашей серверу. Далее нам необходим наш пароль и логин с rambler.ru для подключения к нашей почте, с которой мы будем отсылать сообщения. Теперь приступим на форму установим следующие компоненты
  • TidSMTP
  • TidAntiFreeze
  • TButton
Компоненты на форме, значит осталось как ничего подключиться к нашему серверу и отправить сообщения. Для подключения к нашему серверу на событие формы OnCreate напишем следующий код

Читать полностью »

Метки: , , , ,

В этой статье я хотел бы поговорить про sms-шлюз, а точнее как средставми Delphi отправить sms-сообщение через sms-шлюз вашего телефонного оператора. Скажу сразу, что к отправке сообщений, через sms-шлюз средствами Delphi мы будем подходить постепенно, то есть в этой части мы рассмотрим только теоритическую часть, а затем уже приступим к программированию, главное понять тонкости этой технологии. Хочу сказать так, что любой оператор сотовой связи имеет свой sms-шлюз, ну время сейчас такое, но не у каждого они бесплатные или не у каждого они вообще открыты для кого либо. Например у моего оператора сотовой связи, sms-шлюз платный, и соответсвенно я не смогу со своей программы отправлять сообщения через шлюз любому человеку этого оператора сотовой связи, если у него не подключена эта услуга. У моего оператора эта услуга платная и соответственно необходимо мне отправить текст сообщения на номер смс, чтобы ее подключить.

Читать полностью »

Метки: , ,

Admin Опубликовано: 25 Июль 2010

Многие задавались вопросом — А как же сделать прозрачный фон в TGroupBox. Этот прозрачный фон и вовсе ненужен, если Вы в своей программе используете скины например, то есть готовые компоненты, которые позволяют скинизировать Вашу программу, а также если Вы не используете никакого дизайна в своей программе. А теперь давайте поступим так, установите на форму компонент TImage и в свойстве Align задайте — alClient. Теперь в свойстве Picture компонента TImage загрузите какую-нибудь фотографию. Отлично, многие с помощью данного компонента делаю себе дизайн программы, как в частности я сделал в AS ImageDecoder. Теперь давайте на наш компонент TImage установим компонент TLabel. Отлично теперь скомпилируем программу и видим, какой некрасивый фон написана Caption TLabel. Но тут решается все просто, у данного компонента (TLabel) есть замечательное свойство — Transparent, при установки которого в значение True, убирается данный фон и становится прозрачным. Такого в компоненте TGroupBox например нету и если мы его установим на TImage, увидим тоже самое, что не красиво смотрится и фон не прозрачный.

Читать полностью »

Метки: , ,

Admin Опубликовано: 25 Июль 2010

Довольно много есть задач, при которых нужно собрать все внутренние например ссылки со страницы, или вообще все. Так вот в данной статье мы об этом и поговорим, уже много прошли статей по парсингу и смысл здесь не поменяется, все теже компоненты, все таже наша функция парсинга страниц, здесь нам необходимо только лишь добавить то, чтобы у нас собирались все ссылки, а не первая попавшееся. Для этого я решил использовать метки, самому даже смешно, метки ;))). Ну это дело поправимо, мы можем и цикл использовать, тут как говорится на вкус и цвет товарищей нет. Конечно с регулярными выражениями тут все просто, но я до них пока что не дошел. Так что пробуем и делаем пока, что как умеем.

Повторюсь насчет компонентов, которые нам необходимы

  • TIdHTTP
  • TIdAntiFreeze
  • TButton1
  • TProgressBar

Вроде бы все компоненты перечислил. Итак приступим к нашей работе.

Читать полностью »

Метки: , , , , ,

Страница 37 из 41« Первая...102030...3536373839...Последняя »