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