Галактика в вопросах и ответах

Нужно некоторые выбранные записи таблиц экспортить в dbf, можно ли как-то сделать по типу:
select * from katmc to dbf test;
пытался написать так:
SQL select * from katmc to dbf test;
выдает ошибку, так:
SQL select * from katmc dbf test;
компилит, но при выполнении летят непонятные ошибки ...

компилю саппортом, на вип нет лицензии...
порылся по форуму, инфа, которую нашел, не помогает
Причем, обнаружилась еще одна странность: если добавить ручками(меню подключить) компонент(L_DOGOVOR), то саппорт начинает ругаться, что "не загрузился родительский интерфейс"...

добавил в консоли управления руками L_dogovor, теперь ругается, что не открылся ресурс

порылся по форуму, нашел много инфы, сделал текущую систему galnet, появились компоненты галактики, пытаюсь подцепиться к фейсу: пишет, что в ресурсе нет интерфейса L_DOGOVOR::DOGOVOR

развел по разным ресурсам-все нормально стало.
Теперь возникла другая проблема: как подключить ресурсники при загрузке саппорта?
пытаюсь делать, как в 7-ке, нифига не выходит...
[system]
OpenResources=C:\user1.res

в консоле управления(компоненты) нет ресурса, приходится говорить "подключить". Но ...

Переходим на 8-ку, хочу перегрузить события, не получается, написал тестик:
Interface test;
create view
select * from katmc;
screen s1;
buttons
cmbt1;
<<
<.start.>
>>
end;
handleevent
cmbt1:{
message(1);
}
end;
end.

alter interface test;
create view;
handleevent
cmbt1:{
inherited ...

edward_K
да я для примера привел просто катподр. у меня свои таблички
код с маркерами хоть и длиннее, но, думаю, быстрее будет. т.к. нет постоянного скакания по позициям, при выходе из рекурсивной функции...

а... суть понял.... псиб

дак я и сделал рекурсивно! а как с помощью маркеров?
Визуальные элементы не навешаны... по визуальным и сам знаю
а можно примерчики? по типу как я тестилку на подразделениях накатал

вот так, вроде, работает:
Table Struct TmpTable(
name:string,
kod : string
);

Interface TestIfc;
create view vpodr
select * from katpodr, TmpTable, katpodr katpodrcur;
;
procedure InsPodr(n:string; k:string);
begin
vpodr.insert into TmpTable set TmpTable.name = n, TmpTable.kod=k;
end ...

Нужно реализовать ручной проход по дереву, что-то типа поиска в глубину, или ширину, что-то не пойму как это сделать на основе таблиц...
написал тестик:

Table Struct TmpTable(
name:string,
kod : string
);

Interface TestIfc;
create view vpodr
select * from katpodr, TmpTable, katpodr katpodrcur ...

решил так: код не оптимизирован, но все же...
Может можно как-то проще?

const
#include cfg_all.inc
end;
interface Mytest;
table struct t1
(
f1 : string,
p2 : double,
p3 : double
);
create view
as select 0 (fieldname=newpole),* from t1;
browse br1 'Browse';
show at(,6,,20);
table t1;
fields
f1 ...

что-то ничерта не получается...
как только не приседал...

const
#include cfg_all.inc
end;
interface Mytest;
table struct t1
(
f1 : string,
p2 : double,
p3 : double
);
create view
as select 0 (fieldname=newpole),* from t1;
browse br1 'Browse';
show at(,6,,20);
table t1;
fields
t1.f1 : [10],protect ...

edward_K писал(а):cfsSetProp
второй параметр
cfpIndex
тока видимо нужно сначала освобождать поле с таким то индексом, а потом туда пихать новое. SetFormat все таки проще использовать.

что-то не получается...
cfsSetProp('my_field', cfpIndex, 10);
компилятор ругается на cfpIndex...

Собственно возник такой вопрос:
Сделал свою таблицу с несколькими полями и браузер по ней. В зависимости от определенных критериев, некоторые колонки нужно показать, некоторые-скрыть(cmPositionChanged). Видимые отсортировать в определенном порядке. Показать/скрыть - не вопрос, но как отсортировать ...