Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Кнопки [D7, XP]

Tru © (2007-03-16 17:16:00)
Ребят, помогите пожалуйста... На форме созданы две кнопки одна закрыть а другая должно запрещать или разрешать вторую кнопку. А надпись на кнопке после нажатия должна меняться с "Активировать кнопку выхода" на "Запретить кнопку выхода". Как все это прописать?

RASkov (2007-03-16 21:06:00) [1]
> Введи дополнительную глобальную переменную

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

Oleg_teacher (2007-03-16 17:30:00) [2]
Введи дополнительную глобальную переменную p что будет отвечать за: давать доступ к 1 кнопки или нет.
А тогда в but2. Onclick
if p then begin
caption:=’dddsdsdsds’
but1.eneblade:=false;
end
else
begin
caption:=’ghfgggfgfgffggf’
but1.eneblade:=true;
end;

stone (2007-03-16 17:29:00) [3]

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

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

clickmaker (2007-03-16 17:23:00) [4]
а в чем проблема?

Tru (2007-03-16 17:22:00) [5]
:) как смешно!!!

Vlad Oshin (2007-03-16 17:22:00) [6]
onClick
там все и делать...

clickmaker (2007-03-16 17:21:00) [7]

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

руками

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »