Доброго времени суток уважаемые

Как всегда буду краток и информативен:
Ситуация: В программу посредством протокола ICQ, передается сообщение которое записывается в "Msg".
Сообщение перехватывается таким образом:
Код:
if Msg= ('!Set текст текст текст') then // "Текст текст текст" - изменяемые параметры, "!Set" - сообщение на которое должна реагировать программа
begin
--------
end;
Задача: заставить программу, при получении сообщения с содержанием "!Set текст текст текст", реагировать на !Set, т.е. при получении данного сообщения записывать все что после !Set, в memo1

Желательно пример
