function GetItemValuesFromDataSet(DataSet: TDataSet; const ItemsField: string; const ValuesField: string; var ItemsStrings: TStrings; var ValuesStrings: TStrings): Boolean;

Boolean GetItemValuesFromDataSet(TDataSet DataSet, const AnsiString ItemsField, const AnsiString ValuesField, TStrings ItemsStrings, TStrings ValuesStrings);