这应该是:在WinXP以上作业系统(不含WinXP)用 RAD Studio 10.2.2开发的程序(*.EXE),放在WinXP上运行时, 使用ws2_32.dll修正 Windows Socket 2.0 出现的错误。
----------------------------------------------
-
10.2.3 function inet_pton; external ws2_32 name 'inet_pton' delayed;
{$IFDEF MSWINDOWS} // Windows Vista and later only support inet_pton if Win32MajorVersion >= 6 then begin {$ENDIF} i := inet_pton(2, MarshaledAString(AddressToBytes(Address)), @Result.sin_addr); if i <> 1 then Result.sin_addr.s_addr := INADDR_NONE; {$IFDEF MSWINDOWS} end else Result.sin_addr.s_addr := inet_addr(MarshaledAString(AddressToBytes(Address))); {$ENDIF}
大家说,这个 DLL 还有用吗
----------------------------------------------
(C)(P)Flying Wang