[Fordewind]

Посмотри дебаггером, что хранится в переменной Buffer в строке:

s:=COPYSTR(Buffer,1,STRPOS(Buffer,';')-1);

Доп.вопрос: Почему не используешь датапорт?