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


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