Отправлено: 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:....

 Отправлено: 04.08.14 14:45. Заголовок: SergKis пишет: А чт..

SergKis пишет:

цитата:

А что не так в примерах (для использования)

Да все нормально. Просто много всего интересного, не знаешь на чем остановиться.
Что удобней всего использовать, чтобы потом не переделывать ?

 Отправлено: 04.08.14 15:45. Заголовок: Andrey пишет:чтобы п..

Andrey пишет:

цитата:

чтобы потом не переделывать ?

переделывать придется ("лучшее - враг хорошего", "век живи, век учись") - вопрос цены - сколько времени надо на переделку ?
сегодня делаешь так, завтра по другому - другие знания и возможности.

 Отправлено: 04.08.14 16:19. Заголовок: SergKis пишет: сего..

SergKis пишет:

цитата:

сегодня делаешь так, завтра по другому

Согласен полностью.
Хотелось бы посмотреть как у других сделано ?

Вот такоё меню навигации можно сделать на МиниГуи ?

 Отправлено: 04.08.14 18:20. Заголовок: SergKis пишет: А чт..

SergKis пишет:

цитата:

А что не так в примерах (для использования) ToolBarEx_2 ?

Не совсем понял ?
Можно ли в этом примере подставить иконку ?
И можно ли кнопку сделать разными цветами ?
Что-то у меня не получается...

 Отправлено: 04.08.14 19:40. Заголовок: Andrey пишет:Не совс..

Andrey пишет:

цитата:

Не совсем понял ? Можно ли в этом примере подставить иконку ?

В данных примерах идет речь о стандартном ToolBar контроле и SplttBox ... Меняя размеры окна увидишь поведение их.
То что показываешь на картинке - надо делать ручками (например на buttonEx-ах и др.контролах), но ничего не возможного нет.
Как пример "ручками" варианты MsgMenu, \SAMPLES\BASIC\MsgMenu

 Отправлено: 13.08.14 01:29. Заголовок: Кто нибудь делал мен..

Кто нибудь делал меню корректировки цветов TBROWSE для юзеров ?
Или подскажите идею, как это сделать.
Все цвета у меня есть в массиве:
[ЦВЕТА_TBROWSE]
Строка_1 = { {{0,8388608},32768,32768,32768,32768,32768,32768,32768} , "nClrText" , "Цвет текста в ячейках таблицы)" }
Строка_2 = { {15773696,15773696,15773696,15773696,15773696,15773696,15773696,15773696} , "nClrPane" , "Цвет фона в ячейках таблицы" }
Строка_3 = { {0,16777215,16777215,16777215,16777215,16777215,16777215,16777215} , "nClrHeadFore" , "Цвет текста шапки таблицы" }
Строка_4 = { {15773696,{11048235,6174208},{11048235,6174208},{11048235,6174208},{11048235,6174208},{11048235,6174208},{11048235,6174208},{11048235,6174208}} , "nClrHeadBack" , "Цвет фона шапка таблицы" }
Строка_5 = { {0,16711680,16711680,16711680,16711680,16711680,16711680,16711680} , "nClrForeFocu" , "Цвет текста курсора, текст в ячейках с фокусом" }
Строка_6 = { {13743257,{4915199,61680},{4915199,61680},{4915199,61680},{4915199,61680},{4915199,61680},{4915199,61680},{4915199,61680}} , "nClrFocuBack" , "Цвет фона курсора" }
Строка_7 = { {0,0,0,0,0,0,0,0} , "nClrEditFore" , "Цвет текста редактируемого поля" }
Строка_8 = { {16777215,16777215,16777215,16777215,16777215,16777215,16777215,16777215} , "nClrEditBack" , "Цвет фона редактируемого поля" }
Строка_9 = { {0,0,0,0,0,0,0,0} , "nClrFootFore" , "Цвет текста подвала" }
Строка_10 = { {15790320,15790320,15790320,15790320,15790320,15790320,15790320,15790320} , "nClrFootBack" , "Цвет фона подвала" }
Строка_11 = { {12632256,0,0,0,0,0,0,0} , "nClrSeleFore" , "Цвет текста неактивного курсора (selected cell no focused)selected cell no focused" }
Строка_12 = { {8421504,{8421504,16448250},{8421504,16448250},{8421504,16448250},{8421504,16448250},{8421504,16448250},{8421504,16448250},{8421504,16448250}} , "nClrSeleBack" , "Цвет фона неактивного курсора (selected cell no focused)" }
Строка_13 = { {0,0,0,0,0,0,0,0} , "nClrOrdeFore" , "Цвет текста шапки выбранного индекса" }
Строка_14 = { {15790320,15790320,15790320,15790320,15790320,15790320,15790320,15790320} , "nClrOrdeBack" , "Цвет фона шапки выбранного индекса" }
Строка_15 = { {10526880,10526880,10526880,10526880,10526880,10526880,10526880,10526880} , "nClrLine" , "Цвет линий между ячейками таблицы" }
Строка_16 = { {0,0,0,0,0,0,0,0} , "nClrSupHeadFore" , "Цвет фона в суперхидере" }
Строка_17 = { {15773696,15773696,15773696,15773696,15773696,15773696,15773696,15773696} , "nClrSupHeadBack" , "Цвет символов в суперхидере" }
Строка_18 = { {0,0,0,0,0,0,0,0} , "nClrSpecHeadFore" , "Цвет фона в спецхидере" }
Строка_19 = { {16777215,16777215,16777215,16777215,16777215,16777215,16777215,16777215} , "nClrSpecHeadBack" , "Цвет символов в спецхидере" }
Строка_20 = { {255,255,255,255,255,255,255,255} , "nClrSpecHeadActive" , "Цвет активного спецхидера" }

 Отправлено: 13.08.14 11:37. Заголовок: Andrey пишет: Или п..

Andrey пишет:

цитата:

Или подскажите идею, как это сделать.

Через :SetColor(), куда в вместо массива цвета передавать блок кода который возвращает нужный цвет ( примеры в справке по TSBrowse )
,а как пример выбора подойдет Minigui\Sample\Basic\Colortable

 Отправлено: 13.08.14 13:20. Заголовок: Haz пишет: а как пр..

Haz пишет:

цитата:

а как пример выбора подойдет Minigui\Sample\Basic\Colortable

А можно сделать 3 колонки с разными цветами ?
Типа:
1-колонка (описание)
2-цвет по умолчанию
3-цвет пользователя

Т.е. GRID позволяет делать разными цветами колонки ?

 Отправлено: 13.08.14 14:46. Заголовок: Andrey пишет: А мож..

Andrey пишет:

цитата:

А можно сделать 3 колонки с разными цветами ? Типа: 1-колонка (описание) 2-цвет по умолчанию 3-цвет пользователя

Обычным GRID из MiniGui не пользуюсь , уверен можно сделать, а вот на том же TsBrowse по массиву значений - легко.
в колонке N3 TsBrowse нужно объявить вызов внешнего редактирования с использованием окна выбора цвета.
Тогда при попытке ее редактирования будет выскакивать окно выбора цвета и сохранять выбранный цвет в значении колонки.

PS. того-же эффекта можно добиться через блок bPrevEdit - который должен позволить выбрать цвет, записать его в ячейку и вернуть FALSE
чтоб не пустить в режим редактирования колонки

Пример бровса по массиву есть в Advanced\Tsb_array, цвет фона ячейки колонок 2 и 3 нужно назначить по содержимому самой ячейки.
Есть еще интересный пример TSb_Colors ...
вообщем будут конкретные вопросы - задавай

 Отправлено: 13.08.14 16:37. Заголовок: Haz пишет: вообщем ..

Haz пишет:

цитата:

вообщем будут конкретные вопросы - задавай

Сделал заготовку, дальше не знаю как делать. Помогите пожалуйста.
Пример - Tsb_colors
https://cloud.mail.ru/public/5b99b39913da/Tsb_colors2.prg

 Отправлено: 13.08.14 19:11. Заголовок: Andrey пишет: не з..

Andrey пишет:

цитата:

не знаю как делать.

опиши структуру массива не пойму что в нем

 Отправлено: 13.08.14 22:01. Заголовок: Haz пишет: опиши ст..

Haz пишет:

цитата:

опиши структуру массива не пойму что в нем

"Color by default" - прорисовать цветом элемента aVar[5] - остальную таблицу не надо.
"Color User" - пользовательский выбор цвета, записать в элемент aVar[6] и прорисовать потом сразу в таблице.
Функция выбора цвета стандартная - как в Menu_ButtonEx.prg по правому клику мышки.
Исправленный пример - https://cloud.mail.ru/public/8bb7a4832b49/MiniGui-TEST

Не работал я с таким TBROWSE. Почему при задании цвета: COLORS CLR_BLACK, WHITE
ADD COLUMN TO TBROWSE oBrw DATA ARRAY ELEMENT 1;
HEADER "Variable" + CRLF + "name";
SIZE 150;
COLORS CLR_BLACK, WHITE ;
ALIGN DT_LEFT
Получаю черный на красном ?

 Отправлено: 14.08.14 07:46. Заголовок: Andrey пишет: прори..

Andrey пишет:

цитата:

прорисовать цветом элемента aVar[5]

Андрей , я и хочу понять что значит aVar[x][5] там многомерный массив - поподробнее что имеется ввиду , как думаешь его в качестве цвета использовать ?
или я тебе пример самодостаточный нарисую а свой массив - сам прикрутишь?
По цветам отвечу с работы , как приеду где нить после 11 утра

 Отправлено: 14.08.14 10:25. Заголовок: Haz пишет: COLORS C..

Haz пишет:

цитата:

COLORS CLR_BLACK, WHITE ; ALIGN DT_LEFT Получаю черный на красном ?

почему именно на красном не знаю , да это и не важно. Важно что в описании команды из справки в качестве цвета - МАССИВ
[ COLOR | COLORS <aColors> ]
т.е. нужно писать
COLORS { CLR_BLACK, WHITE }

 Отправлено: 14.08.14 11:06. Заголовок: Haz пишет: что знач..

Haz пишет:

цитата:

что значит aVar[x][5] там многомерный массив - поподробнее что имеется ввиду

Это массив цветов из другого моего Tbrowsa. Получается он из функции TbrowColorWriteFile(oBrw) - выложил в папку.
Содержание его - цвета по всем полям Tbrowsa (правда не все нужны, т.к. где многомерные массивы, то это перечисление цветов ПОЛЕЙ ПОКАЗА из другого Tbrowsa, потом нужно будет убрать лишнее).
Смотреть "Запись_в_ини.prg" - https://cloud.mail.ru/public/8bb7a4832b49/MiniGui-TEST

 Отправлено: 14.08.14 11:52. Заголовок: отправил пример на п..

отправил пример на почту из профиля

 Отправлено: 15.08.14 12:46. Заголовок: Вопрос по переводу н..

Вопрос по переводу на русский для пользователя.
Правильный ли перевод по шрифтам в TBROWSE ?
// nLevel 1 = Cells - Фонт ячеек в таблице
// nLevel 2 = Headers - Фонт заголовков таблицы
// nLevel 3 = Footers - Фонт нижнего колонтитула таблицы
// nLevel 4 = SuperHeaders - Как перевести ???

 Отправлено: 15.08.14 13:03. Заголовок: Andrey пишет: Super..

Andrey пишет:

цитата:

SuperHeaders - Как перевести

переведи как сложный, составной или многоуровневый заголовок.
А вообще лучше пользователя в эти детали не погружать , а то вместо работы весь день в раскраски играть будут

 Отправлено: 15.08.14 13:31. Заголовок: Haz пишет: а то вм..

Haz пишет:

цитата:

а то вместо работы весь день в раскраски играть будут

Ну и пускай, это их время. Хоть с программой будут работать, а не в одноклассниках сидеть !

 Отправлено: 15.08.14 13:58. Заголовок: Andrey пишет:Ну и пу..

Andrey пишет:

цитата:

Ну и пускай

Ты рисковый парень. Они же скажут, в итоге, с программой невозможно работать - цвета постоянно меняются, прыгают, а мы ни на что не нажимаем. (придется делать log, что бы уличить их - работы будет не початый край)