// ADOQuery1.SQL.Text := 'select A_ID, A_VL from TBL_A';
// [int]    A_ID =  1 ;
// [bigint] A_VL = - 1234567890987654321 

  Panel1.Caption := ADOQuery1.Fields[ 1 ].Value;
// имеем  1234567890987654321 

  Panel2.Caption := IntToStr( VarAsType(ADOQuery1.Fields[ 1 ].Value,varInt64) );
// имеем - 1318314831 

  ADOQuery1.UpdateCursorPos;
  Panel3.Caption := ADOQuery1.Recordset.Fields[ 1 ].Value;
// имеем - 1234567890987654321