Отправлено: 19.12.13 18:16. Заголовок: TsBrowse в Минигуи (продолжение)

TsBrows определяется в виде строки ПАРМЕТРОВ объекта и их значений
К примеру

цитата:

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

Здесь я собрал параметры из разных tBrows
Можно или нет и какие парметры заменить
выражением ( и каким) ?
oBrw2:....
oBrw2:....

 Отправлено: 19.04.17 10:54. Заголовок: PS :aEditCellAdjust ..

PS
:aEditCellAdjust[4] := -nH

 Отправлено: 19.04.17 11:34. Заголовок: Похоже :aEditCellAdj..

Похоже :aEditCellAdjust - возможность задать отступы в Cell (:aEditCellAdjust := {-2,-1,-1,-2}),
а размеры редактирования это свойства колонки и должны быть в TColumns. Что то такое

 
    DATA nEditWidth   AS NUMERIC   INIT 0                // editing width 
    DATA nEditHeight  AS NUMERIC   INIT 0                // editing height 
 

с вытекающими из этого действиями ...

 Отправлено: 19.04.17 13:08. Заголовок: SergKis пишет: Дима..

SergKis пишет:

цитата:

Дима, зачем ты в это делаешь в bPrevEdit

Кто то подсказал в свое время , так и прижилось.

 Отправлено: 19.04.17 13:51. Заголовок: Dima пишет: Кто то ..

Dima пишет:

цитата:

Кто то подсказал в свое время , так и прижилось.

прижилось с каких-то давних версий , где еще не было корректирующего массива размеров.
В PrevEdit я ровнял окно редактирования , т.к. она раньше категорически не хотело выравниваться под ячейку.
Потом проблема была решена и с тех пор не тспользую

 Отправлено: 19.04.17 13:59. Заголовок: Haz У меня проблема..

Haz
У меня проблема была другого плана.
После выхода из режима редактирования ячейки , "сетка" по периметру ячейки исчезала , поэтому координаты GET пришлось
изменить что бы он не налазил на края ячейки.

 Отправлено: 19.04.17 14:09. Заголовок: Dima пишет координат..

Dima пишет

цитата:

координаты GET пришлось изменить что бы он не налазил на края ячейки.

Так это Григорий подправлял и сейчас все нормуль

 Отправлено: 19.04.17 14:15. Заголовок: SergKis пишет: Так ..

SergKis пишет:

цитата:

Так это Григорий подправлял и сейчас все нормуль

У меня версия еще от июня 2016 года , он правил позже ?

 Отправлено: 19.04.17 14:20. Заголовок: Дима, трудно сказать..

Дима, трудно сказать, надо искать (там было GoLeft() и что то еще)
Но уже давно, переносил изм. к себе помню ...

 Отправлено: 19.04.17 14:24. Заголовок: SergKis пишет: над..

SergKis пишет:

цитата:

надо искать (там было GoLeft() и что то еще)

Пороюсь.
А GoLeft() был в 2008 году

 Отправлено: 19.04.17 19:06. Заголовок: Dima пишет А GoLeft(..

Dima пишет

цитата:

А GoLeft() был в 2008 году

Позже было и GoRight и GoDown
Нашел http://clipper.borda.ru/?1-1-40-00000454-000-180-0
пост N 848 от 06.11.15 21:33.
gfilatov2002 пишет

цитата:

Вроде удалось поправить прорисовку разделительной линии в методах GoRight и GoDown

С тех пор прорисовка линий после edit нормальная.

 Отправлено: 19.04.17 21:39. Заголовок: SergKis пишет: Позж..

SergKis пишет:

цитата:

Позже было и GoRight и GoDown

Да я чисто шарил по C:\MiniGUI\Doc\ChangeLog.txt а там только 8 год всплыл , да и фиг с ним ))


SergKis пишет:

цитата:

пост N 848 от 06.11.15 21:33.

И да , версия Минигуи у меня была уже старше и точно не 15 год ))

SergKis пишет:

цитата:

С тех пор прорисовка линий после edit нормальная.

Не понятно зачем я тогда правил все это дело на свежем Минигуи 2016 года
Но глючило 100 %

 Отправлено: 19.04.17 22:10. Заголовок: Dima пишет: Но глю..

Dima пишет:

цитата:

Но глючило 100 %

И сейчас глючит. Без белых засветов вокруг закрытого гет обьекта, но линии гряды трет

 Отправлено: 20.04.17 08:33. Заголовок: Haz пишет но линии г..

Haz пишет

цитата:

но линии гряды трет

В какой ситуации ? Погонял примеры - не трет.
У меня версия, тоже не трет.

 Отправлено: 20.04.17 09:02. Заголовок: SergKis пишет: В к..

SergKis пишет:

цитата:

В какой ситуации ?

В ситуации обычного гетбокса. Сейчас точно сказать не могу т. к не на работе.
Стандартная библиотека, прошлая или позапрошлая. Без выравнивани границ гет обьекта.
После редактирования затирается одна из горизонтальных границ.
Из дополнительных условий- двойной курсор с градиентом и браш на бровсе в цвет фона строк.
Завтра погоняю, напишу подробнее. Но в принципе не напрягает, белых засветов нет и при желании легко исправляется выравниванием границ гет поля.

 Отправлено: 20.04.17 09:08. Заголовок: Haz пишет Но в принц..

Haz пишет

цитата:

Но в принципе не напрягает

Только не хотелось, что бы клиент носом ткнул в эту ситуёвину

 Отправлено: 20.04.17 09:33. Заголовок: SergKis пишет: Толь..

SergKis пишет:

цитата:

Только не хотелось, что бы клиент носом

Перед сдачей клиенту всех мелких тараканов обычно принято давить.
Но иногда и не до них бывает т. к есть и не мелкие)
К примеру иногда наблюдаю традиционное залипание нижней строки.
Понятно что исправимо, и не на всех рабочих местах у клиента проявляется.
Такие вещи полирую уже при тестовой эксплуатации, т. к. с вероятностью больше 50%
будут изменения в интерфейсе когда люди начнут работать.

 Отправлено: 20.04.17 10:24. Заголовок: Haz пишет: Но иногд..

Haz пишет:

цитата:

Но иногда и не до них бывает т. к есть и не мелкие

Подтверждаю
Вот набрел на ошибку, возникающую при использовании SPINNER внутри GetBox поля (при использовании метода oBrw:SetSpinner()).
Проблема заключается в том, что при нажатии на ползунки этого Spinnerа начинает убегать указатель с текущей записи

Haz
Может, поможите побороть эту бяку

 Отправлено: 20.04.17 12:06. Заголовок: gfilatov2002 пишет: ..

gfilatov2002 пишет:

цитата:

Может, поможите побороть эту бяку

Григорий завтра посмотрю. Сейчас сижу болею дома

 Отправлено: 20.04.17 14:14. Заголовок: Haz пишет: Сейчас с..

Haz пишет:

цитата:

Сейчас сижу болею дома

Выздоравливай !!!

 Отправлено: 21.04.17 14:34. Заголовок: gfilatov2002 пишет: ..

gfilatov2002 пишет:

цитата:

Проблема заключается в том, что при нажатии на ползунки этого Spinnerа начинает убегать указатель с текущей записи

Это следствие , причина в том, что бровс получает команду сдвинуть этот указатель ползунками или кнопками не важно.
Если в METHOD Command( nWParam, nLParam ) CLASS TControl закоментировать убиение фокуса

 
          case nNotifyCode == EN_KILLFOCUS  
            ::LostFocus() 
 

сразу видно как управляется бровс , а убиение фокуса просто делает это невидимым
Пол дня проковырялся - безрезультатно. Не могу понять кто и где эту команду бровсу посылает
Позже еще продолжу.