Ver Mensaje Individual
  #5  
Antiguo 07-06-2004
Avatar de cbrrr
cbrrr cbrrr is offline
Miembro
 
Registrado: jun 2004
Posts: 57
Reputación: 23
cbrrr Va por buen camino
Puedes declararte unas constantes con las consultas (si estas son fijas) o bien montarlas en tiempo de ejecución o, incluso, dejarlas escritas en diseño en la propiedad SQL del TQuery

Aquí te pongo algún ejemplo a ver si te sirve

Código Delphi [-]
 // motan una consulta
 Query.SQL.Clear;
 Query.SQL.Add('select * from tabla');
 Query.SQL.Add('WHERE id > 6');
 try
   Query.Open;
   if Query.IsNull then
     // no hay valores de retorno
   else
     // hay valores de retorno
 except
   // control de error en la sentencia SQL
 end;

Código Delphi [-]
 // si lo tenemos en constantes
 const
   SQL1 = 'select * from tabla where condicion = aram';
 .....
 
 //en algun procedure....
 begin
   Query.SQL.Text := SQL1;
   Query.ParamByName('param').AsInteger := 6;
   try
     Query.Open;
     if Query.IsNull then
       // no hay valores de retorno
     else
       // hay valores de retorno
   except
      // control de error en la sentencia SQL
   end;
 end;

Espero que los ejemplos te sirvan
__________________
Si no tienes algo que decir más importante que el silencio, cállate
Responder Con Cita