Помогите исправить ошибку в коде...

[prizrak1390]

Я создаю утилиту удалённого администрирования...

procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket);
.....
if cm('[',mg)='setdir' then begin {mg - это receivetext}
form5.directorylistbox1.Directory:=param('[',']',mg);
socket.SendText('dirinfo['+form5.DirectoryListBox1.Items.Text+']')
 end;
...

А теперь на русском...
cm - эта функция превращает строку setdir[c:\games\] в строку setdir

Значит мы получаем строку setdir[c:\games\] , затем передаём этот адрес в 5 форму в компонент filelistbox...а от туда все items передаю в таком виде
dirinfo[ -itemsЫ из filelistbox-].....

Возникает ошибка на подобие mterror с текстом из fiellistbox...
From Stilet: Топик то кто будет оформлять красиво? Пушкин?

[Stilet]

Где именно возникает?
Если на передаче по сокету то попробуй 'dirinfo['+form5.DirectoryListBox1.Items.Tex t+']' пихнуть в отдельную переменку, а уж е в параметры SendText пропиши. Когда-то примерно с таким столкнулся, как ни странно - помогло.

[prizrak1390]

toStilet
Попробовал...результат тот-же(

[prizrak1390]

Ребята выручайте....((

[prizrak1390]

Ошибку нашел и устранил.
Кому интересно то причина в том, что пересылать текст лучше вот так
clientsocket1.socket.sendtext....
Если пересылать так(из компонента)
socket.sendtext.... то происходит ошибка описанная мной выше.