авторКоличество, номера (да и имена, поскольку номера) объектов известны ВСЕГДА, а для получения/изменения свойств имена вообще НЕ нужны, поэтому любой dot notation для получения/изменения свойств работает.
что то мы о разном говорим, наверное...
я так и не пойму, как можно имея номер или имя объекта (их всегда можно получить) использовать dot notation в run time
приведу пример:
попытаюсь получить тип колонки в run time, получая в run time же наименование и номер колонки...
Только не говорите, что для этих целей надо использовать Describe... знаю...
но раз говорят, что см цитату выше, то как это сделать я не пойму...
1.
2.
3.
4.
5.
6.
7.
8.
integer li_cols, i
string ls_colname, ls_coltype
li_cols = Integer(ads.Describe( "DataWindow.Column.Count" ))
for i = 1 to li_cols
ls_colname = ads.Describe( "#" +string(i)+ ".Name" )
ls_coltype = ads.object.ls_colname.Coltype
ls_coltype = ads.object.#i.Coltype
next
в обоих случаях получаем system error:
Error Number = 36
Error text = Name not found accessing external object property ls_colname
и
Error Number = 36
Error text = Name not found accessing external object property #i
автор...причём ясно, что используешь ты эту ссылку ТОЛЬКО опять для получения/изменения свойств, потому как datу ты из этой ссылки вынуть всё равно не можешь.
имея ссылку на DWObject я могу изменять как данные так и свойства, но мне нужны данные, которые я могу вынуть, манипулировать ими... получив массив с данными, я могу их изменить и заново присвоить их объекту, пример см Real's HowTo @ www.rgagnon.com
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
Sort an array
We create a small datastore and use it to sort our array. datastore lds_temp
string ls_err
integer i
// change the datastore definition according to the array data type
long ll_array[] = { 2 , 3 , 6 , 5 }
string ls_dsdef = &
'release 6; datawindow() table(column=(type=long name=a dbname="a") )'
lds_temp = CREATE datastore
lds_temp.Create(ls_dsdef, ls_err)
// put the array in the datastore
lds_temp.object.a.current = ll_array
lds_temp.SetSort( "a ASC" )
lds_temp.Sort()
// get back the array
ll_array = lds_temp.object.a.current
FOR i = 1 to Upperbound(ll_array)
MessageBox("", string(ll_array[i]))
NEXT
DESTROY lds_temp
а вот используя стандартый механизм
1.
2.
for i = 1 to li_cols
la_any[] = ads.object.data[ 1 ,i,ads.RowCount(),i]
next
я, действительно не смог достучаться до данных, массив la_any[] в таком случае выглядит как массив структур... (кстати, надо будет попробовать со структурой)
автор
только в чём проблема с использования цикла с пробегом от первой строки до последней, раз тебе так уж понадобилось оперировать с ОДНОЙ колонкой с неизвестным именем?
бегать по строкам и получать данные можно, но для этого нужно использовать набор функций GetItemDate, GetItemString, GetItemNumber и т.д.... чтобы их использовать, мне нужно определить тип каждой колонки и писать что-то типа
1.
2.
3.
4.
5.
6.
7.
8.
CHOOSE CASE left(ads.Describe( "#" +string(i)+ ".Coltype" ), 4 )
CASE 'char'
тут используем GetItemString
CASE 'deci'
тут используем GetItemDecimal
CASE <item>
<statementblock>
... т.д.
END CHOOSE
в случае же, если мне надо получить ВСЕ данные из DWObject, мне кажется проще и эффективнее использовать
la_any[] = dwobjectvar.Primary
не говоря уже о быстродействии беганья по строкам
