Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.
Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...
{ **** UBPFD *********** by delphibase.endimus.com **** >> Проверка существования домена в глобальной сети Определяет существование указанного доменного имени пытаясь определить соответствующий IP-адрес. Зависимости: WinSock Автор: Dimka Maslov, mainbox@endimus.ru, ICQ:148442121, Санкт-Петербург Copyright: Dimka Maslov Дата: 3 июля 2002 г. ***************************************************** } functionCheckDomain(Domain: string
): Boolean; var
Error: DWORD; HostEntry: PHostEnt; Data: WSAData; Address: In_Addr; begin
Result := False; Error := WSAStartup(MakeWord(1, 1), Data); if
Error = 0 then
begin
HostEntry := gethostbyname(PChar(Domain)); Result := GetLastError = 0; end
; WSACleanup(); end
;