Discussion :

[ouiouioui]

Bonjour,

Je souhaiterais ajouter une fonction dans mon appli Android pour découvrir automatiquement les objets sur le réseau local.
Pour cela j'ai cherché sur le forum et sur Google comment lister les adresses locales.
J'ai trouvé ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
TIdStack.IncUsage;
try
  GStack.AddLocalAddressesToList(ComboBox1.Items);
finally
  TIdStack.DecUsage;
end;

Sur Windows j'obtiens les adresses locales de l'ordinateur exécutant la fonction ex 192.168.1.17
Mais sur Android sa me donne 127.0.0.1 au lieu de 192.168.1.24

Je débute sur Android, comment je peux récupérer l'adresse IP local ?

Après pour ma fonction je pensai tester la connexion sur un port donné en me basant sur l'adresse IP local récupéré ex avec 192.168.1.17 je teste 192.168.1.1 à 192.168.1.255
Dans les NVR on voit ce type de fenêtre sa affiche les IP, port et adresses MAC des caméras trouvés.
Avez-vous une idée de comment récupérer la rangé d’IP local ? Sa éviterai de scanner dans le vent sur ma Livebox j'ai mis de 192.168.1.15 à 192.168.1.150 donc en scannant jusqu’à 255 je perds du temps

Merci pour votre aide.

[ouiouioui]

Je parcours le dossier source rtl/android et https://developer.android.com/reference/ parce que l'aide Embarcadero sur Android je ne l'ai pas trouvé

je me dit l’IP va être dans les infos Wifi, je test le SSID j'ai "<unknow ssid>"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
Function GetWifiManager: JWifiManager;
Var
  WifiServiceNative: JObject;
Begin
  WifiServiceNative := TAndroidHelper.Context.getSystemService
    (TJContext.JavaClass.WIFI_SERVICE);
  If Not Assigned(WifiServiceNative) Then
    Raise Exception.Create('Could not locate Wfi Service');
  Result := TJWifiManager.Wrap((WifiServiceNative As ILocalObject).GetObjectID);
  If Not Assigned(Result) Then
    Raise Exception.Create('Could not access Wifi Manager');
End;
 
Function GetIPAdresses: String;
Var
  WifiManager: JWifiManager;
  ConnectionInfo: JWifiInfo;
Begin
  WifiManager    := GetWifiManager;
  ConnectionInfo := WifiManager.getConnectionInfo;
  Result         := JStringToString(ConnectionInfo.getSSID);
End;
 
Procedure THeaderFooterwithNavigation.Button1Click(Sender: TObject);
Begin
  ComboBox1.Items.Add(GetIPAdresses);
End;

en permissions j'ai mis tout ce qui concerne le wifi et internet.

je me suis inspiré d'un code ici :
https://stackoverflow.com/questions/...vice-from-code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

WifiManager wm = (WifiManager) getSystemService(WIFI_SERVICE); String ip = Formatter.formatIpAddress(wm.getConnectionInfo().getIpAddress());

je vais partir sur les Network interface c'est peut-la
C'est l'enfer sans aide

[Paul TOTH]

j'utilise ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
    var
      WifiManagerObj: JObject;
      WifiManager   : JWifiManager;
      WifiInfo      : JWifiInfo;
    begin
      WifiManagerObj := SharedActivityContext.getSystemService(TJContext.JavaClass.WIFI_SERVICE);
      WifiManager := TJWifiManager.Wrap((WifiManagerObj as ILocalObject).GetObjectID);
      WifiInfo := WifiManager.getConnectionInfo();
      Result := WifiInfo.getIpAddress;
    end;

mais il serait peut-être plus judicieux de passer par un Broadcast UDP (c'est ce que font les composants Tethering)