|
#1
|
|||
|
|||
Delphi + Wine
Доброго времени суток господа.
написал небольшую програмку для создания конфига для управляемых коммутаторов. данное по работает под 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; Прошу помощи в реализации данной функции. Спасибо. |
#2
|
||||
|
||||
На Куликсе/Лазарусе не пробовали писать?
— Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |
#3
|
|||
|
|||
Цитата:
Проблемма остается актуальной.. |
#4
|
|||
|
|||
Shell файл не запуститься из Wine. Перепишите на Lazarus, там есть класс TProcess, который запустит в Linux все что угодно.
|