<html><head><meta name="qrichtext" content="1" /></head><body style="font-size:10pt;font-family:Sans Serif">
<p>Hi List:</p>
<p></p>
<p>My name is Diego and write from Spain. I need help. My problem resist on the primitive deprecated Accept. The interface is the following:</p>
<p></p>
<p>function Accept(</p>
<p></p>
<p> Sock: LongInt;</p>
<p></p>
<p> var Addr;</p>
<p></p>
<p> var Addrlen: LongInt</p>
<p></p>
<p>):LongInt;</p>
<p></p>
<p>For my program I need use this interface, and not the modern versions.</p>
<p></p>
<p>Really, I can't compile the program. The error is provacated by the parameter (var Addr;). In the documentation y can read about this type of argument and indicated that is trated of Variable parameters. I read more and opine that this argument need a reference to a structure INADDR. But a call the function this:</p>
<p></p>
<p>Saux := Accept(S1, @Addr, sizeof(Addr));</p>
<p></p>
<p>Where:</p>
<p></p>
<p>S1: is socket descriptor.</p>
<p>Addr; is a variable type <span style="font-weight:600">TInetSockAddr.</span></p>
<p></p>
<p><span style="font-weight:600">What is my error?. Sorry for my english. Thanks.</span></p>
<p></p>
</body></html>