Форум » GUI » TsBrowse в Минигуи (продолжение) » Ответить

TsBrowse в Минигуи (продолжение)

Vlad04: TsBrows определяется в виде строки ПАРМЕТРОВ объекта и их значений К примеру [quote] DEFINE TBROWSE oBrw2 ; AT 60,450 ; ALIAS cAlias ; OF Form1 ; WIDTH 330 ; HEIGHT 340 ; FONT "Verdana" ; SIZE 9 ; ON DBLCLICK CopyRec(); ON GOTFOCUS fModelo_Hab(2) ; AUTOFILTER ; CELLED EDIT; VALUE nRec; GRID [/quote] Здесь я собрал параметры из разных tBrows Можно или нет и какие парметры заменить выражением ( и каким) ? oBrw2:.... oBrw2:....

Ответов - 273, стр: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 All

Haz: Andrey пишет: Только прелодер все равно белый, без лепестков Ты же сам в прошлом посте писал как это лечится

Dima: Haz пишет: Ты же сам в прошлом посте писал как это лечится Он забыл типа

Andrey: Всем привет ! Вопрос не могу решить, помогите пожалуйста. Таблица небольшая, на экран помещается, даже остаётся много пустого места. Добавляю туда ещё запись и не могу - показать на экране всю таблицу целикоми чтобы маркер был на добавленной записи. Причём есть индекс по полю, из-за него последняя запись в таблице не становиться последней, а чуток ранее. Делаю так:[pre2] oBrw:Reset() oBrw:Refresh(.T.) ItogoNN(oBrw) oBrw:SetOrder(2, , .F. ) // сортировка по столбцу 2 .... // мои вычисления позиции nRow в таблице oBrw:GoPos(nRow,5) // уст. МАРКЕР на ХХ строку и ХХ колонку oBrw:GotoRec( nRow, nRow-1 ) // ??? уст. МАРКЕР на ХХ строку и показать таблицу с 1-ой позиции строк oBrw:SetFocus() DO EVENTS[/pre2]


Haz: Andrey пишет: oBrw:GotoRec( nRow, nRow-1 ) GotoRec первым параметром принимает номер записи а не номер строки

Andrey: Haz пишет: GotoRec первым параметром принимает номер записи а не номер строки В данном случае у меня в таблице номер записи равен номеру строки, т.е. у меня таблица через SetArrayTo()

SergKis: Andrey пишет В данном случае у меня в таблице номер записи равен номеру строки, т.е. у меня таблица через SetArrayTo() [pre2]METHOD GotoRec( nRec, nRowPos ) CLASS TSBrowse LOCAL cAlias LOCAL nSkip LOCAL n LOCAL nRecSave LOCAL lRet := .F. LOCAL lReCount := .F. IF ::lIsDbf ... [/pre2]

Haz: Andrey пишет: последняя запись в таблице не становиться последней, а чуток ранее. Andrey пишет: oBrw:GotoRec( nRow, nRow-1 ) Не вдаваясь что такое setarrayto Если номер записи равен номеру строки и надо попасть на последнюю Объяснни. что значит nRow - 1

Dima: Haz пишет: Объяснни. что значит nRow - 1 Да он не помнит уже...склероз ))

Andrey: Haz пишет: Объяснни. что значит nRow - 1 Пробовал по разному, сначала было oBrw:GotoRec( nRow, nRow ), всё равно таблица 1 позицию выдает с 9 строки таблицы. Потом сделал так oBrw:GotoRec( nRow, nRow -1 ) - без разницы. Методом научного тыка сегодня сделал. Нужно так оказывается: [pre2] oBrw:Reset() oBrw:Refresh(.T.) ItogoNN(oBrw) oBrw:SetOrder(2, , .F. ) // сортировка по столбцу 2 .... // мои вычисления позиции nRow в таблице Eval( oBrw:bGoTop ) // переход на начало таблицы oBrw:GoPos(nRow,5) // уст. МАРКЕР на ХХ строку и ХХ колонку oBrw:GotoRec( nRow, nRow-1 ) // ??? уст. МАРКЕР на ХХ строку и показать таблицу с 1-ой позиции строк oBrw:SetFocus() DO EVENTS[/pre2] Спасибо вам за этот отличный метод !!!

SergKis: Andrey пишет у меня таблица через SetArrayTo() Это означает таблица в массиве тсб, в таком случае :GotoRec(...) полностью игнорирует свои внутренности, т.е. НЕ РАБОТАЕТ, т.к. значение :lIsDbf = .F.

Haz: SergKis пишет: т.е. НЕ РАБОТАЕТ, т.к. значение :lIsDbf = .F. Пришёл Сергей и сдал военную тайну от том что goto на recno это только для dbf Надо было терпеть до последнего

Andrey: Haz пишет: Пришёл Сергей и сдал военную тайну от том что goto на recno это только для dbf Ну хоть что то стало понятней !

SergKis: Haz пишет Надо было терпеть до последнего Игорь, тянуть нельзя было, Андрей до сих пор верит в Деда Мороза, что загружает SetArrayTo(), а не TsBrowse. Что дальше было бы ? Теперь можно быть спокойным, Андрей пишет Ну хоть что то стало понятней !



полная версия страницы