Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Операционные системы > Linux (Ubuntu, Debian, Red Hat, CentOS, Mint)
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Ответ
 
Опции темы
Старый 04.12.2019, 18:04   #1
bacivir
Новичок
Джуниор
 
Регистрация: 04.12.2019
Сообщений: 2
По умолчанию FMX | Запуск из своего приложения

Народ, подскажите, как из своего приложения (FMX) запустить стороннее приложение в среде linux ?
и как получить список активных процессов в системе...
bacivir вне форума   Ответить с цитированием
Старый Вчера, 17:05   #2
bacivir
Новичок
Джуниор
 
Регистрация: 04.12.2019
Сообщений: 2
По умолчанию

Код:
type
  TStreamHandle = pointer;

  TLinuxUtils = class
  public

  end;


  function popen(const command: MarshaledAString; const _type: MarshaledAString): TStreamHandle; cdecl; external libc name _PU + 'popen';
  function pclose(filehandle: TStreamHandle): int32; cdecl; external libc name _PU + 'pclose';
  function fgets(buffer: pointer; size: int32; Stream: TStreamHAndle): pointer; cdecl; external libc name _PU + 'fgets';



.........
{Просто запускает комманду в терминале, не ждет завершения}
Procedure StartPr(path, arg: String);
var
  M : TMarshaller;
begin
  Handle := popen(M.AsAnsi(PWideChar(path+' '+arg )).ToPointer,'r');
end;

Procedure StopPr (path: String);
begin
   pclose(Handle);
end;
bacivir вне форума   Ответить с цитированием
Ответ
Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Защита своего приложения. egorzenit Общие вопросы Delphi 9 30.01.2015 03:07
запуск своего приложения при открытии документа nic_100 Помощь студентам 1 15.05.2010 20:23
Запуск программы из своего приложения. sashaslam Общие вопросы Delphi 12 31.01.2009 15:23
Запуск своего приложения одновременно с другим Sauronb|4 Общие вопросы Delphi 1 19.10.2008 18:45
Запуск своего модуля из чужой программы Volkogriz Общие вопросы Delphi 7 16.10.2007 05:19