TClientSocket & TServerSocket
Категория реферата: Рефераты по информатике, программированию
Теги реферата: курсовые, реферат китай курсовые работы
Добавил(а) на сайт: Giacint.
Предыдущая страница реферата | 1 2 3 4 5 | Следующая страница реферата
void __fastcall TForm1::Button2Click(TObject *Sender)
{
ServerSocket1->Active = true ;
// Делаем недоступную "Соединиться" (так как мы уже сервер)
Button3->Enabled = false
// Делаем доступную "Отключиться" (понятно зачем)
Button4->Enabled = true
Memo1->Lines->Add("Сервер создан") ;
}
Так наша программа стала сервером !
Давайте опишем клиента!(Кнопка "Соединиться")
В Edit3->Text впишите 127.0.0.1 - предполагается что тестироваться будет на одном компьютере (что б других не заморачивать:)
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Edit3->Text = ClientSocket1->Host // Присваиваем Клиенту Ай-Пи из Эдита
Edit3->Text = ClientSocket1->Address
ServerSocket1->Active = true ;
// Делаем недоступную "Создать" (так как мы коннектимся)
Button2->Enabled = false
// Делаем доступную "Отключиться" (понятно зачем)
Button4->Enabled = true
}
Вот Вы и написали тот минимум который надо для освоения компонентов !
Но кто хочет останавливаться ? А чат доделать ! Правильно пишем дальше:
Дальше будем описывать свойства компонентов Клиента и Сервера OnConnect (когда присоединился) .
Рекомендуем скачать другие рефераты по теме: пример реферата, диплом.
Предыдущая страница реферата | 1 2 3 4 5 | Следующая страница реферата