query y locate

[Descendents]

SELECT p.cod_Practica as codigo
FROM practica AS p, alumno AS a
WHERE p.cod_Alumno=a.cod_Alumno AND
a.dni_Alumno=:dni

query1 tiene este select digamos.

Sino te he entendido mal,esta lina es el resultado que tu buscas.
query1.fieldbyname('codigo').value;

en lugar de value, tambien puedes usar asstring o asinteger.

Saludos