Всем доброго времени суток!!!! В общем проблемка состоит в следующем. При попытки записать параметры в SQL выпадает вот в эту ошибку list index out of bounds(7)
(все поля имеют одинаковый тип)
Код делфи
ADOQuery3.Parameters[0].Value:=Edit1.Text;
ADOQuery3.Parameters[1].Value:=ADOTable1DSDesigner.Value;
ADOQuery3.Parameters[2].Value:= DateTimePicker1.Date;
ADOQuery3.Parameters[3].Value:= Edit2.Text;
ADOQuery3.Parameters[4].Value:= Edit3.Text;
ADOQuery3.Parameters[5].Value:=ADOQuery2kod.Value ;
ADOQuery3.Parameters[6].Value:=ADOQuery2EQNum.Value ;
//ADOQuery3.Parameters[7].Value:=Edit3.Text;
ADOQuery1.Close;
ADOQuery3.ExecSQL;
ADOQuery1.Open;



Код скуля
INSERT INTO eldosie (kod,viddok_oper,data,schet_klienta,Name_error,kategoriya_error,kategoriya_error)
VALUES (:kod,:viddok_oper,:data,:schet_klienta,:Name_error,:kategoriya_error,:kategoriya_error)

Где могут быть траблы????

Здравствуйте, dort12, Вы писали:

INSERT INTO  eldosie (
    kod,
    viddok_oper,
    data,
    schet_klienta,
    Name_error,
    kategoriya_error,
    kategoriya_error) 
VALUES (
    :kod,             -- НУЛЬ
    :viddok_oper,        -- РАС
    :data,            -- ДВА
    :schet_klienta,        -- ТРИ
    :Name_error,        -- ЧИТЫРИ
    :kategoriya_error,    -- ПЯТЬ
    :kategoriya_error)    -- ШЕСЬ

D> Где могут быть траблы????
тупишь ты с просони. :)

Здравствуйте, dort12, Вы писали:

D>Всем доброго времени суток!!!! В общем проблемка состоит в следующем. При попытки записать параметры в SQL выпадает вот в эту ошибку list index out of bounds(7)
D> (все поля имеют одинаковый тип)
D>Код делфи
D>ADOQuery3.Parameters[0].Value:=Edit1.Text;
D>ADOQuery3.Parameters[1].Value:=ADOTable1DSDesigner.Value;
D>ADOQuery3.Parameters[2].Value:= DateTimePicker1.Date;
D>ADOQuery3.Parameters[3].Value:= Edit2.Text;
D>ADOQuery3.Parameters[4].Value:= Edit3.Text;
D>ADOQuery3.Parameters[5].Value:=ADOQuery2kod.Value ;
D>ADOQuery3.Parameters[6].Value:=ADOQuery2EQNum.Value ;
D>//ADOQuery3.Parameters[7].Value:=Edit3.Text;
D> ADOQuery1.Close;
D> ADOQuery3.ExecSQL;
D> ADOQuery1.Open;



D>Код скуля
D>INSERT INTO eldosie (kod,viddok_oper,data,schet_klienta,Name_error,kategoriya_error,kategoriya_error)
D>VALUES (:kod,:viddok_oper,:data,:schet_klienta,:Name_error,:kategoriya_error,:kategoriya_error)

D> Где могут быть траблы????

Вот за обращение к полям выборки или к параметрам по ихнему индексу, расстреливать на месте надо!

with ADOQuery3.Parameters do
Begin     
    ParseSQL(ADOQuery3.SQL.Text,true);
    ParamValues['kod'].Value:=Edit1.Text;
    ParamValues['viddok_oper'].Value:=ADOTable1DSDesigner.Value;
  ParamValues['data'].Value:= DateTimePicker1.Date;
  ...
  ...
  ...
end;
ADOQuery3.ExecSQL;