Browse, расставить по порядку
Модератор: Дед Пахом
Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
Browse, расставить по порядку
C6.3, Browse, требуется совсем немного, записи расставлять в коротком файле по порядку от девушки. Есть поле Npp, хочу сортировку +Npp,+Name - нашёл шаблон от Гундарева, но и под легаси не хочет он делать своё дело у меня. Расставлять через форму не хочется, надо кнопочками со стрелочками.
Думаю тут все это проходили, подскажите вариант, плиз.
Думаю тут все это проходили, подскажите вариант, плиз.
Browse, расставить по порядку
Был не прав относительно шаблона Гундарева, работает таки, при включении stream всё рано хоть и медленно, но терпимо. Плохо то, что курсор у него уходит с перемещаемой записи на первую. Короче ищу другой шаблон, подскажите плиз!
- morkovin
- Ветеран
- Сообщения: 909
- Зарегистрирован: 20 Июль 2005, 14:53
- Откуда: Volgograd, Russia
- Благодарил (а): 2 раза
- Поблагодарили: 3 раза
- Контактная информация:
Browse, расставить по порядку
Shuffler Templateзаписи расставлять в коротком файле по порядку от девушки
CW2, CW4, CW5, CW5.5, CW6, CW7, ABC, Legacy
Legacy/ABC template to allow your customers to change position of records in the browse box by dragging-and-dropping. Includes Demo with source.
http://www.clarioncentral.com/index.php ... einfo&id=5
это удобней, чем стрелочками вверх\вниз гонять.(имхо)
WBR, morkovin
Browse, расставить по порядку
Не понимаю как жить без перестановок, очень признателен, очень! Попытался зарегится, и если всё правильно понял, то там надо получать одобрение моего адреса от модератора.
Стрелочки считаю серьёзней, мы и так играем, а не работаем.
- morkovin
- Ветеран
- Сообщения: 909
- Зарегистрирован: 20 Июль 2005, 14:53
- Откуда: Volgograd, Russia
- Благодарил (а): 2 раза
- Поблагодарили: 3 раза
- Контактная информация:
Browse, расставить по порядку
этих тонкостей уже не помнюто там надо получать одобрение моего адреса от модератора
см. аттач
- Вложения
-
- shuffler.zip
- (445.05 КБ) 151 скачивание
WBR, morkovin
Browse, расставить по порядку
Глянул примерчик, отлично и довольно быстро пашет. Со всеми праздниками Вас и всех благ в меру!
Browse, расставить по порядку
Вот код который генерит этот шаблон для прозрачности на легаси в теле броуза. Хотелось бы для самообразования почитать мнения опытных участников, а может быть и что то изменить в нём.
Код: Выделить всё
tpl:BigLONG:5 LONG(10000000)
tpl:FromSysID:5 LONG
tpl:ToSysID:5 LONG
tpl:Delta:5 LONG
tpl:FromQueuePosit:5 LONG
tpl:ToQueuePosit:5 LONG
tpl:TempSysID:5 LONG
tpl:Identifier:5 STRING('TplDragDrop {9}')
! [Priority 8500]
! End of "Data Section, Before Window Declaration"
....
OF EVENT:Drop
! Start of "Control Event Handling, before generated code"
! [Priority 5000]
! End of "Control Event Handling, before generated code"
DO SyncWindow
tpl:ToQueuePosit:5 = ?Browse:1{PROPLIST:MouseUpRow}
IF tpl:ToQueuePosit:5 = 0 THEN tpl:ToQueuePosit:5 = 1.
IF tpl:ToQueuePosit:5 < 0 THEN tpl:ToQueuePosit:5 = RECORDS(Queue:Browse:1).
IF tpl:ToQueuePosit:5 > 0 AND tpl:ToQueuePosit:5 <> tpl:FromQueuePosit:5
tpl:FromSysID:5=S8:Npp
S8:Npp= tpl:BigLONG:5
PUT(S8)
IF tpl:ToQueuePosit:5 > tpl:FromQueuePosit:5
tpl:Delta:5 = 1
ELSE
tpl:Delta:5 = -1
END
LOOP i# = (tpl:FromQueuePosit:5+tpl:Delta:5) TO tpl:ToQueuePosit:5 BY tpl:Delta:5
GET(Queue:Browse:1,i#)
S8:Npp = Queue:Browse:1.BRW1::S8:Npp
GET(S8,S8:S8Npp_Key)
tpl:TempSysID:5 = S8:Npp
S8:Npp = tpl:FromSysID:5
PUT(S8)
tpl:FromSysID:5 = tpl:TempSysID:5
END
S8:Npp = tpl:BigLONG:5
GET(S8,S8:S8Npp_Key)
S8:Npp=tpl:FromSysID:5
PUT(S8)
ELSE
END
BRW1::LocateMode = LocateOnEdit
DO BRW1::LocateRecord
DO BRW1::InitializeBrowse
DO BRW1::PostNewSelection
SELECT(?Browse:1)
! Start of "Control Event Handling, after generated code"
! [Priority 5000]
! End of "Control Event Handling, after generated code"
OF EVENT:ScrollDrag
Browse, расставить по порядку
Здесь я тоже достаточно ясно попросил обожателей вьюшки написать корректный код для элементарной задачки на забывая про вьюшку, пока тоже тишина.
Browse, расставить по порядку
Расставить всё по порядку.
ACN, простите, вы мне напоминаете ББ (Большого Босса), который сколько-то там лет назад что-то там написал на Кларионе. И все последующие годы просто эксплуатировал то, что было написано. Всё это время необходимых вложений в поддержку разработки не осуществляли. Замену себе не вырастили, поскольку вам так было выгодно. Не соскочили своевременно с CFD на CW, ну и/или по той же причине, с Legacy на ABC. Теперь появились новые требования и надо написать новый функционал, а технологии-то устаревшие и исполнителей нет! И компетенции куда-то пропали.
А снова окунуться в программирование вам как ББ лень, и начинаете вы здесь всех баламутить, пытаетесь взять на "слабо", на "какие же вы профессионалы" и т.д.
Мой совет, смените стиль полемики, а лучше вообще её уберите. Начните задавать простые вопросы, не ожидая, что найдутся те, кто возьмёт и выкатит нужный вам код. Будьте проще! Советом вам здесь помогут. Только ещё надо научиться слушать.
Буду рад, если ошибся в диагнозе.
ACN, простите, вы мне напоминаете ББ (Большого Босса), который сколько-то там лет назад что-то там написал на Кларионе. И все последующие годы просто эксплуатировал то, что было написано. Всё это время необходимых вложений в поддержку разработки не осуществляли. Замену себе не вырастили, поскольку вам так было выгодно. Не соскочили своевременно с CFD на CW, ну и/или по той же причине, с Legacy на ABC. Теперь появились новые требования и надо написать новый функционал, а технологии-то устаревшие и исполнителей нет! И компетенции куда-то пропали.
А снова окунуться в программирование вам как ББ лень, и начинаете вы здесь всех баламутить, пытаетесь взять на "слабо", на "какие же вы профессионалы" и т.д.
Мой совет, смените стиль полемики, а лучше вообще её уберите. Начните задавать простые вопросы, не ожидая, что найдутся те, кто возьмёт и выкатит нужный вам код. Будьте проще! Советом вам здесь помогут. Только ещё надо научиться слушать.
Буду рад, если ошибся в диагнозе.
Последний раз редактировалось Shur 15 Январь 2016, 22:44, всего редактировалось 2 раза.
Browse, расставить по порядку
Буду рад если Вы перед тем как соберётесь отвечать прочитаете то о чём написано выше и попытаетесь понять в чём вопрос. Пока никто не просил Вас заниматься ни врачебной практикой ни пропагандой правильного поведения, можете - напишите корректный код, не можете - подождите когда это сделают другие. А просто болтать не солидно.
-
- ✯ Ветеран ✯
- Сообщения: 1014
- Зарегистрирован: 08 Июль 2005, 6:48
- Откуда: Россия
- Поблагодарили: 1 раз
Browse, расставить по порядку
Вопрос в чем , точно -
от девушки
в ABC все вкл/выкл в стандартном browse, в том числе и мультисортировка по нескольким полям в разных направленияЕсть поле Npp, хочу сортировку +Npp,+Name...
в ABC полно такого в разных шаблонах, типа ABCFree (#CONTROL(BrowseMoveSequencedUpDownABC,'Browse: Move Sequenced Records Up/Down (ABC)'))Расставлять через форму не хочется, надо кнопочками со стрелочками.
а самих шаблонов... ну и кнопочек разных:
Думаю тут вам без вариантов - у вас не работает - сами "напишите корректный код" ... и выложите для сообщества, а просто болтать не солидно....под легаси не хочет он делать своё дело у меня....
-
- ✯ Ветеран ✯
- Сообщения: 1014
- Зарегистрирован: 08 Июль 2005, 6:48
- Откуда: Россия
- Поблагодарили: 1 раз
Browse, расставить по порядку
начните же наконец читать документацию по языку, на котором пытаетесь писать - может и научитесь когда-нибудь читать что вам пишут и сами что-то научитесь делать "без базара" и мантр "дайте-дайте же мне..., а уж я то вам потом всем, и девушкам?? покажу..."
PS видимо я опять что-то недопонимаю? тогда уже у меня к вам несколько вопросов:
1. объясните что такое "корректный код" с вашей точки зрения?
2. вы утверждаете, что код, сгенерированный, по стандартным шаблонам от разработчиков концепции/языка и прочего - лажа/обман/развод и есть некий идеальный код на этом же языке, который все где-то скрывают?
3. и видимо у вас уже есть этот идеальный эталонный код, так как вы упорно требуете от "опытных брызгающих слюной" ветеранов дать вам некий образец для сравнения его - образца с каким-то эталоном?
PPS
4. да, ещё - мне показалось или вы формулируете "вопросы" про view/tps и прочее надеясь получить ответ и решить какие-то возникшие у вас проблемы с программой, причем совершенно с view и прочим не связанные? что конкретно у вас случилось - тормозит ваша программка при работе по сети с tps файлами? так возможно проблема не в шаблонах. а в ваших вставках в коде ручками или настройке сервера и рабочих мест, может сетевуха или роутер где-то загибается??
-
- ✯ Ветеран ✯
- Сообщения: 1014
- Зарегистрирован: 08 Июль 2005, 6:48
- Откуда: Россия
- Поблагодарили: 1 раз
Browse, расставить по порядку
ещё раз, кода от меня не будет, т.к. все что я пишу по работе - принадлежит работодателю, а просто так "на слабо" я не сдаюсь - мне надо кормить семью, внука баловать, а не заниматься благоглупостями, и вообще, ещё в 90х у меня ученики в десятых классах 35й школы (сейчас КФМЛ) поговаривали "...на халяву - только уксус..."