[ContraVeneno]

Código Delphi [-]
query1.Fields.Fields [1].AsString;
query1.Fields.Fields [1].AsInteger;
query1.Fields.Fields [1].AsFloat;
query1.Fields.Fields [1].AsBoolean;
query1.Fields.Fields [1].AsCurrency;

//-----------
Etc, etc, etc... Dependiendo de como lo necesites
//-----------

query1.Fields.Fields [1].Value; //Este es de tipo Variant y puede generar errores de conversión.

//-----------
Si ya sabes el nombre del campo, es preferible utilizar:
//-----------

Query1.FieldByname('venta_id').AsString; //AsFloat, AsInteger, etc, etc dependiendo