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

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

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

TCPServer и завершение виндовс98

avakss © (2003-12-15 13:49:00)
Я кинул на форму TCPServer и при запуске tcpserver.listen. Как остановить этот сервер при завершении виндовс?
У меня код

function TForm1.KOLFormMessage(var Msg: tagMSG;
var Rslt: Integer): Boolean;
begin
result:=false;
if msg.message=messages.WM_QUERYENDSESSION then
begin
tcpserver1.Disconnect;
rslt:=0;
form.Close;
end;
end;

Так вот disconnect и rslt:=0 или 1 не даёт виндовс завершиться.

avakss (2004-01-30 17:23:00) [1]
to Fighter2

если такой умный, то сначала поищи в KOLTCPServer команду Active
Если найдёш--значит тебе к Билу Гейтсу на работу нужно устраиваться, а то зря мозги париш по мелочам.

Gandalf (2004-01-28 12:07:00) [2]
KOLICS

Aug (2004-01-27 23:37:00) [3]
Люди, а есть под КОЛ МСК компоненты TCP/UDP клиента и сервера????

Fighter2 (2004-01-23 13:16:00) [4]
В 3.14#ду кролика!
Для остановки TCPServer надо Active:=false;
И все :)))

avakss (2003-12-17 10:05:00) [5]
так в том то и дело, что и демка при завершении виндовс висит и не закрывается. windows98, TCPServer от Vorobets Roman

SPeller (2003-12-17 05:27:00) [6]
Ну до чегоже народ ленивый! Там же в самом архиве демка есть, и всё там прекрасно закрывается! :)

avakss (2003-12-16 19:29:00) [7]
ни Free, ни Disconnect не помогает --всё равно окно висит на экране, может у кого есть TCPServer рабочий?

Vladimir Kladov (2003-12-16 15:11:00) [8]
Может, Free ему сказать, а дальше он сам уйдет?

Avenger (2003-12-16 13:27:00) [9]
QueryEndSession обработай это событие, там и останавливай сервер

avakss (2003-12-16 12:12:00) [10]
проблема скорее в TCPServer я не знаю как его правильно закрыть при завершении виндовс -- к серверу не конектился, а просто TCPServer.listen . Версия КОЛ 1.86,1.87, винд98, дельфи7

avakss (2003-12-16 12:11:00) [11]
проблема скорее в TCPServer я не знаю как его правильно закрыть при завершении виндовс -- к серверу не конектился, а просто TCPServer.listen

BelchonokH (2003-12-15 21:55:00) [12]
Вместо форм.клоус мне помогало terminateProcess(form1.form.Handle,1);

Boguslaw (2003-12-15 21:13:00) [13]
What is KOL Version ? Try the newest !

Наверх

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