Уважаемые галактисты.
Подскажите пожалуста человеку которому лень копатся в документации. Задача следующая - имеется радиокнопка и при выборе одного из значения необходимо указывать допустим количество дней
(.) Первый пункт'
(.) Второи пункт'
(.) Третий пункт где кол-во дней' .@@@@
так вот как сделать так чтобы последнее текстовое поле высвечиволось только тогда когда выбран третий пункт
Знаю что можно сделать незнаю как....
Всем спасибо
Радиокнопки
Модераторы: m0p3e, edward_K, Модераторы
-
- Постоянный гость
- Сообщения: 58
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: -
- Контактная информация:
Радиокнопки
ХОЧУ изучить правила написания ИНТЕРФЕЙСОВ, создание собственных контуров и компиляции ADF словарей :)
-
- Местный житель
- Сообщения: 783
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: Москва
- Контактная информация:
Re: Радиокнопки
Напишу коряво, но хоть что-то...
Для скрытия по-моему используются 2 атрибута полей - Skip и/или NoStatic.
Думаю, что при описании твоей Fields (я имею в виду переменную KolVo_Dney ) в Browse (где ты описываешь атрибуты полей) следует использовать анализ:
... If Punkt = 3 tnen NoStatic, ????...
Также следует обрабатывать событие CheckField:
cmCheckField : Case CurField Of #Punkt :
{If Punkt <> 3
then set KolVo_Dney := 0;
else set KolVo_Dney := KolVo_Dney;
RescanPanel (#MyTable); // нужно ли???
}
Сам никогда не использовал. Использовал атрибуты только для выделения записей клавишей Insert (смена цветов синий/черный):
Browse br_tSaldoOrg;
Table tSaldoOrg;
Fields
tSaldoOrg.nRec 'Собственный nRec' : [ 10 ], Protect, { FONT = { COLOR = IF ( isValid ( tnPick ), ColorSysBlue, ColorSysBlack ) } };
tSaldoOrg.SaldoOrgKau1 'nRec организации' : [ 10 ], Protect, { FONT = { COLOR = IF ( isValid ( tnPick ), ColorSysBlue, ColorSysBlack ) } };
IF ( isValid ( tnPick ), 'V', '' ) : [ 1 ], Protect, Skip, { FONT = { COLOR = IF ( isValid ( tnPick ), ColorSysBlue, ColorSysBlack ) } };
tSaldoOrg.SaldoOrgKau1Name 'Название организации' : [ 25 ], Protect, { FONT = { COLOR = IF ( isValid ( tnPick ), ColorSysBlue, ColorSysBlack ) } };
tSaldoOrg.SaldoOrgKau1UNN 'ИНН организации' : [ 6 ], Protect, { FONT = { COLOR = IF ( isValid ( tnPick ), ColorSysBlue, ColorSysBlack ) } };
End;
Для скрытия по-моему используются 2 атрибута полей - Skip и/или NoStatic.
Думаю, что при описании твоей Fields (я имею в виду переменную KolVo_Dney ) в Browse (где ты описываешь атрибуты полей) следует использовать анализ:
... If Punkt = 3 tnen NoStatic, ????...
Также следует обрабатывать событие CheckField:
cmCheckField : Case CurField Of #Punkt :
{If Punkt <> 3
then set KolVo_Dney := 0;
else set KolVo_Dney := KolVo_Dney;
RescanPanel (#MyTable); // нужно ли???
}
Сам никогда не использовал. Использовал атрибуты только для выделения записей клавишей Insert (смена цветов синий/черный):
Browse br_tSaldoOrg;
Table tSaldoOrg;
Fields
tSaldoOrg.nRec 'Собственный nRec' : [ 10 ], Protect, { FONT = { COLOR = IF ( isValid ( tnPick ), ColorSysBlue, ColorSysBlack ) } };
tSaldoOrg.SaldoOrgKau1 'nRec организации' : [ 10 ], Protect, { FONT = { COLOR = IF ( isValid ( tnPick ), ColorSysBlue, ColorSysBlack ) } };
IF ( isValid ( tnPick ), 'V', '' ) : [ 1 ], Protect, Skip, { FONT = { COLOR = IF ( isValid ( tnPick ), ColorSysBlue, ColorSysBlack ) } };
tSaldoOrg.SaldoOrgKau1Name 'Название организации' : [ 25 ], Protect, { FONT = { COLOR = IF ( isValid ( tnPick ), ColorSysBlue, ColorSysBlack ) } };
tSaldoOrg.SaldoOrgKau1UNN 'ИНН организации' : [ 6 ], Protect, { FONT = { COLOR = IF ( isValid ( tnPick ), ColorSysBlue, ColorSysBlack ) } };
End;
-
- Постоянный гость
- Сообщения: 58
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: -
- Контактная информация:
Re: Радиокнопки
Спасибо за ответ но я использовал другой способ, менять атрибуты непробывал
ClearFieldState(#DAYOPL1,sfVisible);
SetFieldState(#DAYOPL1,sfVisible);
первый оператор делает невидимым поле редактирования
а второе наоборот
а вот за событие спасибо!
cmCheckField:
{
Case CurField Of
#DOGOVOR.VIDOPL:
{ case DOGOVOR.VIDOPL of
0:{
......
ClearFieldState(#DAYOPL1,sfVisible);
SetFieldState(#DAYOPL1,sfVisible);
первый оператор делает невидимым поле редактирования
а второе наоборот
а вот за событие спасибо!
cmCheckField:
{
Case CurField Of
#DOGOVOR.VIDOPL:
{ case DOGOVOR.VIDOPL of
0:{
......
ХОЧУ изучить правила написания ИНТЕРФЕЙСОВ, создание собственных контуров и компиляции ADF словарей :)