PDA

Ver la Versión Completa : Busqueda En un DBgrid!!!


feliz-58
08-09-2012, 04:54:46
Tengo un Form con los siguientes componentes:
DBGrid1: TDBGrid;
ADOConnection1: TADOConnection;
ADOTable1: TADOTable;
DataSource1: TDataSource;
Button1: TButton;
Edit1: TEdit;


El boton es para buscar mediante el Edit un Registro en el campo dentro del DBGRID que se llama Cedula, pero tengo el problema de que cuando encuentra el registro, el DbGRID se queda motrando ese unico registro y no se como hacer que vuelva a mostrarme todos los que estaban antes de la busqueda, el codigo del buton es este:

begin
ADOTable1.Filtered := True;
ADOTable1.Filter := 'Cédula: = '+Edit1.Text;
if ADOTable1.RecordCount = 0 then
begin
ShowMessage('Usuario no Encontrado');
ADOTable1.Filtered := False;
end;


Me podrian Ayudar?
Gracias Amigos :)

//Saludos :D

oscarac
08-09-2012, 06:41:57
y en lugar de hacer un filtro
porque no intentas con un locate?

algo asi


qryAnexos.Locate('Codigo', edtSearch.Text, [loPartialKey])

feliz-58
09-09-2012, 15:00:47
y en lugar de hacer un filtro
porque no intentas con un locate?

algo asi


qryAnexos.Locate('Codigo', edtSearch.Text, [loPartialKey])

[Error] Unit5.pas(109): Undeclared identifier: 'qryAnexos'
[Error] Unit5.pas(109): Undeclared identifier: 'edtSearch'
[Error] Unit5.pas(109): 'END' expected but ',' found
[Fatal Error] Unit2.pas(53): Could not compile used unit 'Unit5.pas'

eso es lo que sale :D

Casimiro Notevi
09-09-2012, 16:10:10
eso es lo que sale :D

Oscarac te ha puesto un ejemplo, tú debes de hacerlo con tus componentes, con los nombres que tengan.
Haz una búsqueda por 'locate', es un tema tratado infinidad de veces.

feliz-58
09-09-2012, 20:07:32
y en lugar de hacer un filtro
porque no intentas con un locate?

algo asi


qryAnexos.Locate('Codigo', edtSearch.Text, [loPartialKey])

Gracias amigo, busque y aprendi a usarlo, ya lo eh solucionado...:D

Casimiro Notevi
09-09-2012, 21:24:17
Perfecto ^\||/

feliz-58
09-09-2012, 21:29:39
Perfecto ^\||/

Me puedes ayudar con este otro tema? /foros/showthread.php?t=80205

Casimiro Notevi
09-09-2012, 21:33:43
¿ya leiste nuestra guía de estilo (http://www.clubdelphi.com/foros/guiaestilo.php)?, gracias por tu colaboración :)

¡¡¡ Ah !!!, que has puesto un enlace a otra pregunta tuya, vale, iré a verlo.