Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Выгрузка программы-сервера без ведома программы-клиента [D7, WinXP]

B-boy-Dimo-N © (2005-08-19 19:24:00)
Суть вопроса:
запустили программу-сервер и программу-клиент.
допустим в программе-сервер произошла критическая ошибка, и её закрыли.
Как клиенту узнать, что сервера нет ?
насколько я предполагал клиент отправляет серверу информацию
ClientSkt.Socket.SendText('...');
в этом случае должна произойти ошибка, или я не прав ?
далее, обрабатываем её
procedure TForm1.ClientSktError(...);
begin
ClientSkt.Active := False;
ClientSkt.Close;
end;
Если это не правильный ход мыслей, поправте меня.

B-boy-Dimo-N (2005-08-19 19:27:00) [1]
если связь с сервером нарушается, то данная программа-клиент должна стать сервером.
procedure TForm1.ClientSktError(Sender: TObject; Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer);
begin
ClientSkt.Active := False;
ClientSkt.Close;

ServerSkt.Open;

ClientSkt.Open;
end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »