Aypi Alma :)
-
ya ben delphiye ara wermiştim daha önce yaptığım server lsiteleyiciyi bile yapamadım o kadar unutmuşum herşeyi videoyu indirip anca yaptım ama videoda sitenin ip sini almak yok bana edit1 e yazdığımız sitenin ip sini nasıl alabilceğimi söler misiniz ?
-
ya ben delphiye ara wermiştim daha önce yaptığım server lsiteleyiciyi bile yapamadım o kadar unutmuşum herşeyi videoyu indirip anca yaptım ama videoda sitenin ip sini almak yok bana edit1 e yazdığımız sitenin ip sini nasıl alabilceğimi söler misiniz ?
--------------------------------------------------
başlıga bak içerige bak helal olsun:D -
sen bi soru soran başlık aç sonra başlığa bak hite bak..Soru sordum hit 3...Msn hackleme yaptım 50 oldu.Bir soru soruyorum delphi ile ilgili daha öönce yapmıştım wideo çekmiştim ara werince unuttum.şimdi yardım istiyorum..
-
exploit25 valla helal olsun sana Msn Hackleme herkez bakar şimdi kim bu aşık diye
-
konu başlıgını editmeni tavsiye ederim hani antikky liste yapıyor yani banlanacakları liste yapıyor haberin olsun yanlışlıkla ona bu linki cp yaoarum sonra yanlışlık oldu deme
-
uses Winsock;
function DetectHostIP(var IP: string): Boolean;
var
wsdata : TWSAData;
hostName : array [0..255] of char;
hostEnt : PHostEnt;
addr : PChar;
begin
WSAStartup ($0101, wsdata);
try
gethostname (hostName, sizeof (hostName));
hostEnt := gethostbyname (hostName);
if Assigned (hostEnt) then
if Assigned (hostEnt^.h_addr_list) then begin
addr := hostEnt^.h_addr_list^;
if Assigned (addr) then begin
IP := Format ('%d.%d.%d.%d', [byte (addr [0]),
byte (addr [1]), byte (addr [2]), byte (addr [3])]);
Result := True;
end
else
Result := False;
end
else
Result := False
else begin
Result := False;
end;
finally
WSACleanup;
end
end;
// Kullanimi:
procedure TForm1.Button1Click(Sender: TObject);
var IPAdres: string;
begin
if DetectHostIP(IPAdres) then
Label1.Caption := IpAdres
else
Label1.Caption := 'Ip Adresi alinamadi';
end; -
eyw. kardeş te benim istediim bu değil bu pc ip sini alıyo ben istediim sitenin ip sini istiyorum
-
BU PROG BİR WEBSİTESİNİN İPSİNİ BULABILIR
KOLAY GELSİN
http://www.hemenpaylas.com/download/926569/domaip.exe.html
-
kardeş ben websitesinin ip sini alan kodu istiyorum ama :)
Toplam Hit: 2330 Toplam Mesaj: 9
