Вопрос о CheckBox, RadioButton и ard-отчеты в интерфейсах

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Ajax
Посетитель
Сообщения: 40
Зарегистрирован: 07 дек 2005, 15:32

Вопрос о CheckBox, RadioButton и ard-отчеты в интерфейсах

Сообщение Ajax »

Здравствуйте!

Интересует вопрос, работают ли CheckBox и RadioButton в Интерфейсах? или только в Диалогах?
Если да, то какой синтаксис (примерчик).


А реально из интерфейса запускать ard-отчеты? И еще есть функция nodialog, которая блокирует диалог выбора отчета, а просто выполняет все отчеты из списка, а какой у нее синаксис, как ее использовать? (если можно, скиньте код, по нему легче разбираться)

Подскажите пожалуйста
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

1.работают

(.) 1 `
(.) 2 `

[.] 1 `
[.] 2 `

2.runform( )
3.
form outf .....
outf.nodialog
Ajax
Посетитель
Сообщения: 40
Зарегистрирован: 07 дек 2005, 15:32

Сообщение Ajax »

Спасибо!

а как описать CheckBox или RadioButton в разделе Fields?
(пробую произвольные имена - выдает ошибку)

как в интерфейс (свой) добавить поле ввода даты (стандартное, с цифрой 5 у поля справа)? Так как выдается сообщение, что тип поля не надо указывать, он определяется автоматически и поэтому указать у поля тип date не получается

Подскажите пожалуйста
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Сообщение Алексей »

как в интерфейс (свой) добавить поле ввода даты (стандартное, с цифрой 5 у поля справа)? Так как выдается сообщение, что тип поля не надо указывать, он определяется автоматически и поэтому указать у поля тип date не получается
Описываете переменную
var
myDate :date;
screen sc1
fields
myDate:noprotect;
buttons
cmReport;
<<
.@@@@@@@@

<. Сформировать .>
>>
end;

При нажатии кнопки сформировать в поле myDate будет браться значение введённое в скрине.
Ajax
Посетитель
Сообщения: 40
Зарегистрирован: 07 дек 2005, 15:32

Сообщение Ajax »

Спасибо!

подскажите пожалуйста, что неправильно:

var
myPerem:word;

screen myScreen;
fields
myPerem;
buttons
cmTik;
<< 'Заголовок'

`Выбор...`
[.] 1 `
[.] 2 `
[.] 3 `

<.кнопка.>
>>
end;

почему не удается поставить галочку в квардатике? или если вместо [.] стоит (.), то по умолчанию выбрана только первая позиция, а другие не дает выбрать.

подскажите пожалуйста, что неправильно и как сделать правильно :)
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

fields
myPerem:noprotect;

protect ставится по умолчанию.
Ajax
Посетитель
Сообщения: 40
Зарегистрирован: 07 дек 2005, 15:32

Сообщение Ajax »

Ура!
Спасибо большое!
заработало :)
ikav
Постоянный гость
Сообщения: 56
Зарегистрирован: 29 мар 2005, 17:49

Сообщение ikav »

В продолжение темы с CheckBox.
Не подскажите как можно делать один флажок недоступным (или наоборот доступным) в зависимости от выбора другого?

Например:

Interface MyFace 'пример'
screen sKatSopr ('', ,sci1Esc);
fields
flag1 : NoProtect;
flag2 : NoProtect;
<<
[.] - checkBox1` [.] - checkBox2`
>>
end;

HandleEvent
??
end;

хотелось бы чтобы при снятии chechBox1
checkBox2 делался невидимым (ну или хотя бы также снимался флажок)

Какое событие использовать? Какое свойство?
Max_Fin
На пенсии
Сообщения: 797
Зарегистрирован: 29 мар 2005, 17:49
Откуда: г. Тюмень
Контактная информация:

Сообщение Max_Fin »

RTFM
Процедура SetFieldOption (Integer, Word)
Назначение
Установить option-флаги поля.
Описание
procedure SetFieldOption (Поле : Integer; iOption : Word);
Параметры
Поле : Integer - номер поля в логической таблице.
iOption : Word - флаг:
- ofSelectable - поле можно позиционировать;
- ofProtected - поле нельзя менять.

Процедура ClearFieldOption (Integer, Word)
Назначение
Очистить option-флаги поля.
Описание
procedure ClearFieldOption (поле : Integer; iOption : Word);
Параметры
Поле : Integer - номер поля в логической таблице.
iOption : Word - флаг:
- ofSelectable - поле можно позиционировать;
- ofProtected - поле нельзя менять.
Замечание
Доступны константы с идентификаторами fn<имя поля>, значения которых равны номерам полей.
Пример

Код: Выделить всё

HandleEvent
....
cmCheckField:
{
  case CurField of
     #flag1:
     {
       if flag1 = 0 ClearFieldOption(#flag2, ofSelectable)
       else SetFieldOption(#flag2, ofSelectable);
     }
   end;
}
....
end;
Жду выхода Вселенная 2.12!
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

обратите еще на
ClusterDisabledField(#optView, 8); - запретить выбор 4 переключателя
ClusterDisabledField(#optView, 0); - разрешить выбор всех
в случае если поле выводится в виде
[.] 1`
[.] 2`
[.] 3`
[.] 4`
Ответить