[lmikle]

Ну разбей на несколько строк, хотя и странно это все, AnsiString до 2 Гб:

Код:

qry1.SQL.Clear;
qry1.SQL.Add('SELECT T1.[поле1], T1.[поле2],Chr(count(1)+64), T1.[поле3] as [Первое слогаемое], T1.[поле4] as [Второе слогаемое], T1.[поле3]+T1.[поле4] AS summa');
qry1.SQL.Add('FROM [таблица1] as T2 on T1.id>T2.id group by T1.[поле1], T1.[поле2], T1.[поле3], T1.[поле4]');
qry1.SQL.Add('having [поле1]=:p1 AND [поле2]=:p2');