Hi Folks,
I have the following code which I want to port to Windows, but
I have no idea how the functionality of SelectText may be done
in Windows. I googled a lot but unfortunately I found nothing
that helped me out. How is something like that handled under
Windows ?
{$I-}
if debug then writeLOG('Sock2Text');
Sock2Text(sock,sin,sout);
if debug then writeLOG('reset');
reset(sin);
//if debug then writeLOG('rewrite');
//rewrite(sout);
{$I+}
if debug then WriteLOG('Reading requests...');
if (SelectText(sin,10000)>0) then begin
Addr_len:=SizeOf(cli_addr);
csock:=accept(sock, cli_addr,Addr_len);
Sock2Text(csock,ccsin,ccsout);
reset(ccsin);
rewrite(ccsout);
process_request;
Thanks for your help
Hartmut
--
Hartmut Eilers <hart...@eilers.net>
http://www.openmsr.org/ http://www.eilers.net
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
