Si el campo es persistente:
Código Delphi
[-]
kk:=FrmCotizacion.QConsultaID_COTIZACION.Value;
Sino:
Código Delphi
[-]
kk:=FrmCotizacion.QConsulta.Fields[1].AsString
Donde he puesto uno es el número que ocupa el campo en la consulta teniendo en cuenta que el primero es 0, y donde puse AsString, puede ser AsDateTime, AsDouble, AsInteger....
Un Saludo.