como obtener el valor de un campo

[Yoli]

Hola a todos, estoy haciendo una consulta con un IBQuery que va asi:
select login, clave, id_perfil from usuarios where clave=: cla and login=:log

lo que quiero es extraer el valor de campo id_perfil para el registro obtenido y guardarlo en una variable (perf = string .

lo que llevo del codigo es lo siguiente:

with IBQUsuarios do
begin
ParamByName('USU').AsString:= txtUsuario.Text;
ParamByName('CLA').AsString:= txtClave.Text;
Active := true;

pero no se que instruccion debo colocar para guardar el valor del campo id_perfil en la variable perf. Bueno espero puedan aconsejarme con esto. chao y saludos de antemano.

[[Héctor Randolph]]

Hola Yoli!

Una forma de hacerlo sería la siguiente:

Código Delphi [-]
var
  perf: String;
begin
 .
 .
 with IBQUsuarios do
 begin
  ParamByName('USU').AsString:= txtUsuario.Text;
  ParamByName('CLA').AsString:= txtClave.Text;
  Active := true;
  perf:=FieldByName('id_perfil').AsString;
 .
 .

end;

Otra forma posible sería

Código Delphi [-]
var
  perf: String;
begin
 .
 .
 with IBQUsuarios do
 begin
  ParamByName('USU').AsString:= txtUsuario.Text;
  ParamByName('CLA').AsString:= txtClave.Text;
  Active := true;
  perf:=Fields[2].Value;// Considerando que login=0,clave=1,id_perfil=2
 .
 .

end;

Espero que alguna de estas te sea útil, un saludo

[Yoli]

Hola Hector gracias por tu ayuda, ya probe el codigo y me funciona perfectamente. Saludos y gracias de nuevo.