Показать сообщение отдельно
  #1  
Старый 21.10.2010, 20:37
Аватар для ALexandr555
ALexandr555 ALexandr555 вне форума
Специалист
 
Регистрация: 09.10.2010
Адрес: Тольятти
Сообщения: 803
Версия Delphi: Delphi 7
Репутация: 2064
По умолчанию ICQpeg.Pages[i].Hint = UIN

мы ищем есть ли вкладка с Hint = UIN
и как нам сделать если мы нашли то в мемо находящийся в этой вкладке добавляем (GetNickFor(StrToInt(UIN)) + ' (' + UIN + ') :'+ Msg)
может так?
Код:
for i := 0 to ICQpeg.PageCount - 1
do
if ICQpeg.Pages[i].Hint = UIN then begin
  TMemo(ICQpeg.Page.hint = UIN)Lines.Add(GetNickFor(StrToInt(UIN)) + ' (' + UIN + ') :'+ Msg);
  Exit;
  end;
Ответить с цитированием