Tengo error al declarar mi variable de tipo string este es el error: Incompatible type for arg no. 1: Got "Constant String", expected "TStrings" Este es elc�digo gracacias a jose

Var A: String;
edit1.Text:= 'A'; //Busca la cadena  ingresada
zquery1.SQL:= 'SELECT * FROM nombres WHERE nombre =: A;
zquery1.ParamByName('A').asString := edit2.text;
zquery1.Open;

El 19/11/2010 02:21 p.m., Lissy Amador escribi�:

zquery1.SQL:= 'SELECT * FROM nombres WHERE nombre =: A;

no es una asignaci�n.. los : van junto al nombre del par�metro..

zquery1.SQL:= 'SELECT * FROM nombres WHERE nombre = :A';

Tienes raz�n pero ya lo he modificado y sigo teniendo el mismo error:

Error: Incompatible type for arg no. 1: Got "Constant String", expected "TStrings"

Hello Paola,

Friday, November 19, 2010, 5:30:30 PM, you wrote:

PB> El 19/11/2010 02:21 p.m., Lissy Amador escribi�:

> zquery1.SQL:= 'SELECT * FROM nombres WHERE nombre =: A;

PB> no es una asignaci�n.. los : van junto al nombre del par�metro..

PB> zquery1.SQL:= 'SELECT * FROM nombres WHERE nombre = :A';
zquery1.SQL.Text:= 'SELECT * FROM nombres WHERE nombre = :A';
           ^^^^^^

El 19/11/2010 04:32 p.m., Jos� Mejuto escribi�:

cierto! no me d� cuenta de ese detalle!! :(

tenian razon ya no tengo problema al compilar
ahora mi problema esta en la ejecucion
que me esta faltando

Respecto a tu pregunta nunca he usado zeus ya que trabaja con firebird y por tal motivo no lo necesito y no quiero enredarme con un control m�s, pero lo que pregunta te lo puedo responder f�cilmente.

Para eso no necesitas declarar ninguna variable.

Se supone que tienes una caja de texto y en el vas a escribir el nombre a
buscar y adem�s tienes un bot�n, pues en el c�digo del bot�n basta con:
Alguien (Ismael) me decia que no debia de usar una variable
porque el procedimiento lo estoy haciendo en un bot�n entonces
solo debo de hacer esto
begin
  zquery1.SQL.text:= 'SELECT * FROM tabla WHERE nombre = :sNombre';
  zquery1.ParamByName('sNombre').asString := edit2.text;
  zquery1.Open;
end;
Creo que se podria hacer de est� manera, pero ya lo intente y tengo
el error de ejecucion no me encuentra el parametro edit1.text en la
sentencia donde esta ***
begin
     zquery1.SQL.text:= 'SELECT * FROM tabla WHERE nombre = :edit1.text';
***  zquery1.ParamByName('edit1.text').asString := edit2.text;
     zquery1.Open;
end;

Alguien (Ismael) me decia que no debia de usar una variable
porque el procedimiento lo estoy haciendo en un bot�n entonces
solo debo de hacer esto
begin
  zquery1.SQL.text:= 'SELECT * FROM tabla WHERE nombre = :sNombre';
  zquery1.ParamByName('sNombre').asString := edit2.text;
  zquery1.Open;
end;
Creo que se podria hacer de est� manera, pero ya lo intente y tengo
el error de ejecucion no me encuentra el parametro edit1.text en la
sentencia donde esta ***
begin
     zquery1.SQL.text:= 'SELECT * FROM tabla WHERE nombre = :edit1.text';
***  zquery1.ParamByName('edit1.text').asString := edit2.text;
     zquery1.Open;
end;

El 19/11/2010 06:22 p.m., Lissy Amador escribi�:

Hola Lissy.. la verdad que no entiendo nada el mail! yo no pregunt� nada; solo trat� de ver d�nde estaba tu error...

en realidad si est�s usando los componentes zeos, porque ah� veo un zquery. en parambyname va el nombre del par�metro en la sentencia sql..

cu�l es tu sentencia?

No, no tienes que usar 2 cajas de texto, solo 1

Si la caja de texto se llama edit2 solo tienes que hacer:

  zquery1.SQL.text:= 'SELECT * FROM tabla WHERE nombre = :sNombre';
  zquery1.ParamByName('sNombre').asString := edit2.text;
  zquery1.Open;

El par�metro no es ni una variable, ni una caja de texto eso va solo con 1 sola caja de texto y 1 solo boton

El nombre del par�metro se sustituye por su valor quedando al a hora de ser ejecutada la sentencia como

select * from tabla where nombre = 'pedro'

Para el caso de que hayas puesto predro en la caja de texto.

Saludos reiterados
=========
|| ISMAEL ||
=========

Nada ah� ser�a:

zquery1.SQL.Text:= 'SELECT * FROM nombres WHERE nombre = :A';
zquery1.ParamByName('A').asString := edit2.text;
zquery1.Open;

Saludos reiterados
=========
|| ISMAEL ||
=========

Creo que no me he dado ha entender.
tengo una tabla que lleva por nombre nombres, y en ella estan los siguientes campos id, nombre, apellido, edad, ciudad

lo que quiero es hacer una busqueda colocar una caja de texto para el ingreso del nombre a buscar y el resultado lo pueda ver en un texto (podria ser ver el apellido), en un listado, un dbgrid yo ponia de ejemplo un texto porque creo que es el mas facil.

El 19/11/2010 07:48 p.m., Lissy Amador escribi�:

a ver entonces si le embocamos..

pones un zquery en el form;
haces la consulta:
   zquery1.SQL.text:= 'SELECT * FROM tabla WHERE nombre = :sNombre';
   zquery1.ParamByName('sNombre').asString := edit2.text;
   zquery1.Open;
if not zquery1.IsEmpty then begin
begin
   // entonces encontr� algo...
   // suponiendo que esperas un resultado �nico, pones el apellido de
ese nombre encontrado en otro textbox por ejemplo:
  apellidos.text:= zquery.FieldByName('apellido').AsString;
end;

es algo de esto?
chauuuuuuuu

Hola si te lias con los parambyname tambi�n puedes sumar la cadena al
sql tal que as�:
  zquery1.SQL.Text:= 'SELECT * FROM nombres WHERE nombre = ' +
QuotedStr( edit2.text );
  zquery1.Open;

P.D: Lo de QuotedStr() es pra que te a�ada el texto entre comillas ya que el campo nombre es varchar.

________________________________________________________________________

ARTEX TRADING S.A.
Jos� Antonio Cuello Principal

El vie, 19-11-2010 a las 16:13 -0500, Ismael L. Donis Garc�a escribi�:

------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20101119/cf2bf920/attachment.html>

Hola
tengo un par de dudas con respecto a los parametros para hacer una busqueda.
en mi caso sandra esta cmo buscarNombre, que yo lo hubiera tomado como una variable.

les comento que el codigo de la busqueda es:

zquery.sql:= 'SELECT * from TABLE where nombre = :sandra';
Zquery.ParamByName('sandra').asstring:=edit2.text;
ZQuery.Open;
if ZQuery.Eof then begin
  ShiwMessage'Nombre no encontrado');
end else begin
ShiwMessage'Nombre SI encontrado');
end;

en el parametro sandra es un nombre que esta almacenado en mi tabla, pero al buscar puedo colocar cualquier nombre almacenado y me mostrara el mensaje que si lo encontro pero no puedo mostrarlo en otro componente.

El 20/11/2010 10:00 a.m., Lissy Amador escribi�:

ac� se te est�n entreverando conceptos.. claro que un nombre de variable puede llamarse si quer�s "sandra", pero vos lo que quer�s es buscar ese valor..
para el caso que comentas, no te compliques usando par�metros... hac� tal cual lo que te dijo Jos� Antonio.., que lo ten�s en tu mismo mail abajo de todo..
chauuuuuuuuuuuu

Lo puedes mostrar en un TLabel por ejemplo cambiando el caption

Saludos reiterados
=========
|| ISMAEL ||
=========

He tomado en cuento lo de mostrar en label
cuando realizo una busqueda para que no se puedan modificar los datos claro que las modificaciones se guardarian solo so se preciona el bot�n de guardar modificaciones.
pero el caso es que hice lo de mostrarlo en label y tengo un erro, no me encuentra los parametros (utilizando el zquery.open), pero si uso el zquery1.ExecSQL no me muestra ningun campo tan solo me muestra el mensaje que no se ha encontrado (el mensaje que yo le puse)

   zquery1.SQL.Text := 'SELECT * FROM entradap WHERE empresa =:emp';
   zquery1.ParamByName('emp').asString := edit8.text;
   zquery1.open;
    if zquery1.EOF then begin
       showMessage('Nombre NO Encontrado');
       end else
    begin
    edit9.text := zquery1.FieldByName('encargado').AsString ;
    edit10.text := zquery1.FieldByName('equipo').AsString ;
    Label15.Caption:= zquery1.ParamByName('encargado').AsString;

Hello Lissy,

Thursday, November 25, 2010, 9:10:59 PM, you wrote:

LA> He tomado en cuento lo de mostrar en label
LA> cuando realizo una busqueda para que no se puedan modificar los datos LA> claro que las modificaciones se guardarian solo so se preciona el LA> bot�n de guardar modificaciones.
LA> pero el caso es que hice lo de mostrarlo en label y tengo un erro, no me encuentra LA> los parametros (utilizando el zquery.open), pero si uso el LA> zquery1.ExecSQL no me muestra ningun campo tan solo me muestra el LA> mensaje que no se ha encontrado (el mensaje que yo le puse)

ExecSQL es algo como "Haz esto y cuando acabes listo", vamos que no devuelve ning�n campo ni nada, simplemente ejecuta una orden.