Ver Mensaje Individual
  #1  
Antiguo 01-09-2007
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Reputación: 22
enecumene Va por buen camino
Problema con forms y zeos

Saludos Compañeros, de nuevo recurro a ustedes para que me ayuden en un nuevo problema que se me presenta sucede lo siguiente, tengo un formulario donde contiene los siguientes componentes:

1 - speedbutton
2 - ZQuery

y en el otro form contiene los edits corresponidientes al ZQuery, en el speedbutton tengo el siguiente codigo:

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.Add(' where no="'+DBEdit1.Text+'"');
    ZModPed.open;
    FModPed.ZDpto.Open;
    FModPed.Show;
 end;
end;

clickeo el boton el codigo funciona perfecto, aqui viene el problema, cierro el form que llame con el boton, no? y si vuel vo a presionar el mismo boton que hace un momento me funciono me tira esos errores:

primero me sale:

Cita:
source file not found: ZDbcMySqlUtils.pas
si presiono a ignorar me sale ese otro error:

Cita:
---------------------------
Debugger Exception Notification
---------------------------
Project Sigesped.exe raised exception class EZSQLException with message 'SQL Error: You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near 'where no="1"' at line 3'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------
no entiendo por que me sucede si al primer intento me funciona pero luego si lo presiono de nuevo me tira ese error.

saludos...
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita