Problema con forms y zeos

[dec]

Hola,

... Pues tal vez tengas que "limpiar" antes el componente...

Código Delphi [-]
ZModPed.SQL.Clear();
{...}

[[eduarcol]]

Empezado por enecumene

la sintaxis where esté repetida dos veces, esa es la impresion que me da.

saludos...

Tienes una muyt buena impresion de lo que sucede

Empezado por dec

Hola,

... Pues tal vez tengas que "limpiar" antes el componente...

Código Delphi [-]
ZModPed.SQL.Clear();
{...}

En realidad con eso funciona pero como tienes precargadas la sentencia sql si le da el clear se va a borrar toda la instruccion. la unica opcion q veo es cargar la setencia completa cada vez que presione el boton, usar parametros o usar banderas

[[enecumene]]

Hey, Muchas Gracias DEC y EDUARCOL por su ayuda, era algo tan simple, el codigo me quedo asi:

Código Delphi [-]
procedure TFTramiteMod.SpeedButton21Click(Sender: TObject);
begin
if (DBEdit1.Text = '') OR (DBEdit1.Text = '0') then
 begin
  MessageDlg('¡No se encuentra el número de registro!',mtError,[mbOK],0);
 end
 else
 begin
    FModPed:=TFModPed.Create(self);
    ZModPed.SQL.Clear;
    ZModPed.SQL.Add('select * from reg_pedidos');
    ZModPed.SQL.Add(Format(' where no = ''%s''',[DBEdit1.Text]));
    ZModPed.open;
    FModPed.ZDpto.Open;
    ShowMessage(ZModPed.SQL.Text);
    FModPed.Show;
 end;
end;

Nuevamente les doy las gracias, Saludos..