Обработчики событий в 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);
.....................................................................
No Comments