![]() |
|
|
#1
|
|||
|
|||
|
Доброго времени суток господа.
написал небольшую програмку для создания конфига для управляемых коммутаторов. данное по работает под Wine-ом в ос ubuntu/ для полноценной её работы необходимо реализовать следующую функцию: есть небольшая форма в которой указывается скорость ком порта, конфигурационный файл с командами для свича и com-интерфейс. из этой формы у меня создается sh-исполняемый файл такого формата. Код:
#!/bin/sh
sudo chmod o+rwx/dev/ttyUSB0
stty -F /dev/ttyUSB0 cs7 cstopb -ixon raw speed 9600
file="/home/user/ACS_v2/dlink.cfd"
inputfile=$file
while read myline
do
echo " " >/dev/ttyUSB0
echo " " >/dev/ttyUSB0
echo "${myline}" >/dev/ttyUSB0
done < $inputfileфайл вызывается следующей командой: Код:
procedure TSendData.Button1Click(Sender: TObject);
ShellExecute(0, PChar('open'), PChar('console.sh'), nil, nil, SW_RESTORE);
end;Прошу помощи в реализации данной функции. Спасибо. |