[miha)]

Тогда тебе предеться это все провернуть в 2 подхода
сначала присваиваешь IP автоматически:
ShellExecute(Handle, 'open','netsh','interface ip set address name="Подключение по локальной сети" dhcp', nil, SW_SHOWNORMAL);
а потом назначаешь как тебе нужно:
ShellExecute(Handle, 'open','netsh','interface ip set address name="Подключение по локальной сети" static 192.168.1.228 255.255.255.0', nil, SW_SHOWNORMAL);