Ver Mensaje Individual
  #1  
Antiguo 26-10-2008
Abuelo7 Abuelo7 is offline
Miembro
 
Registrado: ene 2006
Ubicación: Igualada(Barcelona) Spain
Posts: 51
Reputación: 19
Abuelo7 Va por buen camino
Cambiar Locate por Consulta

Hola a todos.

Tengo una aplicación conectada a una BD, con 2 tablas.
Utilizo Locate en el desarrollo de la misma y quisiera cambiarlo por consultas con SQL.

Lo he intentado de varias formas, pero no he sido capaz de conseguirlo.

Este es el trozo de código por si pueden ayudarme.
Código Delphi [-]
Try
    Memo1.Lines.Add(User + ' : '+Edit1.Text);
    Indice := -1;
    for i := 0 to sl.Count-1 do
     begin
      If (ADOQueryPreguntas.Locate('PALABRA', sl[i],[loCaseInsensitive]))then
       begin
         Indice := i;
         break;
       end;//if
     end;//for



     if Indice>=0 then
      begin
        if 

(ADOQueryrRespuestas.Locate('NUMERO',ADOQueryPreguntas.fieldByName('NUMERO').AsString, 

[loCaseInsensitive])) then
          begin
            //ShowMessage(sl[1]);
            sl.Delete(Indice);
            if Indice<>0 then
              sl.Delete(0);
            respuesta := ADOQueryrRespuestas.fieldByName('RESPUESTA').AsString;

Muchas gracias y saludos.

Manuel
Responder Con Cita