Автор | Сообщение |
Vlad04
|
| постоянный участник
|
Пост N: 420
Зарегистрирован: 13.10.05
|
|
Отправлено: 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:....
|
|
|
Ответов - 300
, стр:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
All
[только новые]
|
|
Dima
|
| |
Пост N: 5741
Зарегистрирован: 17.05.05
|
|
Отправлено: 19.06.16 17:02. Заголовок: Есть редактируемый б..
Есть редактируемый бровс по базе. В другой проге я заблочил какую то запись в той же базе. В бровсе нашел эту же запись и пытаюсь ее редактировать , бровс легко это дает но после окончания редактирования вежливо сообщает что запись заблочена :) Можно как то изменить поведение бровса (переключатель может есть какой) что бы в редактирование не пускало если запись уже заблочена ?
|
|
|
Haz
|
| |
Пост N: 1016
Зарегистрирован: 20.02.11
|
|
Отправлено: 19.06.16 17:40. Заголовок: Dima пишет: Можно к..
Dima пишет: цитата: | Можно как то изменить поведение бровса (переключатель может есть какой) что бы в редактирование не пускало если запись уже заблочена ? |
| oBrw:bPrevEdit := { |a, b, lLock| If( lLock := RLock(), dbUnLock(), MsgBox("Запись залочена") ), lLock }
|
|
|
Dima
|
| |
Пост N: 5742
Зарегистрирован: 17.05.05
|
|
Отправлено: 19.06.16 18:08. Заголовок: Haz Спасибо. Ты вро..
Haz Спасибо. Ты вроде ж в отпуске )) Режим отметки при obrw:lCanSelect:=TRUE повешен на пробел , можно ли изменить эту педаль на свою ?
|
|
|
Haz
|
| |
Пост N: 1017
Зарегистрирован: 20.02.11
|
|
Отправлено: 19.06.16 18:50. Заголовок: Dima пишет: Режим о..
Dima пишет: цитата: | Режим отметки при obrw:lCanSelect:=TRUE повешен на пробел , можно ли изменить эту педаль на свою ? |
| На что угодно, определив обработку в bUserKeys этой кнопки как ::Selection() ::GoDown() и вернув FALSE Да , и учти что отметка реализована через массив с номерами записей ( вроде так , давно не смотрел ) так что реализовать альтернативу со своей цветовой схемой - пустяк
|
|
|
Dima
|
| |
Пост N: 5743
Зарегистрирован: 17.05.05
|
|
Отправлено: 19.06.16 21:48. Заголовок: Haz пишет: На что у..
Haz пишет: цитата: | На что угодно, определив обработку в bUserKeys этой кнопки как |
| Это я понял уже , вопрос звучал иначе , есть ли какой то флаг позволяющий заюзать другую педаль. Похоже его нет , да и ладно , сделаю своё ,через bUserKeys как и ты и советовал.
|
|
|
Dima
|
| |
Пост N: 5744
Зарегистрирован: 17.05.05
|
|
Отправлено: 19.06.16 22:02. Заголовок: Что бы освежить толь..
Что бы освежить только текущую строку достаточно o:RefreshARow(o:nRowPos) или нужен o:Refresh() ? PS Хожу по базе.
|
|
|
Haz
|
| |
Пост N: 1018
Зарегистрирован: 20.02.11
|
|
Отправлено: 19.06.16 22:07. Заголовок: Dima пишет: освежит..
Dima пишет: цитата: | освежить только текущую строку |
| ::Refresh(FASLE) или ::DrawSelect()
|
|
|
Dima
|
| |
Пост N: 5745
Зарегистрирован: 17.05.05
|
|
Отправлено: 19.06.16 22:15. Заголовок: Haz пишет: ::Refres..
Haz пишет: Понял , только при этом "дрыгается" весь бровс на выпуклый морской глаз , впрочем как и при RefreshARow )) А вот DrawSelect() самое то (все красиво и без лишних прорисовок) !
|
|
|
Dima
|
| |
Пост N: 5747
Зарегистрирован: 17.05.05
|
|
Отправлено: 20.06.16 22:41. Заголовок: Есть какой то метод ..
Есть какой то метод что бы дернуть данные с ячейки , типа obrw:GETCELLDATA(nrow , ncol) ? PS Хожу по базе. Для массива понятно все.
|
|
|
SergKis
|
| постоянный участник
|
Пост N: 1005
Зарегистрирован: 17.02.12
|
|
Отправлено: 20.06.16 23:06. Заголовок: Dima Для тек.записи..
Dima Для тек.записи Eval(oBrw:aColumns[nCol]:bData) для др. записи dbGoto(nRec) или dbSkip(nCount) и снова Eval(oBrw:aColumns[nCol]:bData)
|
|
|
Dima
|
| |
Пост N: 5748
Зарегистрирован: 17.05.05
|
|
Отправлено: 21.06.16 08:36. Заголовок: SergKis Я не много ..
SergKis Я не много не о том. Хотел для базы заюзать oBrw:cToolTip{|oBr, nCol, nRow| if( ncol ==2,..... Строка и колонка известна. Указатель записи дергать не хотелось бы , но при наведении мышки на нужную ячейку в колонке 2 , хотелось дернуть данные от туда и показать в cToolTip. Изначально я так и поступил как ты пишешь но тогда показывает на любой ячейке 2-го столбца - данные записи на которой лежит курсор (что и понятно).
|
|
|
|
SergKis
|
| постоянный участник
|
Пост N: 1006
Зарегистрирован: 17.02.12
|
|
Отправлено: 21.06.16 09:07. Заголовок: Dima пишет: хотелось..
Dima пишет: цитата: | хотелось дернуть данные от туда и показать в cToolTip |
| Без перемещения на нужную запись этого сделать не получиться, надо использовать значение nCol для получения bData, а nRow для вычисления nCount перемещения от тек. записи ( dbSkip(nCount) ), считывание данных с колонки и возврат на запись, где были ранее
|
|
|
Dima
|
| |
Пост N: 5749
Зарегистрирован: 17.05.05
|
|
Отправлено: 21.06.16 09:11. Заголовок: SergKis Понял , дум..
SergKis Понял , думал можно проще , без дергания указателя записи. Спасибо.
|
|
|
Dima
|
| |
Пост N: 5792
Зарегистрирован: 17.05.05
|
|
Отправлено: 26.06.16 12:11. Заголовок: Поймал косяк в Tsbro..
Поймал косяк в Tsbrowse Есть 2 открытых справочника в разных Child окнах. В одном из них я начал редактировать запись и не закончив редактирование переключаюсь на другой справочник мышкой и получаю вылет Error BASE/1004 Метод не экспортирован: SHOW Called from SHOW(0) Called from TSBROWSE:EDIT(4003) Called from TSBROWSE:KEYDOWN(6584) Called from TSBROWSE:HANDLEEVENT(7348) Called from EVENTS(0) Called from DOEVENTS(0) Called from TCONTROL:HANDLEEVENT(875) Called from TSBROWSE:HANDLEEVENT(7385) Called from EVENTS(0) Called from UPDATEWINDOW(0) Called from EVENTS(0) Called from DOMESSAGELOOP(0) Called from _ACTIVATEWINDOW(0)
|
|
|
Dima
|
| |
Пост N: 5793
Зарегистрирован: 17.05.05
|
|
Отправлено: 26.06.16 12:20. Заголовок: Тот же глюк в C:\..
Тот же глюк в C:\MiniGUI\SAMPLES\Advanced\TsBrowse\ если запустить DEMO.EXE и заюзать 4 и 5 пример одновременно Первоначально ломается бровс
|
|
|
SergKis
|
| постоянный участник
|
Пост N: 1034
Зарегистрирован: 17.02.12
|
|
Отправлено: 26.06.16 12:51. Заголовок: Dima пишет:Тот же гл..
Dima пишет: цитата: | Тот же глюк в C:\MiniGUI\SAMPLES\Advanced\TsBrowse\ если запустить DEMO.EXE и заюзать 4 и 5 пример одновременно |
| Как это тебе удалось ? Вкл. edit в одном, переключаю фокус на др. тот edit выключился новый включается и так все время, не зависимо с какого примера 4\5 начинать
|
|
|
SergKis
|
| постоянный участник
|
Пост N: 1035
Зарегистрирован: 17.02.12
|
|
Отправлено: 26.06.16 13:22. Заголовок: SergKis пишет:Как эт..
SergKis пишет: Получил на колонке Age, но там диалоговое окно MODAL. Почему оно дает переход на др. окно приложения ?
|
|
|
Dima
|
| |
Пост N: 5795
Зарегистрирован: 17.05.05
|
|
Отправлено: 26.06.16 13:25. Заголовок: SergKis Смотрим при..
SergKis Смотрим пример проще C:\MiniGUI\SAMPLES\Advanced\Tsb_SetArrayTo\ Запускаем два окна вот так как на скрине Входим в режим редактирования колонки order display в записи где цифра 1 и не выходя из него мышкой щелкаем на втором окне такой же колонки , при чем если нажать на первой записи то вылет с ошибкой если на другой записи то бровс с которого ушли просто портится , вот скрин
|
|
|
Dima
|
| |
Пост N: 5796
Зарегистрирован: 17.05.05
|
|
Отправлено: 26.06.16 13:40. Заголовок: Косяк 2 Есть два акт..
Косяк 2 Есть два активных бровса в разных окнах Когда бровс в фокусе курсор выглядит как и положено Переключаюсь мышкой на другой бровс и после возврашаюсь назад щелкая на той же записи , в этом случае фон курсора остался фоном не активного курсора Если во время перехода щелкать на другой записи , не там где стоял курсор то все нормально. Я пробовал уже "фокус" c oBrw:bGotFocus:={|| obrw:Refresh()} , не помогло
|
|
|
SergKis
|
| постоянный участник
|
Пост N: 1037
Зарегистрирован: 17.02.12
|
|
Отправлено: 26.06.16 14:25. Заголовок: Dima пишет:Смотрим п..
Dima пишет: цитата: | Смотрим пример проще C:\MiniGUI\SAMPLES\Advanced\Tsb_SetArrayTo\ |
| запустил 6 разных примеров к ним 3 exe Tsb_setArrayTo - переключаюсь\вкл. едит по разному и по всем - ничего описанного тобой нет Win 8.1, hmg последняя цитата: | Я пробовал уже "фокус" c oBrw:bGotFocus:={|| obrw:Refresh()} , не помогло |
| попробуй oBrw:DrawSelect() переменная oBrw - public или привате для обоих окон ?
|
|
|
Ответов - 300
, стр:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
All
[только новые]
|
|