VPF::TServerSocket & TClientSocket - Форум программистов

Grom

Дата 28.8.2006, 06:11 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 183
Регистрация: 17.8.2006
Где: Москва

Репутация: 1
Всего: 1

Пытаюсь послать многострочное сообщение сообщения клиент->сервер. Приложение является одновременно клиент-сервером.

Код


void __fastcall TForm1::Button1Click(TObject *Sender)
{
Memo1->Lines->Add(Edit2->Text + ": "+Memo2->Lines->Strings[0]);// добавление сообщения на мой экран
for (i=1;i<Memo2->Lines->Count;i++)
 Memo1->Lines->Add(Memo2->Lines->Strings[i]);

ServerSocket1->Socket->Connections[0]->SendText(Edit2->Text + ": "+Memo2->Lines->Strings[0]); //отсылка сообщения
for (i=1;i<Memo2->Lines->Count;i++)
 ServerSocket1->Socket->Connections[0]->SendText(Memo2->Lines->Strings[i]);

(в Memo1 - окно чата, в Memo2 - текст сообщения, Edit2 - ник)

проблема в том что если конекчусь к 127.0.0.1 то всё ок работает, а если к удалённому адресу то после наатия на кнопку вываливается "List index out of bounds (0)" в строке посылки сообщения. В чём проблема - никак не пойму. smile

Это сообщение отредактировал(а) Grom - 28.8.2006, 06:11

--------------------

Хостинг, Vds, Dedicated serve, регистрация доменов (RU,com,net,org) - обращаться в icq.

Link90

Дата 28.8.2006, 06:39 (ссылка)

(нет голосов)

Загрузка ...

"Битый" пиксель

Профиль
Группа: Участник
Сообщений: 214
Регистрация: 25.11.2005
Где: Иркутск - середин а земли!

Репутация: 3
Всего: 7

Скорее всего нет коннекта между хостом и серверм! Проверь порты (они должны быть одинаковы)

Gordon

Дата 28.8.2006, 08:22 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 459
Регистрация: 9.7.2006

Репутация: нет
Всего: 6

Grom, посмотри здесь smile

--------------------

Romikgy

Дата 28.8.2006, 09:28 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 11
Всего: 146

Grom, а че не слать так

Код


ServerSocket1->Socket->Connections[0]->SendText(Memo2->Lines->Text);

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Grom

Дата 29.8.2006, 13:45 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 183
Регистрация: 17.8.2006
Где: Москва

Репутация: 1
Всего: 1

Romikgy, спасибо, я ступил smile

вообще надо было делать так:

Код


ClientSocket1->Socket->SendText(Memo2->Lines->Text);

Это сообщение отредактировал(а) Grom - 29.8.2006, 13:46

--------------------

Хостинг, Vds, Dedicated serve, регистрация доменов (RU,com,net,org) - обращаться в icq.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »