Programación General > Delphi

 Probelmas Con El Objeto Sql

(1/2) > >>

mustang:
k tal, ahora les pido ayuda por lo siguiente:
 tengo un objeto SQL en una forma donde tengo tambien un DBGrid, un Edit y un botón ke se supone k al precionarlo me debe dejar en el DBGrid solo los datos k contengan en el campo 'Folio' de mi tabla lo ke contenga el Edit, mi codigo está de la siguiente manera en el botón:


--- Código: Text --- procedure TForm4.Button4Click(Sender: TObject);begin  try   Query1.close;   Query1.parambyname('param').asString:=Edit1.text;   Query1.open;  except   Showmessage('Ni maiz');  end; end;  
y el siguiente en la propiedad SQL->Tstrings


--- Código: Text --- select * from encuesta    where Folio =  :param  

la tabla no la tengo en un DataModule, sino en la forma1, y el error ke me da es el siguiente:

"EDBEngineError Type mismatch expression"

gracias!!  :comp:

Ayla:
Hola mustang! :hola:

 Esa excepción salta porque no puede conectar a la Base de Datos, asegurate que tienes bien enlazado el query, en su propiedad DatabaseName introduce el Alias de la base de datos. Revisa que las rutas esten bien especificadas ;)  .

 Chao!

mustang:

--- Cita de: "Ayla" --- Hola mustang! :hola:

 Esa excepción salta porque no puede conectar a la Base de Datos, asegurate que tienes bien enlazado el query, en su propiedad DatabaseName introduce el Alias de la base de datos. Revisa que las rutas esten bien especificadas ;)  .

 Chao!
--- Fin de la cita ---
Hola!

oye pues fijate que ya revise lo ke me comentabas y todo está en su lugar, el databasename esta bien ligado con mi base de datos, y tengo los demas elementos bien tambien, como el data source y el dbgrid, no tendras por ahi ahi otra opcion?? :D

de ante mano gracias!!

Ayla:
Hola!

 Tienes instalado BDE (Borland Desktop Engine) en la máquina donde ejecutas la aplicación?

 :hola:

makio:
Type mismatch expression, Mira este error sale cuando el query no tiene un valor para hacer la consulta por ejemplo:

Select * from encuesnta where folio='hgf
o
Select * from encuesnta where folio=

En si lo que significa la excepción es que un valor se perdio en la expresición, puede ser que el parametro no lo mandes bien, puedes hacer esto si usar parametros:

Query1.Close;
Query1.SQL.Text:='select * from encuesta where Folio ='+Edit1.Text;
Query1.Active:=true;

yo creo que con esto funcionara perfectamente pruebalo y si no sirve me avisas.

 :comp:

Navegación

[0] Índice de Mensajes

[#] Página Siguiente