Watch, Follow, &
Connect with Us

For forums, blogs and more please visit our
Developer Tools Community.


ID: 15057, Socket Server

by Dmitri Usov Email: Anonymous


Download Details
FTP  download also available 0 bytes
CDN Login Required to Download. (You will be redirected to the login page if you click on the Download Link)
To download this, you must have registered:
A free membership

For Delphi, Version 1.0  to 1.0 25 downloads
Copyright: No significant restrictions


Size: 0 bytes
Updated on Sat, 15 Jul 2000 00:00:00 GMT
Originally uploaded on Sat, 15 Jul 2000 00:00:00 GMT
Description
I have noticed a little strange behaviour of SctSrvr.exe.
When there is a connection through a socket any (I suspect)DDE server cannot start.
I suspect there is a little mistake in the ScktMain.pas

procedure TSocketDispatcherThread.ClientExecute;
.......
while not Terminated and FTransport.Connected do
try
case MsgWaitForMultipleObjects(1, Event, False, WaitTime, QS_ALLEVENTS) of
WAIT_OBJECT_0:

I believe that the mistake is the QS_ALLEVENTS constant used, which prevents the WM_DDE_INITIATE from properly handling.
I suppose it must be QS_ALLINPUT, because QS_ALLEVENTS does not include QS_SENDMESSAGE constant, thus ignoring the messages sent directly via SendMessage API.

   Latest Comments  View All Add New

Move mouse over comment to see the full text

Server Response from: ETNACDC03