есть код
if ( connect1C.Connect('Srvr="SQL_SERVER";Ref="Torg_Volga"; Usr=ost; Pwd=uwms') = False) then
begin
showmessage('Сбой при инициализации 1C');
connect1C := UnAssigned;
exit;
end;
except
on E: Exception do
begin
Showmessage(E.Message);
exit;
end;
end;

selectkro := connect1C.NewObject('Запрос');
selectkro.Текст := 'ВЫБРАТЬ '+
' РасходныйКассовыйОрдер.Номер,'+
' РасходныйКассовыйОрдер.Дата,'+
' РасходныйКассовыйОрдер.Проведен,'+
' РасходныйКассовыйОрдер.Организация.Наименование,'+
' РасходныйКассовыйОрдер.Касса.Наименование,'+
' РасходныйКассовыйОрдер.Подразделение.Наименование,'+
' РасходныйКассовыйОрдер.ВидОперации,'+
' РасходныйКассовыйОрдер.Контрагент.Наименование,'+
' РасходныйКассовыйОрдер.Основание,'+
' РасходныйКассовыйОрдер.СуммаДокумента'+
' ИЗ '+
' Документ.РасходныйКассовыйОрдер КАК РасходныйКассовыйОрдер'+
' ГДЕ '+
' РасходныйКассовыйОрдер.Дата МЕЖДУ &Begindate И &Enddate'+
' И РасходныйКассовыйОрдер.Проведен = ИСТИНА'+
' И РасходныйКассовыйОрдер.Касса.Наименование = &Kassa';

selectkro.SetParameter('Begindate', StrToDateTime('01.01.2011 00:00:00'));
selectkro.SetParameter('Enddate', StrToDateTime('31.01.2011 23:59:59'));

selectkro.SetParameter('Kassa', 'Касса ОП Арзамас');
selectres := selectkro.Выполнить();
Qry := selectres.Выгрузить(); //Заменил с Выбрать()

for i:=1 to Qry.Колонки.Количество() do
begin
ListBox1.Items.Add(Qry.Колонки[i].Имя); //добавляем в listbox название колонки, в этом месте ругается "Недопустимое число параметров."
end;

А вообще нужно эту выборку запихнуть в clientdataset
для этого хочу вытащить из выборки структуру, создать такую же в clientdataset, а потом добавить все записи

и если можно подскажите как потом вытаскивать из записи значение по имени поля
типа qry.FieldByName('Наименование') , а не qry.Наименование