Delphi-PRAXiS - IP wechsel

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)

- - IP wechsel (https://www.delphipraxis.net/181706-ip-wechsel.html)

Hallo habe ein Problem

Mit folgenden Code möchte ich meine Local IP Addresse ändern.

Delphi-Quellcode:

			s:=tstringlist.Create;

s.LoadFromFile('Netzwerkeinstellung.txt');

ShellExecute(application.Handle,'open','C:\Windows\System32\netsh', 'interface ip set address name = "Drahtlosnetzwerkverbindung" source = static addr = 192.168.178.26 mask = 255.255.255.0 gateway = 192.168.178.1', Nil, SW_SHOWNORMAL);

was auch funktioniert

jetzt möchte ich aber die daten wie "Drahtlosnetzwerkverbindung" aus einer stringlist nehmen.

Delphi-Quellcode:

			ShellExecute(application.Handle,'open','C:\Windows\System32\netsh', 'interface ip set address name = '+s.strings[0]+' source = static addr = 192.168.178.26 mask = 255.255.255.0 gateway = 192.168.178.1', Nil, SW_SHOWNORMAL);
		

er zeigt mir nen fehler an

incompatible typen string und pansichar

wie kriege ich das gelöst

Probier mal aus alle Parameter in

Delphi-Quellcode:

PCHAR('C:\Windows\System32\netsh')

zu ändern.

Durch casten:

Delphi-Quellcode:

			ShellExecute(application.Handle,'open','C:\Windows\System32\netsh', PAnsiChar('interface ip set address name = "'+s.strings[0]+'" source = static addr = 192.168.178.26 mask = 255.255.255.0 gateway = 192.168.178.1'), Nil, SW_SHOWNORMAL);
		

Danke euch funtz jetzt

"C:\Windows\System32\" kann man weglassen.

Manche Befehle funktionieren nur als Admin,
dann so:

Delphi-Quellcode:

			var strParams : string;

begin

strParams:= '.....';

RunAsAdmin(Application.Handle,'netsh', strParams);

...