задача следующая есть переменная содержащая "char *message" следующее: :lirc_client!~lirc_clie@81.177.8.166 JOIN :#mirror13 :irc.kgts.ru 353 lirc_client = #mirror13 :lirc_client lenka42197 :irc.kgts.ru 366 lirc_client #mirror13 :End of NAMES list. мне надо обработать каждую строку. понятно что для обработки каждой строки необходимо вытаскивать их поочереди. я это делаю так: char * pch; pch = strtok (message,"\n"); while (pch != NULL) { Form1->Memo1->Lines->Add(pch); pch = strtok (NULL,"\n"); } но так не работает, если у вас есть время скажите что я делаю неправильно.