sql не поддерживает длинные строки?

← →
SerjUfa (2003-05-07 07:23) [0]

Задача: пересчитать табл. с учетом поправочных коэф. для каждого столба. Ниже привожу кусок проги. Компиляция проходит нормально, а при работе в конце строки SQL[2]... выходит сообщение: EStringListError: List index out of bounds (2).
Как решить эту проблему?

with Query2 do
begin
SQL[0] := "SELECT q1*kq[1], q2*kq[2], q3*kq[3], q4*kq[4], q5*kq[5], q6*kq[6], q7*kq[7], q8*kq[8], q9*kq[9], q10*kq[10], q11*kq[11], q12*kq[12], q13*kq[13], q14*kq[14],";
SQL[1] := "q15*kq[15], q16*kq[16], q17*kq[17], q18*kq[18], q19*kq[19], q20*kq[20], q21*kq[21], q22*kq[22], q23*kq[23], q24*kq[24], q25*kq[25], q26*kq[26], q27*kq[27],";
SQL[2] := "q28*kq[28], q29*kq[29], q30*kq[30], q31*kq[31], q32*kq[32], q33*kq[33], q34*kq[34], q35*kq[35], q36*kq[36], q37*kq[37], q38*kq[38], q39*kq[39], q40*kq[40],";
SQL[3] := "q41*kq[41], q42*kq[42], q43*kq[43], q44*kq[44], q45*kq[45], q46*kq[46], q47*kq[47], q48*kq[48], q49*kq[49], q50*kq[50], q51*kq[51], q52*kq[52], q53*kq[53],";
SQL[4] := "q54*kq[54], q55*kq[55], q56*kq[56], q57*kq[57], q58*kq[58], q59*kq[59], q60*kq[60], q61*kq[61], q62*kq[62], q63*kq[63], q64*kq[64], q65*kq[65], q66*kq[66],";
SQL[5] := "q67*kq[67], q68*kq[68], q69*kq[69], q70*kq[70], q71*kq[71], q72*kq[72], q73*kq[73], q74*kq[74], q75*kq[75], q76*kq[76], q77*kq[77], q78*kq[78], q79*kq[79],";
SQL[6] := "q80*kq[80], q81*kq[81], q82*kq[82], q83*kq[83], q84*kq[84], q85*kq[85], q86*kq[86], q87*kq[87], q88*kq[88], q89*kq[89], q90*kq[90], q91*kq[91], q92*kq[92],";
SQL[7] := "q93*kq[93], q94, q95*kq[95], q96*kq[96]";
SQL[8] := "FROM "result96.DB" Result96";

Close;
Open;
end;

← →
Zacho (2003-05-07 07:34) [1]

> SerjUfa (07.05.03 07:23)

Причем здесь длинные строки ? Просто в Quer2.SQL у тебя всего 2 строки, а ты пытаешься что-то присвоить 3-й,4-й и т.д. Делай так:
with Query2 do
begin
SQL.Clear;
SQL.Add("..
...
И срочно читать хелп по TStrings.

← →
Наталия (2003-05-07 07:35) [2]

kq[85] и подобные - это название поля?

← →
Sergey13 (2003-05-07 09:38) [3]

2SerjUfa (07.05.03 07:23)
Ты во все форумы написал? Куда ни ткнусь - везде твой вопрос. 8-)
Ответы то читаешь?

← →
Desdechado (2003-05-07 10:28) [4]

ну, у БДЕ есть ограничение на длину запроса (имхо, 4 кб). Точнее см. на борланде в разделе БДЕ

← →
SergeyKatruk (2003-05-07 12:26) [5]

Нада вместо SQL[x] := <значение> делать SQL.Add(<значение>), и как правильно сказал Zacho срочно читать хелп по TStrings !

← →
RusIv (2003-05-07 21:49) [6]

with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add("select * "+
" from "+
" O_Simple_Action ");
Open;
end;

sql не поддерживает длинные строки? Найти похожие ветки