W jaki sposób zamienić domenę np. www.google.pl na adres IP w Delphi?
0
0
A czy w ogóle szukałeś zanim zapytałeś? Da się to zrobić przy użyciu modułu WinSock
. Ja sam mam poniższy kod z google. Zaryzukuje i go wkleje, ale nie odpowiem na 1000 kolejnych pytań, bo wedlug mnie to co podałem rozwiązuje "problem". Sam bym to z trudem wykombinował. Dlatego trzeba poszukać w google rozwiązania. Także Ludziska moje drogie. Piszę to co do niektórych. Dział Newbie czy nie. Problem z podstawami czy nie. Nieważne. Ogarnijcie się i zanim "nasmarujecie" pytanie na forum - googlować i kombinować samodzielnie, ino chyżo! ;P Zaytanie na forum to ostatecznośc. A ode mnie -1 za olewanie google.
function GetIPFromHost(const HostName : string) : string;
type
PaPInAddr = ^TaPInAddr;
TaPInAddr = array[0..10] of PInAddr;
var
I : integer;
Phe : PHostEnt;
PPtr : PaPInAddr;
GInitData : TWSAData;
begin
Result := '';
WSAStartup($101, GInitData);
Phe := GetHostByName(PChar(HostName));
if Phe = nil then
begin
Exit;
end;
PPtr := PaPInAddr(Phe^.h_addr_list);
I := 0;
while PPtr^[I] <> nil do
begin
Result := inet_ntoa(pptr^[I]^);
I := I + 1;
end;
WSACleanup;
end;