FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Dos datos iguales en Busqueda.
Hola hace poco postee una pregunta sobre Busqueda en una base de datos y la verdad me soluciono bastante las respuesta.
ahora me surge una pregunta relacionada con una busqueda, resulta que tengo un form con varios dbEdit, y un Edit donde pongo el numero de la matricula de un vehiculo y me sale, pero es una base de datos donde se repite esa matricula porque ese vehiculo entro mas veces pero me sale solo la primera vez k entro, tiene mas entradas con el mismo numero de matricula pero no me sale posteo el codigo relacionado en la busqueda. procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); var cadena: Integer; Begin If Key = #13 Then Begin Table1.First; try cadena := StrToInt(Edit1.Text); except ShowMessage(' Debe introducir solo números.'); Exit; end; Table1.Filter:'N_MATRICULA = '+QuotedStr(Edit1.Text); Table1.Filtered:=True; If Not Table1.Locate('N_MATRICULA',Edit1.Text,[])Then ShowMessage(' Ese Nº Matricula no existe.'); end else Table1.Filtered:=false; end; Saludos. Última edición por kwan fecha: 13-09-2003 a las 15:13:11. |
#2
|
||||
|
||||
Para lo que quieres hacer, tendrás que utilizar o un Filtro, mírate las propiedades Filter y Filtered del Ttable.
Código:
MiTabla.Filter:'Matricula = '+QuotedStr(Edit1.Text); MiTabla.Filtered:=True; Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#3
|
|||
|
|||
Hola Marcos gracias de nuevo, mira en lo k tu me dices, no se puede hacer sin Rejilla(DBGrid)????? ya que lo k tengo es un form con DBEdit y cada vez k la pulsara intro me llevara a todas las veces k entro ese vehiculo con las reparaciones k se le hiciera especie de inventario o seguimiento del vehiculo tambien en el codigo k me pones donde iria en realidad?? y si valdria para los DBEdit???.
Saludos. |
#4
|
|||
|
|||
Bueno lo acabo de probar y si k funciona con un DBNavigator gracias Marcos un saludo.
Bueno lo he puesto en la primera pregunta con la respuesta de Marcos x si alguien le interesa el codigo. chao. Última edición por kwan fecha: 10-09-2003 a las 23:09:06. |
#5
|
|||
|
|||
Hola solo decir k modifique el codigo que puse en la primera pregunta por tener fallos, ya que lo k me dijo Marcos lo puse x error en otro sitio y ademas le he añadido el "Table1.Filterd:=False;" para retomar el control del form una vez encontrado la busqueda.
saludos. Última edición por kwan fecha: 13-09-2003 a las 15:15:52. |
|
|
|