Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   busqueda query (https://www.clubdelphi.com/foros/showthread.php?t=48614)

mjjj 29-09-2007 00:15:56

busqueda query
 
hola migos... una pregunta que para ustedes debe ser muy sencilla

necesito hacer una busqueda con un ibquery...

Código Delphi [-]
IBQUERY1.Close;
IBQUERY1.SQL.Clear;
ibquery1.SQL.add('select * from CLAVES');
ibquery1.SQL.add('where usuario = '+quotedstr(SEDIT1.TEXT)); //+quotedstr(sedit1.Text));
ibquery1.open;

si es que encuentra un registro que me arroje un mensaje... como puede ser ese codigo??


porfa ayuda,.... saludos

egostar 29-09-2007 00:25:13

Agrega esto después del open.

Código Delphi [-]
if IBQuery1.RecordCount > 0 then begin
  ShowMessage('Encontro registros');
end
else begin
  ShowMessage('NO Encontro registros');
end;

Salud OS

Caral 29-09-2007 00:28:19

Hola
No entiendo la pregunta, con la sentencia que pones encontrara un registro que cumpla con la condicion que se le da, en este caso la del edit.
No entiendo
Saludos

mjjj 29-09-2007 01:10:03

aer... voy a ser un poco mas claro....

en la tabla claves, estan los campos: usuario, nombre y clave.

con el ibquery busco el usuario ingresado por el sedit1
ahora bien... necesito un codigo que busque en el query si es que existe el usuario o no...

por ejemplo:

ingreso el usuario "KKK" en el edit y busco... pero el registro "KKK" no esta en la tabla... tonces que me arroje un mensaje de que no existe el usuario, y en caso contrario, osea que si lo encuentra, que compare el registro clave con lo que se ingreso en un sedit2.

... lo que necesito hacer es que form de validacion de usuario para entrar...

espero me puedan ayudar,, gracias


La franja horaria es GMT +2. Ahora son las 16:16:15.

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