RSS Feed

‘Локальная сеть’ Category

  1. Delphi: Как узнать свой IP

    0

    Февраль 1, 2012 by admin

    В Uses прописываем модуль WinSock function GetLocalIP:string; var WSVer:integer; wsaData: TWSAData; P: PHostEnt; Buf: array [0..127] of Char; begin WSVer:=$101; if WSAStartup(WSVer, wsaData) = 0 then begin if GetHostName(@Buf, 128) = 0 then begin
    keep reading