- Код: Выделить всё
AProcess.CommandLine := 'ip link';
AProcess.Options := AProcess.Options + [poWaitOnExit, poUsePipes];
AProcess.Execute;
sl.LoadFromStream(AProcess.Output); // sl - TStringList
if sl.count > 0 then // count как положено > 0
.....
При использовании Parameters
- Код: Выделить всё
AProcess.Executable := 'Не знаю, что тут написать'
// AProcess.Executable := FindDefaultExecutablePath('bash'); // Думал так - не помогает.
AProcess.Parameters.Add('ip link');
AProcess.Options := AProcess.Options + [poWaitOnExit, poUsePipes];
AProcess.Execute;
sl.LoadFromStream(AProcess.Output); // sl - TStringList
if sl.count > 0 then // count = 0
.....
Матчасть (Linux) изучаю. Но как видите результат пока не очень.