All pastes #82372 Raw Edit

#1074;#1086;#1090;

public text v1 · immutable
·published 2006-07-08 12:00 UTC
rendered paste body
задача следующая есть переменная содержащая "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");
 }

но так не работает, если у вас есть время скажите что я делаю неправильно.