хм.....я делал так, но у меня был эдит
buf:=#$38;
WriteS(Edit.text);
WriteD(TypeChat);
SendToServerEx(name);
мб там не text, a caption какой нибудь) щас делфю открою посмотрю, попробуй Memo.name
__________________
Последний раз редактировалось dyh9l, 12.05.2011 в 20:17.
|