[Uniq!]

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

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