[Uniq!]

Подскажите пожалуйста как передать в стороннюю функцию
текущую (выделенную) запись из TDataSet.

И желательно её ещё где-нибудь в пространстве имён сохранить, чтоб к ней был доступ из любой другой функции (формы)

[NumLock]

создай динамический (статический тоже подойдет, но будет не универсально) вариантный массив и сохрани в нем значения полей текущей записи датасета

[Uniq!]

Сообщение от NumLock

создай динамический (статический тоже подойдет, но будет не универсально) вариантный массив и сохрани в нем значения полей текущей записи датасета

А где "грамотно" его объявить?
Допустим мне эту запись нужно передать на другую форму. До этого я всегда делал так:

Код:

with TFormNew.Create(Application) do
try
Execute(aDataSet);
finally
free;
end;

А внутри самого Execute во второй форме принимал этот DataSet

Код:

dsIDataset.DataSet := aDataSet;
Result := ShowModal = mrOK;

и дальше уже чё хотел, то и делал.

С заделом на будущее (к вопросу об универсальности) , может класс нарисовать для подобного рода "хранилища" данных?
Мало ли чего ещё понадобится хранить. Но опять же возникает вопрос где создавать\объявлять экземпляр этого класса?

[Freeman]

А зачем это нужно? Если ты проектируешь внутренний API приложения, его соглашением может быть отсутствие движения по DataSet-у. Тогда можно передавать DataSet.

Если же нужно передать какие-то данные как ключ, у DataSet-а есть свойство FieldValues. ЕМНИП, ему передается список полей через точку с запятой, а он возвращает вариантный массив со значениями. Эта пара (набор ключей) = (набор значений) используется в API самого DataSet-а, где нужно передать абстрактный набор данных.

[NumLock]

Сообщение от Uniq!

А где "грамотно" его объявить?

в секции var

Сообщение от Uniq!

С заделом на будущее (к вопросу об универсальности) , может класс нарисовать для подобного рода "хранилища" данных?
Мало ли чего ещё понадобится хранить. Но опять же возникает вопрос где создавать\объявлять экземпляр этого класса?

за основу возьми TDataSetProvider. он даже по сокетам умеет данные передавать