Skip to main content

Обработчики событий в Lazarus

Вызов скрипта Bash (пример):
----------------------------------------------
ExecuteProcess('/bin/bash','-c "bash ./stop.sh"');

......................................................................

Запуск терминала Konsole с внутренними командами bash (пример):
---------------------------------------------
ExecuteProcess('/bin/konsole, -e "start.sh"');

......................................................................

Вывод текста в Label по нажатию, из файла (пример):
--------------------------------------------
var
  s : TStringList;    // Эту и предыдущую строки поместить в блок переменных
  
  // Поместить в обработчик
  s := TStringList.Create;
  s.LoadFromFile('./serv-log.txt');
  Label1.Caption := s.Text;
  s.Free; 
  
......................................................................

Скрытие Label по нажатию на другую кнопку (пример):
-------------------------------------------

//Поместить в обработчик кнопки
Label1.Visible := not Label1.Visible;

......................................................................

Закрытие нужной формы по нажатию кнопки (с полным удалением её из памяти):
------------------------------------------
  FreeAndNil(Form1);
  
.....................................................................