Страница 1 из 1

Радиокнопки

Добавлено: 11 авг 2003, 08:24
ApachiA
Уважаемые галактисты.

Подскажите пожалуста человеку которому лень копатся в документации. Задача следующая - имеется радиокнопка и при выборе одного из значения необходимо указывать допустим количество дней

(.) Первый пункт'
(.) Второи пункт'
(.) Третий пункт где кол-во дней' .@@@@

так вот как сделать так чтобы последнее текстовое поле высвечиволось только тогда когда выбран третий пункт

Знаю что можно сделать незнаю как....

Всем спасибо

Re: Радиокнопки

Добавлено: 11 авг 2003, 12:51
Deinis
Напишу коряво, но хоть что-то...
Для скрытия по-моему используются 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;

Re: Радиокнопки

Добавлено: 12 авг 2003, 08:53
ApachiA
Спасибо за ответ но я использовал другой способ, менять атрибуты непробывал :)

ClearFieldState(#DAYOPL1,sfVisible);
SetFieldState(#DAYOPL1,sfVisible);

первый оператор делает невидимым поле редактирования
а второе наоборот

а вот за событие спасибо!

cmCheckField:
{
Case CurField Of
#DOGOVOR.VIDOPL:
{ case DOGOVOR.VIDOPL of
0:{
......

:)