[ Обновленные темы · Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Фейк с отправкой в icq
Hacker
Offline
Дата: Пятница, 23.03.2012, 13:37 | Сообщение # 1
Группа: Администратор
Сообщений: 366
Репутация: off
Запускаем Delphi (у меня лично Delphi 7), далее кидаем на форму ICQClient1 с вкладки Samples (скачать компонент можно здесь), затем кидаем button1 с вкладки Standart и Edit1 с этой же вкладки.

Button1
Пишем в обработчике событии OnClick:
Code
ICQClient1.UIN:=123456789; // Номер ICQ, с которого будут приходить сообщения
ICQClient1.Password:='123'; // Пароль от этого номера
icqclient1.Login(); // Коннектимся

ICQClient1
В обработчике события OnLogin пишем
Code
Icqclient1.SendMessage(ICQ номер на который будут приходить сообщения,Edit1.text);

В обработчике события OnMsgAck пишем:
Code
icqclient1.Disconnect; // дисконнект после отправки сообщения

вот и все готово smile


Персонажи для Галактики знакомств
Hacker
Offline
Дата: Четверг, 26.07.2012, 13:26 | Сообщение # 2
Группа: Администратор
Сообщений: 366
Репутация: off
Вот сам исходник кому лень делать

Скачать


Персонажи для Галактики знакомств
  • Страница 1 из 1
  • 1
Поиск: