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

Добавлено: 21 окт 2005, 17:51
Juve
Да, мне тоже интересно стало, как это в интерфейсе можно сделать более одной вьюхи?

Добавлено: 21 окт 2005, 19:18
edward_K
а в форме как?
правила теже самые
view1.????????????????? везде где можно
view1.loop lschet например

Добавлено: 24 окт 2005, 10:11
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

Добавлено: 24 окт 2005, 10:35
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;

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

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

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

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

и все отработает. а как вы думали?

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