Форум: "Базы";
Текущий архив: 2003.08.28;
Скачать: [xml.tar.bz2];
ВнизХелп: как работать с параметрами в runtime Найти похожие ветки
← →
Hollywood (2003-08-06 13:36) [0]
lProcFind:= TStoredProc.Create(Self); // Создаю объект
lProcFind.DatabaseName:= "Main"; // Привязываю к БД TDatabase
lProcFind.StoredProcName:= "dbo.FindInvoice";
if lProcFind.DescriptionsAvailable then begin
( 1)
lProcFind:= TStoredProc.Create(Self); // Создаю объект
lProcFind.DatabaseName:= "Main"; // Привязываю к БД TDatabase
lProcFind.StoredProcName:= "dbo.FindInvoice";
if lProcFind.DescriptionsAvailable then begin
lProcFind.Params.Items[1].ParamType:= ptInput; //тут ругается "List index out of bounds (1)"
lProcFind.Params.Items[1].AsString:= "%some string%";
end;
lProcFind.Active:= True; //выполняю
может на выполнит препарацию? хотя тоже не помогает!
Что я делаю не так?
← →
Val (2003-08-06 13:42) [1]первый параметр процедуры, в списке параметров идет под номером 0
← →
Hollywood (2003-08-06 13:48) [2]
> первый параметр процедуры, в списке параметров идет под
> номером 0
теперь ругается "List index out of bounds (0)"
← →
HSolo (2003-08-06 14:24) [3]Значит, lProcFind.Params.Items у Вас пуст
← →
ZrenBy (2003-08-06 14:28) [4]А CreateParam сделать ?
← →
Hollywood (2003-08-06 14:36) [5]
> А CreateParam сделать ?
Пока так не сказал, не захотело работать!
lProcFind.Params.CreateParam(ftInteger, "Result", ptResult);
( ftString, "@gds_name", ptInput)
> А CreateParam сделать ?
Пока так не сказал, не захотело работать!
lProcFind.Params.CreateParam(ftInteger, "Result", ptResult);
with lProcFind.Params.CreateParam(ftString, "@gds_name", ptInput) do
AsString:= "%some string%";
Хотя Borland могли сделать в методе DescriptionsAvailable чтение и инициализаци параметров!
А так нафига он нужен? Кто-то пояснит?
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.08.28;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.005 c