Тема: ICQ бот
Показать сообщение отдельно
  #3  
Старый 13.06.2011, 17:12
Аватар для Gravitas
Gravitas Gravitas вне форума
Новичок
  
Регистрация: 12.06.2011
Сообщения: 61
Версия Delphi: 7
Репутация: 38
По умолчанию
OnMessageRecv:
Код:
if copy(msg,1,10) = '!сохранить' then begin
  Listbox.Items.Add(Copy(msg,13,length(msg-1)));
end;
__________________
Gravitas