FreePascal.ru

Brainenjii писал(а):{$IFDEF unix}
Shell('/path/to/bin');
{$ENDIF}
...
[/code]

Вот это не понял.
Что значит /path/to/bin, а имя исполняемого файла где использовать?

Это издержки того, что я недавно начал осваивать Linux.
В Linux надо говорить приложение с GUI или без, так я понимаю.
А все-таки Dolphin, например, без всякого диалога запускает программу, причем так как нужно (в терминале или без).

Добавлено спустя 11 минут 32 секунды:
Может я чего не понял, но как насчёт TProcess?

Смотри код выше. Разве это не TProcess?

Добавлено спустя 1 минуту 43 секунды:
"Курим" man execve http://www.opennet.ru/man.shtml?topic=execve&category=2&russian=0
Не забваем про fork
Это ...

Пишу (для души) нечто вроде похожее на Проводник. Хотелось, чтобы программы запускались как в Проводнике.
В последнее время увлекся Linux и написанием кроссплатформенных приложений.
Теперь по существу.
При запуске через эмулятор терминала:
xterm -e sh -c program_name
терминал открывается и тут же ...

Не понял.
Имеется консольная программа, выводящая какие-то результаты. Да "в консольном окошке".
Получается такие программы нельзя запускать из другой программы, что ли?

Нашел решение через TProcess:


procedure TForm1.ListView1DblClick(Sender: TObject);
var
s: string;
progr: pchar;
AProcess: TProcess;
begin
if ListView1&#46;Selected <> nil then
begin
s&#58;= path + ListView1&#46;Selected&#46;Caption;
progr&#58;= pchar(s);
AProcess &#58 ...

Спасибо.
Надобность в функции FindExecutable() отпала, т.к. ввел переменную path, в которой отслеживаю путь к файлу.
Кроме того, убрал функцию UTF8ToSys() и все заработало.

procedure TForm1&#46;ListView1DblClick(Sender&#58; TObject);
var
s&#58; string;
progr&#58; pchar;
begin
if ListView1&#46 ...

Здравствуйте!
У меня два вопроса.
1. Нужно программно определить полный путь по заданному имени файла. В Windows имеется функция FindExecutable().
Есть ли подобная функция для Linux?
2. В TreeView выведено содержимое каталога. Необходимо по двойному щелчку по имени исполняемого файла запустить его ...