DataModule1.sp1.Connection:=DataModule1.con1;
DataModule1.sp1.ProcedureName:='cost_avto';
DataModule1.sp1.Parameters.Refresh;
DataModule1.sp1.Parameters.AddParameter.DataType:=ftInteger;
DataModule1.sp1.Parameters[0].Direction:=pdInput;
DataModule1.sp1.Parameters.AddParameter.DataType:=ftInteger;
DataModule1.sp1.Parameters[1].Direction:=pdInput;
DataModule1.sp1.Parameters.AddParameter.DataType:=ftInteger;
DataModule1.sp1.Parameters[2].Direction:=pdInput;
DataModule1.sp1.Parameters.AddParameter.DataType:=ftInteger;
DataModule1.sp1.Parameters[3].Direction:=pdOutput;
DataModule1.sp1.Parameters[0].Value:=type_a;
DataModule1.sp1.Parameters[1].Value :=age_avto_bd;
DataModule1.sp1.Parameters[2].Value:=cost;
DataModule1.sp1.ExecProc;
edt17.Text:=IntToStr(DataModule1.sp1.Parameters[3].Value);
Нужна помощь при работе с ADOStoredProc
Уважаемые гуру!
Кто-нибудь может ОБЪЯСНИТЬ, а не отсылать по поиску или к справке и не строить из себя гения?! Я конечно понимаю, что всем, в общем-то и пофиг, но всё же...помогите, пожалуйста, кто-нибудь!
С ADOStoredProc никогда ранее не приходилось работать, а найти что-либо полезное по моим вопросам в литературе мне не удалось.
А разобраться мне нужно срочно, ибо от этого зависит слишком многое. :confused::mad:
Почему в данном куске кода выполнение идет по двум заходам?!
Кто-нибудь может ОБЪЯСНИТЬ, а не отсылать по поиску или к справке и не строить из себя гения?! Я конечно понимаю, что всем, в общем-то и пофиг, но всё же...помогите, пожалуйста, кто-нибудь!
С ADOStoredProc никогда ранее не приходилось работать, а найти что-либо полезное по моим вопросам в литературе мне не удалось.
А разобраться мне нужно срочно, ибо от этого зависит слишком многое. :confused::mad:
Почему в данном куске кода выполнение идет по двум заходам?!
Код:
Где ты видишь два захода? Сначала задаются типы и направления параметров. Потом значения. Потом выполняется процедура. Потом добывается значение выходного параметра.