Source position: TplDBGridControllerUnit.pas line 197
type TplPrepareLookupDataset = procedure(
Sender: TObject;
var Dataset: TDataset;
LookupField: TField
) of object;