![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
![]() Tengo una tabla llamada alumnos en donde he creado un indice con el IBexpert llamado xMatricula.
Mi pregunta es como puedo buscar por indices como lo hacia en paradox o de que otra forma puedo hacerlo. Es una base de datos con extension gdb, y utilizo el firebird 1.5. y uso los componentes IBDatabase,IBTransaction y IBTable. Yo hacia en paradox lo siguiente: procedure TFrm_Alumnos.Matricula1Click(Sender: TObject); var matricula:string; Encontrado:Boolean; begin try matricula:=inputbox('Busqueda por matrícula de alumno','Introduzca la matrícula',''); DM_SICEC.Tbl_Alumnos.IndexName:='xMatricula'; Encontrado:=DM_SICEC.Tbl_Alumnos.Findkey([matricula]); if not Encontrado then ShowMessage('El numero de matrícula introducido no se encuentra registrado'); except on EConvertError do ShowMessage('Introduzca los caracteres en forma correcta'); end; end; gracias ![]() Última edición por noe fecha: 04-10-2004 a las 17:58:05. |
#2
|
|||
|
|||
Hola:
si utilizas el Componente Table puedes usar el proc. "Locate"
quedaria de la siguiente manera Código:
Encontrado:=Table1.Locate('Clave',Edit1.Text,[]); |
#3
|
||||
|
||||
![]() Me podrias decir por favor para que sirven los conchetes [] en el codigo que me pusiste.
gracias Ah y si sirvio lo que me mandaste ¡Muchas gracias! ![]() |
#4
|
||||
|
||||
Son obligatorios y puede ir vacios como en el ejemplo que te pone "El_Perrito"
o: loCaseInsensitive, loPartialKey Puedes mirarte también la ayuda sobre Locate, donde te viene documentado. Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
![]() |
![]() |
|
|
![]() |
|