16-04-2016, 11:18 AM
16-04-2016, 12:43 PM
يمكن الإستعانة بمواقع خارجية و هي تعطيك ال IP الخاص بك, مثل: http://ipinfo.io/ip
وبالدلفي تكتب:
وفقكم الله.
وبالدلفي تكتب:
كود :
Uses
idhttp;
procedure TForm1.Button1Click(Sender: TObject);
var IdHTTP1:TIdHTTP;
begin
IdHTTP1:=TIdHTTP.Create;
ShowMessage(IdHTTP1.Get('http://ipinfo.io/ip'));
end;وفقكم الله.
16-04-2016, 01:31 PM
السلام عليكم ورحمة الله وبركاته ،
وأيضا راجع هذا الموضوع :
http://delphi4arab.net/forum/showthread....=Ip+Adress
وأيضا راجع هذا الموضوع :
http://delphi4arab.net/forum/showthread....=Ip+Adress