IBsql

← →
Id (2006-01-16 13:30) [0]

Здраствуйте, уважаемые.
Осваиваю IBSQL
with DataModule1.IBSQL1 do begin Close; sql.Clear; SQL.Add("insert into Mainkop Values ("); SQL.Add("gen_Id(g_main_id,1),"""","""+edit1.Text+""","""+RadioGroup1.Items[RadioGroup1.itemIndex]+""""); sql.Add(","""+RadioGroup10.Items[RadioGroup10.itemIndex]+""","""+DateEdit1.Text+""","""+edit2.Text+""""); SQL.Add(","""+edit5.Text+""","""+edit6.Text+""","""+edit7.Text+""","""+edit8.Text+""","""+edit3.Text+""""); SQL.Add(","""+edit4.Text+""","""+DateEdit2.Text+""","""+DateEdit3.Text+""","""+RadioGroup2.Items[RadioGroup2.itemIndex]+ """"); SQL.add(","""+RadioGroup3.Items[RadioGroup3.itemIndex]+""","""+ComboBox1.Text+""","""+DateEdit4.Text+""""); SQL.Add(","""+RadioGroup4.Items[RadioGroup4.itemIndex]+""","""+DateEdit5.Text+""","""+ComboBox2.Text+""""); SQL.Add(","""+DateEdit6.Text+""","""+ComboBox3.Text+""","""+edit9.Text+""","""+DateEdit7.Text+""""); SQL.Add(","""+Edit10.Text+""","""+Edit11.Text+""","""+edit12.Text+""","""+Edit13.Text+""","""+ComboBox4.Text+""""); SQL.Add(","""+RadioGroup5.Items[RadioGroup5.itemIndex]+""","""+RadioGroup7.Items[RadioGroup7.itemIndex]+""""); SQL.Add(","""+ComboBox5.Text+""","""+RadioGroup6.Items[RadioGroup6.itemIndex]+""","""+ComboBox7.Text+""""); SQL.Add(","""+Edit14.Text+""","""+ComboBox6.Text+""","""+ComboBox8.Text+""","""+ComboBox9.Text+""""); SQL.Add(","""+RadioGroup8.Items[RadioGroup8.itemIndex]+""","""+RadioGroup9.Items[RadioGroup9.itemIndex]+""","""+ComboBox 10.Text+""")");
Уже на третьей строчке ошибка:"List index out of bounds(-1)".
Какая такая особенность у данного компонента?

← →
Sergey13 © (2006-01-16 13:35) [1]

Повеситься можно от таких запросов. 8-)
Попробуй через параметры все это дело. Самому же проще будет и серверу заодно.

← →
Johnmen © (2006-01-16 13:38) [2]

Данный компонент здесь непричём.
Ошибка в RadioGroup1.Items[RadioGroup1.itemIndex] или в RadioGroup10.Items[RadioGroup10.itemIndex]

← →
Desdechado © (2006-01-16 13:48) [3]

[2]
вот-вот, скорее всего, в радигруппе ничего не выбрано (нет точки по умолчанию)

← →
Id (2006-01-16 13:49) [4]

> Повеситься можно от таких запросов

Согласен.
Прочитал ibase про транзакции - "Транзакции должны быть максимально короткими", затем указано "Больше кода? Увы, да", только исходя из этого пришлось так поступать.

> Попробуй через параметры все это дело

Попробую. У данного компонента надеюсь есть данное свойство

← →
Id (2006-01-16 13:52) [5]

> вот-вот, скорее всего, в радигруппе ничего не выбрано (нет
> точки по умолчанию)

Спасибо, так и есть

2[4] Id (16.01.06 13:49)
Повеситься можно не от сложности, а от читаемости такого запроса. С транзакциями это никак не связано. Тем более с их длинной.

IBsql Найти похожие ветки