| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как создать справочник? [D6, IB6.x]
Сергей © (2003-01-17 13:32:00)Уважаемые знатоки Delphi!
Пожалуйста, поделитесь примерчиком создания справочника.
Задача (возможно стандартная, но, к сожалению, достойного примера,
я пока не нашёл): Есть таблица A, состоящая из двух полей: fCode (числовое)
и fName (строка 50 символов), и таблица B, которая, среди прочих, имеет
поле fA (числовое). Надо сделать так, чтобы при просмотре
записей таблицы B пользователь вместо значения её поля fA видел
значение поля fName из таблицы A (по связке B.fA=A.fCode), а при
редактировании таблицы B вместо редактирования её поля fA показывался бы
полноценный справочник (то есть содержимое таблицы A, которое тут же
можно редактировать (добавлять, изменять, удалять)!!!), из которого пользователь
может выбрать нужную запись, и тогда значение поля fCode из этой выбранной
записи должно попасть в поле fA редактируемой записи таблицы B.
Понимаю, что на создание даже простенького примера, нужно потратить время.
Но, может быть, кто-то хотя бы принцип создания такого справочника опишет.
Всем откликнувшемся заранее благодарен!
Сергей.
Мой e-mail: book_dsn@mail.ru.
MsGuns (2003-01-25 17:12:00) [1]Форма "B" записывает выходные параметры (например, реквизиты выбранного (добавленного) юзером покупателя) в параметры (я в таких случаях использую тип Record), которые доступны форме "А". Затем проверяется "визуальность и активность форма "А". Если форма невизибельная (юзер ее закрыл), то упр-е остается в текущем контроле, если же она визибельная, то фокус на нее, а если и активна, то вообще ничего не делается (Exit из соотв. процедуры -обработчика кнопок "Выбрать"/"Отменить")
Если надо, чтобы форма "В" была на экране, даже когда фокус в форма "А", сделай ей ("В") FormSlyle := fsStayOnTop (На мой взгляд не самый лучший интерфейс для справочника - постоянное его присутствие на экране - а если справочников не один, а 6, да еще "лестницей" ?
Сергей (2003-01-25 14:38:00) [2]Снова у меня появилась свободная минута и я с большим удовлетворением обнаружил, что дисскуссия всё ещё продолжается. Полностью поддерживаю обстоятельное объяснение MsGuns`а в защиту необходимости корректировки справочника на лету. Скажу честно, в данный момент я занимаюсь, как программированием, так и внесением информации, поэтому больше рассматриваю проблему не со стороны "как удобно программисту", а со стороны "как удобно пользователю". А пользователю удобно решать проблемы по мере их возникновения, а не предусматривать заранее!!!
Всем откликнувшимся спасибо за хорошие советы! Некоторые из них я уже попробовал реализовать.
Сделав ставку на удобство для пользователя, всё же хочу не использовать модальные формы. И тут, извините меня за упёртость и тупость, ещё раз спрашиваю: "Форма [А] должна вызывать форму [Б]. Форма [В] должна возвратить результат в элемент вызвавшей её формы [А], если к тому времени форма [А] не будет закрыта пользователем. Как правильно это сделать?"
ЮЮ (2003-01-20 04:08:00) [3]MsGuns © (18.01.03 18:16)
Не убедил :-) В данном случае видно лишь следующее: операционисту-менеджеру без разницы структура БД: Клиенты, Банки и т.п., ему надо просто выписать счёт с заполненными реквизитами. А все эти Клиенты и Банки появились лишь от избыточного "профессионализма" разработчика приложения :-)
В противном случае, операционист-менеджер должен был первым делом найти клиента в БД, при его отсутствии создать его и заполнить минимально необходимую информацию, в.ч. его Банк, и уже оттуда вызвать "выписать счёт"
MsGuns (2003-01-18 18:16:00) [4]>ЮЮ © (18.01.03 03:00)
>Если это действительно справочник, то кроме наименования у объекта должны быть ещё какие-то св-ва, и добавление "на лету" бесмысленно
Не спора ради а токмо для истины ;)
Справочник справочнику - рознь. Внекоторых случаях добавление "на лету" не только удобно, но и необходимо. Пример:
Офис крупной оптовой фирмы. Стоит с десяток операционных мест, с которых по телефону и так идет работа с клиентами - покупателями. Операционист-менеджер, выписывая счет/накладную, должен ввести в него (счет): кому выписан. Справочник номер раз. При добавлении нового клиента выясняется, что его банк не внесен в общий корпоративный справочник банков. Надо тут же добавить. Справочник номер два. Т.е. "двухслойное" редактирование последовательной цепочкой сразу двух справочников. А бывает и больше. Есть, конечно, другой вариант - предварительная регистраиця клиента у админа БД или у ведущего менеджера по продажам. Но это лишние задержки, которые не нравятся покупателям и вредят имиджу фирмы.
Как при добавлении нового клиента не допустить избыточности (т.е.повторного ввода одного и того же ЮЛ) - это уже часть бизнес-логики и зависит от проф.качеств разработчика приложения.
Wolf (2003-01-18 12:10:00) [5]Надо убедить клиента, что делать так нельзя, а то будет у него в таблице А:
ежики, ежеки, Ежики, ежки и т.п.
ЮЮ (2003-01-18 03:00:00) [6]Если это действительно справочник, то кроме наименования у объекта должны быть ещё какие-то св-ва, и добавление "на лету" бесмысленно. Если же эта таблица - сборище повторяющихся текстовых строк, то лучше просто создать текстовое поле и не экономить место :-)
Jeer (2003-01-17 23:07:00) [7]Вкратце могу рассказать как делаю.
Базовая форма (на основе которой создаются потомки) обладает методами посылки и приема сообщений (как в основную, так и модальные и дочерние формы,) а также широковещательным сообщением.
Протокол сообщений (читай правила передачи команд и параметров) в моем случае определяется так:
- команда(ы - скрипт), т.е что делать.
- блок параметров
Пример
"cmd=8;id=1234"
Команда 8 - позиционирование (locate)
На запись с id=1234
Соответственно, когда вызывается справочник (модально, например)
ему пересылается сообщение с командой и параметрами.
После выбора (редактирования, добавления) элемента в справочнике в вызывающую форму передается обратное сообщение о результате (тоже набор команда-параметры) и в вызывающей форме выполняются по закрытию модальной формы нужные действия.
Еще пример.
Если в одной из child-форм выполняется действие, возможно, затрагивающее данные в других формах, присутствующих на экране, то рассылается, как правило, широковещательное сообщение.
Неактивные формы, получив его, анализируют его на предмет "достойности внимания" и реагируют - refresh.
"Достойность" - определяется через наличие связи с изменеными таблицами через таблицу перекрестных ссылок.
Можно, конечно, тупо рефрешить все подряд, но - неэтично это.
MsGuns (2003-01-17 18:50:00) [8]>Сергей (17.01.03 18:40)
>На самом деле, если понимаешь, что хочешь сделать, то больших проблем в 1С нет, а удобство присутствует.
Еще одно заблуждение. Интерфейс - с некоторыми оговорками ДА, но вот НОРМАЛЬНО функционирующую БД с возможностью масштабирования и развития в дальнейшем - ни за что !
1С - это прежде всего хорошее (и, пожалуй, единственное) средство для "заушного" горе-программиста (или того, кто себя таковым считает) за пару-тройку месяцев научиться быстро и без хлопот "рубить" деньгу с доверчивых ламеров-клиентов, пожлобившихся заказать нОРМАЛЬНЫЙ софт для своей конторы.
В этом плане 1С как СРЕДА программирования, действительно, равных себе не знает !
Сергей (2003-01-17 18:40:00) [9]На самом деле, если понимаешь, что хочешь сделать, то больших проблем в 1С нет, а удобство присутствует.
MsGuns (2003-01-17 18:39:00) [10]>Delirium^.Tremens © (17.01.03 18:35)
Я же дал сноску - базовый
Delirium^.Tremens (2003-01-17 18:35:00) [11]MsGuns © (17.01.03 18:33)
> Интерфейс 1С перегружен чрезвычайно, много контролов, которые
> 99% юзеров если и кликают, то после этого лезут под стол
> от страха или благим матом зовут программера
Это кто как сконфигурировал и 1С за чужие кривые руки не отвечает (у самой кривые)
MsGuns (2003-01-17 18:33:00) [12]>Сергей (17.01.03 18:24)
>atmamont, совершенно верно! 1С-Предприятие в плане интерфейса для меня сейчас является эталоном, к которому надо стремиться, но как это сделать - пока, к сожалению, не знаю.
А вот это зря,- не той дорогой идете, товарищ !
Интерфейс 1С перегружен чрезвычайно, много контролов, которые 99% юзеров если и кликают, то после этого лезут под стол от страха или благим матом зовут программера. Далее. Внешне все кажется клево, но механизм обмена данными с физ.таблицами (как впрочем и сами таблицы) совершенно корявый. Вот почему более чем на 3-х компах без MS SQL сервера и энтей 1С просто не работает.
1С - отличный пример красивой обертки, в которую завернут кусок г... (не говорю про все реализации 1С.Предприятие, но про базовую- точно)
Впрочем, это все - ИМХО 8))
Delirium^.Tremens (2003-01-17 18:30:00) [13]Пять часов продолжалось изобретение велосипеда. Вы бы уж хоть какое-нибудь 2С:Предприятие мастерили, а лучше 3С. Там, в "Потрепаться" народ свои операционки пишет и просит кусочек примера :-)
MsGuns (2003-01-17 18:26:00) [14]>Сергей (17.01.03 18:16)
Вызываемая форма может иметь методы, которые вызываются вызывающими формами, например, вкл/откл фильтр. Для того, чтобы проверить, надо ли это делать (мод.форма может быть в этот момент невидима), достаточно просто проверить ее св-во Visible.
Чтобы форма не вызывалась модально, но была видна, достаточно присвоить FormStyle := fsStayOnTop, а если она уже такова, но надо ее "положить на верх", то BringToFront
А вообще-то для справочника я бы не советовал использовать немодальную форму. Работа со справочником - вещь достаточно ответственная и юзер должен так же к этому и относиться.
Сергей (2003-01-17 18:24:00) [15]atmamont, совершенно верно! 1С-Предприятие в плане интерфейса для меня сейчас является эталоном, к которому надо стремиться, но как это сделать - пока, к сожалению, не знаю.
atmamont (2003-01-17 18:20:00) [16]Всем, кто не понял - человек хочет сделать так, как это сделано в 1С:Предприятии.
Сергей (2003-01-17 18:16:00) [17]MsGuns, спасибо за обстоятельный ответ! Вы меня поняли. Да я хочу сделать удобный интерфейс. Единственный ещё недостаток - Вы предлагаете открыть форму модально. Тут всё понятно. Но открывать её (форму справочника) модально не всегда удобно для пользователя, поэтому хотелось бы её открыть в обычном режиме. Но как в этом случае, в обработке формы справочника узнать какая форма его вызывала и не закрылась ли она к тому моменту, когда надо будет возвращать данные. Вот, тут то я "плаваю".
MsGuns (2003-01-17 16:02:00) [18]Сабж, ИМХО, не совсем корректен. Подразумевалось, видимо, создание не справочника, а удобного (для юзера, ессно), интерфейса работы с ним, включая добавление "на лету", т.е. без лишних клацаний на меню "Справочники" и т.д.
Сам справочник и панель с контролами (простыми типа TEdit) надо соорудить в виде формы, отрываемой модально. При открытии формы надо позиционироваться на входной ключ, если он передан из гол.формы как значение соотв. поля тек.записи осн.таблицы (Locate). "Путешествие" по гриду справочника обычным способом.
По дв.клику (или кнопке или попапу) юнит справочника "снимает" значения полей тек.записи спр-ка и записывает их в переменные (я это делаю через рекорд), после чего форма закрывается. Гол.прога проверяет значения рекорда и, если они не пустые, записывает что надо куда надо (при простом выходе из спр-ка рекорд заполняется типа пробелами).
Панель служит для редактирования-добавления в справочник и в обычном режиме не видна. Вкл-ся по спец.контролу "Добавить"/"Изменить". Котнролы панели не должны быть напрямую связаны с таблицей справочника. При открытии панели они чистятся при добавлении или заполняются данными тек.записи при редактировании. Есть еще 2 контрола: "Записать" и "Отменить". Если выбран первый, то делаешь проверку корректности и дублирования ключей (поиск по спр-ку Locate`ом) и если все нормальненько, даешь таблице ReadOnly=false, и далее по контексту, после чего передаваемый в гол.форму рекорд заполняется как при простой выборке и закрывается и панель и форма. Да, замены-вставки предпочтительнее делать запросами. Если нажата "Отмена", просто прячешь панель.
passm (2003-01-17 14:08:00) [19]Сергей (17.01.03 13:56)> В гриде поле со значением из справочника и ByttonStyle = cbsEllipsis и ReadOnly = True.
При клике на кнопку/нажатии (Enter or Shiht+Enter... as You like)... и т.д. и т.п. :)
Sergey13 (2003-01-17 13:58:00) [20]Что значит "правильно"? Как работает - так и правильно.
| |
Страницы: 