Форум » [x]Harbour » Размер ячеек в Tbrowse » Ответить

Размер ячеек в Tbrowse

azoo: Обнаружил такое: Имеется БД с допустим с полем summa типа "N"-12-2 Колонки добавляются оператором TbColumnNew(,{||summa} ) При отображении используется параметр TbColumn width. Допустим width задана 7, что меньше чем 12. Тогда идет частичное отображение поля, начиная с левой стороны, а не с правой, где значащие цифры. Как выход можно использовать TbColumnNew(,{||str(summa,7,2)} ), тогда отображение правильное. Получается цифровые поля отображаются в ячейке слева направо и если нужно сделать меньше область ячейки нужно менять структуру БД в меньшую сторону ?

Ответов - 10

Vlad04: если нужно сделать меньше область ячейки нужно менять структуру БД в меньшую сторону ? Это визуальное отображение. Можешь поставить TbColumn width какой надо не затрагивая базы

azoo: Vlad04 , так в том то и дело, что я поставил так, как мне нужно для визуального отображения. И оно срабатывает, но не с правой стороны, а с левой, где могут быть пробелы.

Vlad04: У Бровса есть свойство ALIGN для ячеек. Я им управляю при построении: do case Case cTypeField ='C' ADD COLUMN TO Brw_1 DATA FieldWBlock( aNomb, Select() ) ALIGN DT_LEFT TITLE .... Case cTypeField ='N' ADD COLUMN TO Brw_1 DATA FieldWBlock( aNomb, Select() ) ALIGN DT_RIGHT TITLE .... Case cTypeField ='D' .OR. cTypeField ='L' ADD COLUMN TO Brw_1 DATA FieldWBlock( aNomb, Select() ) ALIGN DT_CENTER TITLE .... endcase Возможно, можно как-то иначе


azoo: Vlad04, в описании align не нашёл, а цитата откуда ?

Dima: azoo пишет: Vlad04, в описании align не нашёл, а цитата откуда ? Это из Минигуи похоже

ММК: Dima пишет: Это из Минигуи похоже Это TsBrows :)

Dima: ММК пишет: Это TsBrows :) Чего тогда тут делает эта тема ? :)

azoo: Тогда вернёмся к постам 1-3 данной темы. Получается размер колонки должен соответствовать размеру поля БД ? Или width некорректно работает.

Dima: azoo Это не пробовал ? column := TBColumnNew(........... column:Picture:=............ или см. пример core-master\tests\tbrowse.prg

azoo: Dima пишет: Это не пробовал ? column := TBColumnNew(........... column:Picture:=............ Dima, cпасибо, то что надо. Похоже что этот параметр уже в Clipper 5.2 был, но не был описан в NG. В версии Clipper 5.3 :picture уже есть в описании NG в разделе Classes\TbColumnNew\



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