1 Reply by AlvinBagirov

(3 replies, posted in Russian)

DriveSoft wrote:

Приветствую,


Это можно сделать с помощью скрипта, создав событие OnClick у компонента Panel, пример:

procedure Form1_Panel1_OnClick (Sender: string);
begin
    if Form1.Panel1.Color = clRed then Form1.Panel1.Color := clGreen else Form1.Panel1.Color := clRed;
end;

Благодарю. Однако возникла проблема: открываю скрипт, переименовываю Form1 (скрипт из вашего сообщения) в FLOOR7 (форма, в которой необходима работа), после чего происходит ошибка BEGIN 5:1

Go to forum: Russian

2 Topic by AlvinBagirov

(3 replies, posted in Russian)

Добрый день.

Подскажите, пожалуйста, возможно ли сделать так, чтобы при нажатии на кнопку/панель, она изменила свой цвет? Делаю базу данных для офисного здания, поэтажную планировку. Данную функцию хотелось бы внедрить для изменения статуса помещения со свободного (панель зеленого цвета) на занятое (панель красного цвета), либо наоборот с помощью одного клика по кнопке/панели.

Если есть более хорошее или качественное предложение, с радостью рассмотрю.

Благодарю за любую помощь.

Go to forum: Russian