Вниз
Скачать: CL | DM;

Кнопки   Найти похожие ветки 

← →
Tru ©   (2007-03-16 17:16) [0]

Ребят, помогите пожалуйста... На форме созданы две кнопки одна закрыть а другая должно запрещать или разрешать вторую кнопку. А надпись на кнопке после нажатия должна меняться с "Активировать кнопку выхода" на "Запретить кнопку выхода". Как все это прописать?


← →
clickmaker ©   (2007-03-16 17:21) [1]


> Как все это прописать?

руками


← →
Tru ©   (2007-03-16 17:22) [2]

:) как смешно!!!


← →
Vlad Oshin ©   (2007-03-16 17:22) [3]

onClick
там все и делать...


← →
clickmaker ©   (2007-03-16 17:23) [4]

а в чем проблема?


← →
stone ©   (2007-03-16 17:29) [5]


> clickmaker ©   (16.03.07 17:23) [4]
> а в чем проблема?

Гыы. Как в чем? Код давай :))


← →
Oleg_teacher ©   (2007-03-16 17:30) [6]

Введи дополнительную глобальную переменную p что будет отвечать за: давать доступ к 1 кнопки или нет.
А тогда в but2. Onclick
if p then begin
caption:=’dddsdsdsds’
but1.eneblade:=false;
end
else
begin
caption:=’ghfgggfgfgffggf’
but1.eneblade:=true;
end;


← →
RASkov   (2007-03-16 21:06) [7]

> Введи дополнительную глобальную переменную

Зачем переменную?
procedure Button2click;
begin
 ButtonExit.Enabled:=not ButtonExit.Enabled;
 if ButtonExit.Enabled then Button2.Caption:="Запретить кнопку выхода" else Button2.Caption:="Активировать кнопку выхода";
end;



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.041 c
3-1169045274
PEAKTOP
2007-01-17 17:47
2007.04.08
Функция UPPER в Firebird v2.0


2-1174054611
Tru
2007-03-16 17:16
2007.04.08
Кнопки


3-1169154513
ancot
2007-01-19 00:08
2007.04.08
Глюк FieldByName()


4-1164091644
progmax
2006-11-21 09:47
2007.04.08
запуск службы telnet


15-1173765754
Layner
2007-03-13 09:02
2007.04.08
ADSL модем + Хаб + 2 ПК в интеренет, возможно?




   Наверх