Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.08.2012, 17:49   #1
DeTLeR
Пользователь
 
Регистрация: 06.04.2012
Сообщений: 22
Вопрос Работа с ICQclient

В чем ошибка?
Код:
procedure TForm1.ICQClient1MessageRecv(Sender: TObject; Msg, UIN: String);
var
i:Integer;
baza: array[1..50] of PChar;
LogFile: TextFile;
ICQ: Cardinal;
begin
baza[1] :='111';
baza[2] :='123456789';
icq := StrToInt(UIN);
Memo1.Lines.Add(UIN + ' Íàïèñàë: ' + Msg);
ICQClient1.SendMessage(icq, memo2.text);
  if Msg=i then
    begin
      icqclient1.SendMessage(icq,'Вы хотите купить этой уйн? "Да" "Нет" ' + baza[i]);
      end;
end;
DeTLeR вне форума Ответить с цитированием
Старый 10.08.2012, 18:32   #2
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,442
По умолчанию

Не знаю, а есть ошибка?
Человек_Борща вне форума Ответить с цитированием
Старый 10.08.2012, 18:49   #3
BDA
МегаМодератор
СуперМодератор
 
Аватар для BDA
 
Регистрация: 09.11.2010
Сообщений: 7,285
По умолчанию

Из бросившегося в глаза:
Msg: String
i: Integer
(несоответствие типов, но компилятор должен подсказать, где ошибки )
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
BDA вне форума Ответить с цитированием
Старый 10.08.2012, 21:06   #4
DeTLeR
Пользователь
 
Регистрация: 06.04.2012
Сообщений: 22
По умолчанию

как исправить?
DeTLeR вне форума Ответить с цитированием
Старый 10.08.2012, 21:37   #5
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,442
По умолчанию

Привести или строку к числу или чисто в строку и сравнить. В люой книге написано про приведение типов, и уж темболее про преобразование.
Человек_Борща вне форума Ответить с цитированием
Старый 10.08.2012, 22:00   #6
DeTLeR
Пользователь
 
Регистрация: 06.04.2012
Сообщений: 22
По умолчанию

исправил но сообщения не приходит когда выбираем ID

Последний раз редактировалось DeTLeR; 10.08.2012 в 22:12.
DeTLeR вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
IcqClient DKENT Работа с сетью в Delphi 1 24.08.2011 15:56
Работа ICQClient Volkogriz Общие вопросы Delphi 1 29.01.2011 12:29
ICQClient BoT_T Работа с сетью в Delphi 7 21.09.2010 15:53
ICQClient DeDoK Компоненты Delphi 7 05.07.2010 05:59
работа с ICQClient KWNlnc Компоненты Delphi 9 28.04.2010 00:03