* 사용환경 : 델파이5 / Windows 98

* 에러 메시지 : Incompatible types: 'sockaddr_in' and 'PSOCKADDR'





아래의 함수는 소켓소스의 일부분입니다. 풀소스는 첨부되어있습니다.





function TSockets.SAccept: TSocket;

var

iStatus: integer;

len: integer;

begin

len := sizeof(sin);

if FMode = 0 then

SetTimeout;

FSocket := accept(FMSocket,sin,len); <------------------ 이곳에서 Error발생

if FMode = 0 then

begin

ResetTimeout;

ioctlsocket(FSocket,FIONBIO,FMode);

end;

if FMSocket < 0 then

SocketError(FSocket,'Accept',WSAGetLastError);

Result := FSocket;

end;





컴퍼넌트로 등록할려니 위와 같은 에러가 발생합니다.



Error의 의미는 당연히 아는데 어떻게 해야할지...



뭔가를 바꿔야 하는데 알수가 없네요



Delphi 2.0에서는 잘 사용하던것인데...



Delphi 5에서는 잘 안되네요.