Pregunta: | 4495 - BUSCAR REGISTROS EN UNA TABLA |
Autor: | Jorge Ruiz |
Necesito buscar registros en una tabla de foxpro 2.6, con Delphi 2.0 utilizando un TEdit o un combobox pues el programa que tengo solo trae los componentes basicos, cualquier informacion me sera de gran ayuda. Gracias |
Respuesta: | ALFREDO ANGULO |
Pues es muy facil buscar registros en una tabla, también depende mucho para que lo quieres usar, pero la forma una de las formas más sencillas es posicionándote en el registro que es mediante la propiedad SetKey-GotoKey, por ejemplo: (*********************************************************************************) Nota: Para buscar algún registro tienes que Indexar el campo a buscar en el "DataBase DeskTop" <Nombre-Tabla>.SETKEY; <Nombre-Tabla>.FieldByName(Campo).AsString:=Edit1.Text; If <Nombre_Tabla>.GotoKey Then //Si hallastes la llave(Registro) entonces Begin --------- End; (*********************************************************************************) Otra forma sería por medio de un ciclo, aunque no es muy recomendable cuando se manejan miles de registros de información, pero acontinuación te mostraré el código: While (Not <Nombre-Tabla>.EOF) Do Begin If (<Nombre-Tabla>.FieldByName(Campo).AsString=Edit1.Text) then Begin ------ End <Nombre-Tabla>.Next; End; (*********************************************************************************) Bueno, espero que te serva de algo y que te ayude, me despido y te deseo Feliz Año 2001 Hasta luego.........!!!!!! |