Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.
Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...
usesWinsock; function
WinsockEnabled: Boolean; var
wsaData: TWSAData; begin
Result := True; case
Winsock.WSAStartup($0101, wsaData) of
WSAEINVAL, WSASYSNOTREADY, WSAVERNOTSUPPORTED: Result := False; else
Winsock.WSACleanup; end
; end
; procedure
TForm1.Button1Click(Sender: TObject); begin
if
WinsockEnabled then
ShowMessage('Winsock is enabled') else
ShowMessage('Winsock is disabled'); end
;