Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Problema con Query (https://www.clubdelphi.com/foros/showthread.php?t=91009)

anonymous 25-10-2016 01:35:14

Problema con Query
 
Buenas tengo el siguiente error :
qGeneral : No SQL statement provided

Código Delphi [-]
procedure TflistadoClientes.bEliminarClick(Sender: TObject);
var
id:Integer;
begin
  if Application.MessageBox ('Esta accion eliminara a El Cliente Esta Seguro?','Drugstore',MB_YESNO+MB_ICONQUESTION)= IDYES
    then

  begin
  fModulo.qGeneral.Close;
  fModulo.qGeneral.Active := True;
  fModulo.qGeneral.SQL.Clear;
  fModulo.qGeneral.SQL.Add('update clientes set estado = 0');
  fModulo.qGeneral.SQL.Add('where idclie = :id');
  fModulo.qGeneral.ParamByName('id').AsInteger := fModulo.qClientes['idclie'];
  fModulo.qGeneral.ExecSQL;


end;
   fModulo.qGeneral.Refresh;
end;

Muchas gracias desde ya ..

ecfisa 25-10-2016 02:08:07

Hola anonymous.

Quita la línea:
Código Delphi [-]
    fModulo.qGeneral.Active := True;

Saludos :)

anonymous 25-10-2016 02:29:21

Me tira error igual .. dice que no se puede resolver con un data set Cerrado ..
Debo activarlo si o si ..
Por ahi no va el error creo .. o si ?

ecfisa 25-10-2016 03:56:00

Hola
Cita:

Empezado por anonymous (Mensaje 509995)
Me tira error igual .. dice que no se puede resolver con un data set Cerrado ..
Debo activarlo si o si ..

No, el componente query debe estar cerrado cuando lanzas la consulta de actualización. El error que mostraste en el primer mensaje se produce por que el componente está abierto (Active = true).

El motivo del nuevo error debe ser otro, ¿ Que DB estas usando y mediante que componentes te conectas ?

Saludos :)

anonymous 25-10-2016 04:26:07

Estoy utilizando MySql ... El componente es TDBGrid .. Tengo el DataSource .. el Query y la tabla

ecfisa 25-10-2016 05:51:48

Hola anonymous.

¿ Podrías copiar y pegar el texto exácto del mensaje de error ?
¿ Has podido localizar en que parte del código y línea se produce el error ? (usando breakpoint y trace into)

Saludos :)

AgustinOrtu 25-10-2016 06:44:52

No uses un query que está mostrando datos para ejecutar un update. Crea un comando y ejecuta la sentencia

Aún así, opino lo mismo que ecfisa. El código que muestras ahí está bien escrito y no debería dar problemas a menos que haya algo más

El DBGrid es un componente visual. La pregunta era que componentes de conexión o acceso usas (ado, bde, etc)


La franja horaria es GMT +2. Ahora son las 12:03:33.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi