Loop

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

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

Juve
Постоянный гость
Сообщения: 60
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва
Контактная информация:

Сообщение Juve »

Да, мне тоже интересно стало, как это в интерфейсе можно сделать более одной вьюхи?
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5187
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

а в форме как?
правила теже самые
view1.????????????????? везде где можно
view1.loop lschet например
s2176
Местный житель
Сообщения: 473
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Новосибирск

Сообщение s2176 »

Уважаемый Edward_K!
Вот такой простейший интерфейс с двумя "вьюхами",
так вот условие из второй "вьюхи" не срабатывает,
и на экран выводится самая первая организация, а не первая на букву Я.
А как сделать чтобы вторая тоже отрабатывала?

Interface Example;
create view
var Name1: string;
as select Katpodr.* where length(katpodr.name)=12;
create view ko
as select katorg.* where substr(katorg.name,1,1)='Я';
screen KatpodrViewer;
Fields Name1: noprotect;
<<
Name1 .@@@@@@@@@@@@@
>>
end;
HandleEvent
cmInit:
{ if getfirst katpodr =tsOk then message(katpodr.name)
if getfirst katorg =tsOk then message(katorg.name)
}
end;
end.//Interface
Den
Местный житель
Сообщения: 1842
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Ярославская область ОАО "Часовой завод Чайка" г. Углич
Контактная информация:

Сообщение Den »

Естественно данная конструкция (if getfirst katorg=tsok) выведет первую физически запись из таблицы отрганизаций, а не на букву "я".
Edward_K все правильно написал ведь...чуть внимательнее читать нужно ). И когда юзаешь более одной вьюх лучше уж их все пронаименовать.

Interface Example;
var Name1: string;
create view ka
as select Katpodr.* where length(katpodr.name)=12;
create view ko
as select katorg.* where substr(katorg.name,1,1)='Я';
screen KatpodrViewer;
coolibin
Постоянный обитатель
Сообщения: 151
Зарегистрирован: 29 мар 2005, 17:49

Сообщение coolibin »

s2176 писал(а):Уважаемый Edward_K!
Вот такой простейший интерфейс с двумя "вьюхами",
так вот условие из второй "вьюхи" не срабатывает,
и на экран выводится самая первая организация, а не первая на букву Я.
А как сделать чтобы вторая тоже отрабатывала?
Все модификаторы надо начинать с имени вьюхи:

if имя_вьюхи.getfirst katpodr =tsOk

ко всем полям тоже нужно обращаться с именем вьюхи

message(имя_вьюхи.katpodr.name)

и все отработает. а как вы думали?
s2176
Местный житель
Сообщения: 473
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Новосибирск

Сообщение s2176 »

Как я думала?.... А вот неправильно думала, я имя вьюхи (по аналогии с АРД) ставила не перед getfirst, а перед именем таблицы, и компилятор ругался на меня.
Я ведь на курсах, к сожалению, не училась, все мои знания получены из тех текстов, которые нам сама Галактика поставляет, все больше методом проб и ошибок.
Век живи, век учись! Спасибо за науку :cool:
Кто сказал, что бесполезно биться головой об стену?!
Ответить