фраза была такая, а не только тот кусок, что ты привел.

Вызывается одна форма, а не несколько и надо правильно вернуть.
С одной формы при одновременном вызове нельзя вернуть данные сразу в две формы, потому что вызов со второй перекроет вызов первой, даже если вы в "справочник" засунете адрес переменной, куда надо записать итог выбора.
Модальность для режима выбора правильное решение, потому что идет команда "Установить значение", и некакие другие действия не должны мешать и перекрывать диалог выбора. Если нужно использовать "справочник" как просмотр данных, то пишется отдельная кнопка, которая вызывает его иначе.

Можно передать просто адрес переменной в "Справочник" и вместо функции GetData справочник сам запишет запись в нужный адрес, но тогда это повлечет порчу данных, если нет блокировки через showmodal и пользователь перещелкниться в другое окно, его отвлекут, и он возьмет и кликнет другие данные, или попросту закроет окно, забыв выбрать данные, или перепутает окна, если сделать создание нескольких одинаковых окон. Одно окно, постоянно весящее в памяти без уничтожения, позволяет не только это все отфильтровать, но и сохранить свое состояние и содержимое при двух разных вызовах(к примеру выбор из дерева каталога не потребует искать все заново).

Добавлено @ 13:36

примерно так можно

unit


unit TFSpravocnic


unit data 1/2


Это сообщение отредактировал(а) gesper - 1.8.2013, 13:38

На самом деле вариантов может быть несколько. Один из них: 

В ТЗ так и написано. Нужно вызвать одну форму, но никто не сказал, что ее должно быть можно вызвать только один раз. Поэтому и нужно предусмотреть вариант с вызовом одной формы, но несколько раз (отдельно для дада1, отдельно для дата2). 

Формы 2! Объект один, в дизайнере форма одна, а ран-тайм при одновременном вызове их две! Кто запрещает создать один класс, но использовать при этом 2 экземпляра этого класса? Так и тут.




Добавлено через 8 минут и 5 секунд
Кстати, я не проверял, не на чем сейчас, но по-моему в твоей SetField мы получим Incompatible types: 'Pointer' and 'TDataRecord'. Хотя могу и ошибаться.

Это сообщение отредактировал(а) Poseidon - 1.8.2013, 13:52

Я за другое. Программная реализация для меня не проблема. 
Я за пользователя. 
Пользователь вызвал окно выбора из окна А, потом из окна Б.
Потом отвлекся, открыл другую программу, свернул все окна.
Потом вернулся к работе. И упс, два одинаковых окна, каждое ожидает выбор данных, а какое куда эти данные вернет?       

Я на работе, тут нет у меня компилятора проверить, а на память синтаксис не помню точно.

// все правильно, другой вариант показал просто. Открыть форму и чтобы она сама себя уничтожала при закрытии, а SetField должен быть описан так, чтобы передавалось не значение переменной, а адрес переменной куда писать данные, если будет сделан выбор.
Ошибка только в том, что саму переменную забыл убрать из процедуры выше в глобальные формы.



Пускай автор разбереться чего хочет, а там решение найдет.

Добавлено через 2 минуты и 2 секунды

Я об этом писал выше, говоря про Showmodal и создание копий окна справки.

Не совсем так. У TApplication.CreateForm есть одна очень важная для проекта цель, которой нет у простого вызова конструктора формы.
(с) Буквоед.

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

Можно сделать псевдомодальный вызов.

Вызов

   

А посмотри как это сделано в 1С - никак  В какую-то форму да вернет. Не туда? Вызывай заново. Это, конечно, грабли. Ну в крайнем случае можно для каждой формы указывать что-нибудь этакое в Caption.