---|Ветка была без названия|---

← →
Reindeer Moss Eater © (2003-11-04 10:37) [120]

Если [118], то
TIdTCPServer не имеет обработчика OnExecute.

← →
h0use © (2003-11-04 10:52) [121]

Имеет, в том то и дело!

← →
Digitman © (2003-11-04 11:57) [122]

> h0use

я устал нянькаться с тобой

> Имеет, в том то и дело!

я тебе что сказал в [118] ?

>> только OnStart и OnStop

ты, сударь, упрям как осел и не слушаешь что тебе говорят !

По-русски ты, видимо, слабо понимаешь, а исходные тексты Борланда читать и изучать (во свое же благо) не желаешь

продолжай в том же духе))... успехов !

← →
h0use © (2003-11-04 12:07) [123]

Дык я и оставил только OnStart и OnStop, как ты сказал...если яуберу OnExecute TCP сервера, куда же мне вешать обработку соединения?

> "#100061 Connection refused

означает что сервер не стартовал

вопреки твоему утверждению [119] что, якобы, "Сервер стартует"

> в логах пишется какая-то лабуда

не "лабуда", а реакция сервис-менеджера на невозможность найти зарегистрированное описание для EventType = 1 (EVENTLOG_ERROR_TYPE) и ID=0

лезем в хэлп и не вылазим оттуда, пока не наводим в голове порядок :

Sends an error message to the event log.

procedure LogMessage(Message: String; EventType: DWord = 1; Category: Integer = 0; ID: Integer = 0);

Description

LogMessage sends an error message to the event log when an error or exception occurs. By default the EventType is EVENTLOG_ERROR_TYPE (usually indicating a loss of functionality or data) and the category and ID are zero. For example, if a service cannot be loaded as the system boots, it can log an error event, and the category and ID are zero.

The EventType specifies the type of event being logged. This parameter can be one of the following values:

Value Meaning

EVENTLOG_ERROR_TYPE Error event

EVENTLOG_WARNING_TYPE Warning event

EVENTLOG_INFORMATION_TYPE Information event

EVENTLOG_AUDIT_SUCCESS Success Audit event

EVENTLOG_AUDIT_FAILURE Failure Audit event

The Category parameter specifies the event category, which is source-specific information and can have any value.

The ID parameter specifies the event identifier, which is the message that goes with this event as an entry in the message file associated with the event source.

После наведения в голове порядка делаем резюме : "лабуда" есть реакция на вызов тобой метода LogMessage() в событии TService.OnStart (в предположении, что LogMessage с ID=0 более нигде кроме TService.OnStart/OnStop в тексте парограммы не фигурирует). Если LogMessage был вызван, то это означает только одно - произошло исключение при вызове TCPServer.Active := True, и сервер не перешел в активное состояние. Если он не стал активным, то сервис не стартует ! Согласно моему простейшему отладочному варианту кода... А это означает , что ты снова пытаешься мне лапшу вешать.

Все хорошо, кроме одного НО, сервис-то стартует, т.е. как по логике, если started:=false то и в сервисах мы видим, что он не должен показываться как Start, а у меня-то он наоборот стартует.

---|Ветка была без названия|--- Найти похожие ветки