Модераторы: Poseidon, Snowy, bems, MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Общение между формами 
:(
    Опции темы
DYUMON
Дата 31.7.2013, 11:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 321
Регистрация: 17.6.2006
Где: Новосибирск

Репутация: нет
Всего: 3



Доброго всем времени суток. Возник такой вопрос.
допустим есть три формы
дата1 
дата2 
справочник

как организовать между ними общение, допустим открыты форма  дата1 и дата2  затем из каждой формы вызывается форма справочник выбираются данные и необходимо правильно их вернуть в форму , из которой был вызов. 
пока это делаю через ид формы а на обратчике событий висит 
Код

case ид_формы of 

но это если вызвать по одному разу формы дата1 и дата2 .
 а если их вызывают по несколько раз то тут начинается каша.


--------------------
Всех программистов надо посадить на целероны, что бы впредь головой думали что пишут.
user posted image
PM MAIL ICQ Skype   Вверх
xackera
Дата 31.7.2013, 12:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 42
Регистрация: 17.6.2008
Где: USSR

Репутация: нет
Всего: нет



Попробуйте форму справочник сделать динамической и создавайте новый экземпляр формы справочника при вызове из дата1 и дата2. 
PM MAIL WWW ICQ GTalk   Вверх
superVad
Дата 31.7.2013, 12:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 735
Регистрация: 6.4.2006
Где: Черкассы, Украина

Репутация: 4
Всего: 15



DYUMON, т.е. у тебя справочник сам записывает выбранные данные в соответствующую форму? Ну это как то не очень идеологически верно smile Зачем ему что то знать про тех, кто его использует?


Выше xackera правильно предложил сделать справочник динамическим. От себя предложу - вызывать его классовой функцией, которая и будет возвращать результат.
Как вариант, можно не делать справочник динамическим - просто написать отдельную функцию в каком то общем модуле, которая будет показывать этот справочник и возвращать выбранные данные (в виде записи например или объекта - если там больше одного значения).
PM MAIL   Вверх
Poseidon
Дата 31.7.2013, 13:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133



Тут в любом случае динамический вызов т.к. если делать статическую форму, то она у нас будет одна, а судя по этому: 
Цитата(DYUMON @  31.7.2013,  11:51 Найти цитируемый пост)
открыты форма  дата1 и дата2  затем из каждой формы вызывается форма справочник
их может быть показано больше одной, при чем каждая должна будет вернуть данные в ту форму, из которой этот справочник вызвали. Так что я бы тоже делал динамическую форму, при чем я бы перекрыл стандартный конструктор своим, в котором бы передавал вызывающую форму.



--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
Чучмек
Дата 31.7.2013, 13:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЭТ БИЛЭТ
**


Профиль
Группа: Участник
Сообщений: 841
Регистрация: 11.5.2008
Где: СССР

Репутация: 14
Всего: 41



Или завершать предыдущий незавершенный вызов справочника "отменой"


--------------------
умную мысль держи при себе, а дурной - поделись с другими 
PM MAIL   Вверх
БелАмор
Дата 31.7.2013, 15:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 10.6.2010
Где: Россия

Репутация: 5
Всего: 17



Всё, что я мог бы сказать по поводу этого вопроса, я уже сказал здесь:
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=50045

Там-же приведён полностью рабочий пример, демонстрирующий сказанное.

PM   Вверх
gesper
Дата 31.7.2013, 16:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


"Shарфик"
*


Профиль
Группа: Участник
Сообщений: 183
Регистрация: 23.2.2005

Репутация: 1
Всего: 2



Цитата(DYUMON @ 31.7.2013,  11:51)
Доброго всем времени суток. Возник такой вопрос.
допустим есть три формы
дата1 
дата2 
справочник

как организовать между ними общение, допустим открыты форма  дата1 и дата2  затем из каждой формы вызывается форма справочник выбираются данные и необходимо правильно их вернуть в форму , из которой был вызов. 
пока это делаю через ид формы а на обратчике событий висит 
Код

case ид_формы of 

но это если вызвать по одному разу формы дата1 и дата2 .
 а если их вызывают по несколько раз то тут начинается каша.


unit1
Код

type
    TDataRecord=record
.....

end;


unit form data 1/2
Код

var
   tmpData:TDataRecord;
begin

if not Assigned(FSpravocnic) then
FSpravocnic:=TFSpravocnic.Create(nil);

if FSpravocnic.Showmodal=1 then
begin
    tmpData:=FSpravocnic.GetSelectedData;
end;

--------------------
...И приколется обломившийся и oбломится приколовшийся...
PM MAIL   Вверх
Poseidon
Дата 31.7.2013, 16:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133



gesper, а где ты увидел что надо Showmodal? Та же 1С умеет открывать 100500 справочников и все они отнюдь не модальные.


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
gesper
Дата 31.7.2013, 17:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


"Shарфик"
*


Профиль
Группа: Участник
Сообщений: 183
Регистрация: 23.2.2005

Репутация: 1
Всего: 2



Цитата(Poseidon @ 31.7.2013,  16:34)
gesper, а где ты увидел что надо Showmodal? Та же 1С умеет открывать 100500 справочников и все они отнюдь не модальные.

Покажите мне человека, который одновременно будет сразу в двух окнах что то выбирать. У него один справочник и как пользователь я бы не хотел что то по десять раз выбирать, раскрывать деревья и т.п., если передо мной в разные моменты открывается одна и та же форма. Нафиг ему создавать копии одной и той же формы? У него справочник это источник данных для другой формы, т.е. открыл "выбираются данные" и возврат в первую форму. ShowModal удобно реализует взможность отловить, что данные выбрали и нам нужно только их забрать.

Вообщем, я показал как можно сделать, а идти или нет этим путем дело путника.
--------------------
...И приколется обломившийся и oбломится приколовшийся...
PM MAIL   Вверх
DYUMON
Дата 31.7.2013, 18:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 321
Регистрация: 17.6.2006
Где: Новосибирск

Репутация: нет
Всего: 3



 форма справочник вызывается методом 
Код

application.createform(tfrmspravka, frmspravka)

по идее да ни кто не будет вызывать из нескольких окон справочник но по опыту знаю что бывают любители открыть по 150 окон а потом удивлятся где что. думаю сделать проверку на 
Код

assigned(form)

это хоть как то ограничет количество окон


--------------------
Всех программистов надо посадить на целероны, что бы впредь головой думали что пишут.
user posted image
PM MAIL ICQ Skype   Вверх
northener
Дата 31.7.2013, 18:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1361
Регистрация: 2.9.2010

Репутация: 8
Всего: 20



Цитата(DYUMON @  31.7.2013,  18:43 Найти цитируемый пост)
 форма справочник вызывается методом 
application.createform(tfrmspravka, frmspravka)

Замучаешься придумывать имена frmspravka, а потом замучаешься их проверять на nil.
smile



--------------------
Но только лошади летают вдохновенно.
Иначе лошади разбились бы мгновенно!
PM MAIL   Вверх
Poseidon
Дата 1.8.2013, 09:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133



Цитата(gesper @  31.7.2013,  17:39 Найти цитируемый пост)
Покажите мне человека, который одновременно будет сразу в двух окнах что то выбирать
А кто сказал "выбирать"? Нужно "открыть". Посмотри со стороны как работаю бухгалтера. У них может быть открыто несколько справочников и совершенно не для выбора. Зачастую справочники открываются для "посмотреть, а что там есть". Неужели в годы учебы у тебя на столе лежала одна книжка и открыт был только один сайт? Тут то же самое. Человеку очень часто необходимо сразу иметь несколько источников информации. А при ShowModal мы возвращаемся во времена однопоточных операционных систем. "Хочешь посмотреть дугой справочник - закрой этот." Для серьезных проектов это не допустимо.



--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
gesper
Дата 1.8.2013, 11:43 (ссылка)  | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


"Shарфик"
*


Профиль
Группа: Участник
Сообщений: 183
Регистрация: 23.2.2005

Репутация: 1
Всего: 2



Цитата(DYUMON @ 31.7.2013,  18:43)
форма справочник вызывается методом 
Код

application.createform(tfrmspravka, frmspravka)

по идее да ни кто не будет вызывать из нескольких окон справочник но по опыту знаю что бывают любители открыть по 150 окон а потом удивлятся где что. думаю сделать проверку на 
Код

assigned(form)

это хоть как то ограничет количество окон

Тогда у тебя ошибка, если в форме нету  при закрытии ее нет опции "Action=cafree" в обработчике формы. 
Без проверки Assigned(frmspravka) у тебя создается копия класса формы, заменая адрес уже созданной формы в переменной, и связь с формой теряется, а без вызова free память не освобождается.

Код

application.createform(tfrmspravka, frmspravka)

равносильно
Код

frmspravka:=tfrmspravka.Create(application);


Добавлено через 4 минуты и 5 секунд
Цитата(Poseidon @ 1.8.2013,  09:25)
Цитата(gesper @  31.7.2013,  17:39 Найти цитируемый пост)
Покажите мне человека, который одновременно будет сразу в двух окнах что то выбирать
А кто сказал "выбирать"? Нужно "открыть". Посмотри со стороны как работаю бухгалтера. У них может быть открыто несколько справочников и совершенно не для выбора. Зачастую справочники открываются для "посмотреть, а что там есть". Неужели в годы учебы у тебя на столе лежала одна книжка и открыт был только один сайт? Тут то же самое. Человеку очень часто необходимо сразу иметь несколько источников информации. А при ShowModal мы возвращаемся во времена однопоточных операционных систем. "Хочешь посмотреть дугой справочник - закрой этот." Для серьезных проектов это не допустимо.

Читай внимательно ТЗ автора темы. Для серьезных проектов определяется тип формы и данных в ней, чтобы знать что с ними могут делать. Не цепляйся к слову"Справочник", это трата времени, ты должен знать конкретные данные в форме и для чего они. Поскольку нас спрашивают как сделать форму, то возможно что справочник по факту "Каталог", к примеру.

Добавлено через 5 минут и 24 секунды
Цитата(northener @ 31.7.2013,  18:55)
Цитата(DYUMON @  31.7.2013,  18:43 Найти цитируемый пост)
 форма справочник вызывается методом 
application.createform(tfrmspravka, frmspravka)

Замучаешься придумывать имена frmspravka, а потом замучаешься их проверять на nil.
smile

Глобальный TList его спасти бы мог, или прописать самоуничтожение при закрытии.
--------------------
...И приколется обломившийся и oбломится приколовшийся...
PM MAIL   Вверх
Poseidon
Дата 1.8.2013, 12:21 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133



Цитата(gesper @  1.8.2013,  11:43 Найти цитируемый пост)
Читай внимательно ТЗ автора темы.
Решил быть дотошным? Ну читаем:
Цитата(DYUMON @  31.7.2013,  11:51 Найти цитируемый пост)
открыты форма  дата1 и дата2  затем из каждой формы вызывается форма справочник
Я не нашел слов "поочередно", "только один" и т.п. Открыты 2 формы и из каждой из них вызывается третья и что-то в ней выбирается. Нужно вернуть выбор в ту форму из первых двух, которая и вызвала третью. Заметь, я не использовал слово "Справочник", но все-равно из вышесказанного очевидно, что нужно иметь возможность вызывать третью форму из каждой формы из первых двух. При этом нет нигде ни слова, что при вызове третьей формы из первой нужно обязательно закрывать третью форму, если ее вызвали из второй. При этом, далее автор пишет, что да, по идее никто не будет открывать несколько справочников, но все-равно необходимо оставить такую возможность для "особо умных". Так что не нужно мне тут ТЗ тыкать!

Добавлено через 1 минуту и 19 секунд
Кстати, мало того что твой ShowModal не даст вызвать второй справочник, так вообще всю работу заблокирует пока эту третью форму не закроешь.


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
Чучмек
Дата 1.8.2013, 13:06 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЭТ БИЛЭТ
**


Профиль
Группа: Участник
Сообщений: 841
Регистрация: 11.5.2008
Где: СССР

Репутация: 14
Всего: 41



Poseidon ты прав, на модальный режим в тз ничего не указывает.
Но как узнать, какое окно и куда, должно вернуть данные, если одновременно открыто несколько экземпляров?


--------------------
умную мысль держи при себе, а дурной - поделись с другими 
PM MAIL   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0858 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.