Отправлено: 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.06.17 20:01. Заголовок: В примере Tsb_lastro..

В примере Tsb_lastrow динамически можно изменить высоту заголовка таблицы.А можно подобное делать с высотой строк таблицы ?

 Отправлено: 19.06.17 23:08. Заголовок: Vlad04 пишет: А мож..

Vlad04 пишет:

цитата:

А можно подобное делать с высотой строк таблицы ?

Можно так (или по другому):
oBrw:nHeightCell += INT(nNumberLines * nFontSize/2) // расчёт высоты строки

 Отправлено: 20.06.17 09:05. Заголовок: Vlad04 А ты уже зад..

Vlad04
А ты уже задавал этот вопрос в 2005 году и Has ответил
http://clipper.borda.ru/?1-1-0-00000399-000-10001-0-1418918839

 Отправлено: 21.06.17 14:00. Заголовок: оффтоп Andrey пишет..

оффтоп

Andrey пишет:

цитата:

Совсем юзер пугается...

Изучай основы построения интерфейсов ...

 Отправлено: 21.06.17 14:09. Заголовок: Veeha пишет: Изучай..

Veeha пишет:

цитата:

Изучай основы построения интерфейсов ...

Это терминалка была, я сделал по другому на МиниГу - юзера потребовали вернуть обратно !
Спасибо за картинку !

 Отправлено: 21.06.17 14:30. Заголовок: Andrey пишет: Это т..

Andrey пишет:

цитата:

Это терминалка была, я сделал по другому на МиниГу - юзера потребовали вернуть обратно !

Если что - я про цвета ... Чурки твои пользователи ( а может и ты) !
Тут, на форуме, есть ещё тебе подобные - в том числе и админ Dima

 Отправлено: 21.06.17 17:03. Заголовок: Veeha пишет: Чурки ..

Veeha пишет:

цитата:

Чурки твои пользователи ( а может и ты) !

В г.Николаеве пользователи программы есть. Да и по России немало, где работают (я точно знаю) диспетчера-украинцы.
Выводы у тебя просто хамские.
Всех подряд как правило критикуют те - у кого нет нормальных и тиражируемых программ, только и могут на г... исходить.

 Отправлено: 21.06.17 17:18. Заголовок: Andrey пишет: Вывод..

Andrey пишет:

цитата:

Выводы у тебя просто хамские

Veeha ушел копать картошку на луну

 Отправлено: 22.06.17 09:02. Заголовок: Dima Vlad04 А ты у..

Dima

цитата:

Vlad04 А ты уже задавал этот вопрос в 2005 году и Has ответил

В 2005 году не помню, не нашел , вряд ли. В 2005 я только с Харбор познакомился. А MiniGui - позже, тема начата в 2013.

 Отправлено: 22.06.17 10:44. Заголовок: Dima пишет: Veeha у..

Dima пишет:

цитата:

Veeha ушел копать картошку на луну

А чего так далеко то ??? Мне мастер класс по основам построения интерфейсов пригодился бы

 Отправлено: 22.06.17 10:55. Заголовок: Haz пишет: В 2005 г..

Haz пишет:

цитата:

В 2005 году не помню, не нашел , вряд ли. В 2005 я только с Харбор познакомился. А MiniGui - позже, тема начата в 2013.

Ошибся Дима годом, бывает Но ссылку дал правильную. По которой написано что "почти все что в классе определено как DATA может быть переопределено во время исполнения бровса"
nHeightCell определен как DATA и отвечает за высоту строк при ПРОРИСОВКЕ бровса , а раз так то в любой момент можно изменить значение и перерисовать бровс

Добавьте на форму бровса код ниже и увидете магию

DEFINE TIMER Timer_1 OF FORM_1 INTERVAL 1000 ACTION {|| oBrw:nHeightCell++, oBrw:Refresh(TRUE) } // Каждую секунду на 1 пиксель увеличиваем строки

 Отправлено: 22.06.17 11:01. Заголовок: Haz пишет: Ошибся Д..

Haz пишет:

цитата:

Ошибся Дима годом

Точно
Зрение подвело...

 Отправлено: 27.06.17 14:32. Заголовок: Haz пишет: Мне маст..

Haz пишет:

цитата:

Мне мастер класс по основам построения интерфейсов пригодился бы

Я бы постеснялся на твоём месте. А какие проблемы, если не прикалываешься? Ты же, вроде, не "чайник"

 Отправлено: 27.06.17 17:13. Заголовок: VeeIha пишет: А ка..

VeeIha пишет:

цитата:

А какие проблемы, если не прикалываешься?

Проблема одна - на разработку интерфейсов уходит половина времени кодинга, Про цветовую палитру я не говорю , это как "на вкус и цвет все фломастеры разные", а вот впихнуть невпихуемое в окно программы - вечная дилема.
PS. Продолжу. Критиковать оно всегда легче, предложить вариант - всегда лень.
Сама разработка интерфейса - занятие очень неблагодарное, у каждого пользователя свои предпочтения.
Цветовая гамма это маленькая часть. И эта гамма может подчеркивать свой фирменный стиль. Мне к примеру не нравится сочетание зелёного и фиолетового, это визитка мегафона. Но я везде узнаю эту визитку именно по этому сочетанию.
Ты накинулся на Андрея с критикой, а слабо дать ему вариант который на твой вкус красивее? Правда в том что мы все не идеальны. Андрюха в своей текучке зачастую просто затыкает дыру в коде используя те же подсказки, причём не вникая в
суть глубоко т.к. просто надо удовлетворить клиента срочно. Мне такой подход тоже не нравится, и я тоже покусывал Андрея незлобными нападками, но он не обижался, а у меня не было цели обидеть. А ведь многие интересные темы на форуме выросли именно из риторических вопросов, на которые просто ктото попытался ответить.
Так что велкам с луны, и включайся в нормальное обсуждение.
А теперь вернёмся к проблемам, мне очень бы помогли примеры интерфейсов других коллег.
Изобретение велосипеда в тысячный раз просто сжирает много времени и опыт коллег не был бы лишний

 Отправлено: 28.06.17 18:06. Заголовок: Haz пишет: мне очен..

Haz пишет:

цитата:

мне очень бы помогли примеры интерфейсов других коллег

Мне прислали скриншоты программ, написанных на минигуи с использованием tsbrowse, и размещенных на сайте www.hardoffice.rs

 Отправлено: 28.06.17 19:28. Заголовок: gfilatov2002 пишет: ..

gfilatov2002 пишет:

цитата:

Мне прислали скриншоты программ, написанных на минигуи

Григорий спасибо. Начало положено. Могу свои шоты выложить. Может в отдельную ветку или вообще на сайт hmg?
По этим скринам видно боковое меню. Пробовал делать похожее, при смене пункта этого меню на той части формы что справа удалял все контролы и рисовал новые для нового пункта. Работает, но не понравился подход. Пробовал не удаляя прятать старые и это пошло лучше. Боковую ленту делал тоже на tsbrowse Дизайн в принципе понятен. Пусть поживет в коллекции.

 Отправлено: 05.07.17 17:24. Заголовок: Что то не понимаю по..

Что то не понимаю почему СУПЕРХИДЕР не доходит до конца таблицы ?
Пишу так:

     // создать СУПЕРХИДЕР таблицы 
      Add Super Header To oBrwV From Column 1 To Column 10 ; 
          Color CLR_WHITE, { nBackForm, nHeadColor1 } ; 
          Title cTableName 

Вот что получается:

 Отправлено: 05.07.17 21:49. Заголовок: Andrey Возможно это..

Andrey
Возможно это связано с несовпадением кол. колонок в тсб и суперхидера.
У тебя была хитрая колонка с раскраской. Может дело в ней ?

 Отправлено: 24.07.17 21:01. Заголовок: SergKis пишет: Може..

SergKis пишет:

цитата:

Может дело в ней ?

Нет. Такая фигня получается если делаешь 2 строки в одной колонке...

 Отправлено: 24.07.17 21:15. Заголовок: Почему происходит пе..

Почему происходит перенос значения из справочника (подчинённой таблицы) на основную таблицу при выборе ?
Т.е. имеется Основной Tsbrowse, открываю второй Tsbrowse и значение второго переносится на Основной Tsbrowse.

Вот 1-ый экран:


Нажимаю ENTER, выходит 2-ой Tsbrowse - новый и ПЕРВОЕ значение перекидывается на Основной Tsbrowse
Вот 2-ой экран:


После отказа от выбора, не делаю oBrw:Refresh( .T. ) и остаётся МУСОР с предыдущего справочника !
Т.е. тогда нужно всегда делать oBrw:Refresh( .T. ) даже если юзер ничего не выбрал...
Ерунда получается.

А на ХР вообще чудеса происходят... Колонка целиком чиститься:


Как избавиться от этого ?
Исходники посмотрите пожалуйста !