Die PowerShell würde ich komplett aus der Gleichung bzw. Befehlszeile nehmen, weil die unnötig ist. Netsh.exe ist bereits ein eigenes Programm. Folgendes sollte also ausreichen:
Delphi-Quellcode:
ShellExecute(0, 'runas', 'netsh.exe', 'interface set interface "ethernet" disable', nil, SW_HIDE);
{}
Dann würde ich die Rückgabe von ShellExecute auswerten, um herauszubekommen, warum es nicht funktioniert.
Grüße
Dalai