Hola Amigos otraves con una inquietud
Ejecutanto este query he recibido un error el cual me dice
expresion demasiado compleja en la expresion de consulta
mi codigo es el siguiente
Código Delphi
[-]
procedure TFregistroNumeros.Button2Click(Sender: TObject);
var campo11:string;
begin
with qry_rep_numeros, sql do
begin
Close;
Clear;
Add('SELECT =IIf([jugada]='+quotedstr(edit1.Text)+',"Primera",');
Add('IIf([jugada]='+quotedstr(edit2.Text)+',"Segunda",');
Add('IIf([jugada]='+quotedstr(edit3.Text)+',"Tercera",');
Add('IIf([jugada]='+quotedstr(edit1.Text)+' + '+quotedstr(edit2.Text)+',"1ra Y 2da",');
Add('IIf([jugada]='+quotedstr(edit2.Text)+' + '+quotedstr(edit1.Text)+',"2da Y 1ra",');
Add('IIf([jugada]='+quotedstr(edit1.Text)+' + '+quotedstr(edit3.Text)+',"1ra Y 3ra",');
Add('IIf([jugada]='+quotedstr(edit3.Text)+' + '+quotedstr(edit1.Text)+',"3ra Y 1ra",');
Add('IIf([jugada]='+quotedstr(edit2.Text)+' + '+quotedstr(edit3.Text)+',"2da Y 3ra",');
Add('IIf([jugada]='+quotedstr(edit3.Text)+' + '+quotedstr(edit2.Text)+',"3ra Y 2ra",');
Add('IIf([jugada]='+quotedstr(edit1.Text)+' + '+quotedstr(edit2.Text)+' + '+quotedstr(edit3.Text)+',"Tripleta",');
Add('IIf([jugada]='+quotedstr(edit2.Text)+' + '+quotedstr(edit3.Text)+' + '+quotedstr(edit1.Text)+',"Tripleta",');
Add('IIf([jugada]='+quotedstr(edit3.Text)+' + '+quotedstr(edit2.Text)+' + '+quotedstr(edit1.Text)+',"Tripleta",');
Add('IIf([jugada]='+quotedstr(edit3.Text)+' + '+quotedstr(edit1.Text)+' + '+quotedstr(edit2.Text)+',"Tripleta",');
Add('IIf([jugada]='+quotedstr(edit2.Text)+' + '+quotedstr(edit1.Text)+' + '+quotedstr(edit3.Text)+',"Tripleta",');
Add('IIf([jugada]='+quotedstr(edit1.Text)+' + '+quotedstr(edit3.Text)+' + '+quotedstr(edit2.Text)+',"Tripleta",');
Add('" "))))))))))))))) AS campo11, *');
Add('From ticket_detalle');
open;
if eof then
begin
ShowMessage('No se encontraron registros. Por favor verífique los criterios indicados!.');
exit;
next;
end;
first;
end;
campo11 := qry_rep_numeros.FieldByName('campo11').AsString;
rep_ganadores.Print;
end;