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); 


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