Establecer Tipos de Campos en cadena SQL
 

Buenos dias

tengo una pequeña duda que quiza puedan ayudarme a resolver, el tema es que en mi casa Utilizo MS SQL Server y en la oficina Uso Access (si Access)

digamos que tengo esta cadena

Código Delphi [-]
 
 StrSql := 'Select D.Tdc, D.Doc, D.KOD, P.Descl, D.Cant, D.PU, D.Pt ' +
            'from (tblConsumoD D ' +
            'Left Join tblArticulo P on D.KOD = P.KOD) ' +
            'Where D.TDC = ' + QuotedStr(qryConsultaValesConsumoTdc.Value) +
            ' and D.DOC = ' + QuotedStr(qryConsultaValesConsumoDOC.Value) +
            ' Order by D.Tdc, D.Doc ';
  qryDetalleValeConsumo.SQL.Clear;
  qryDetalleValeConsumo.SQL.Add(StrSql);
  qryDetalleValeConsumo.Close;
  qryDetalleValeConsumo.Open;

obiamente es nua consulta... pero para los campos Cant, PU, PT como les establezco el Tipo? Double? Integer?

El tipo de dato de las columnas resultantes de la consulta lo determina el propio motor, pero también puedes "forzarlo" con la función nativa "Cast".

Código SQL [-]
Select D.Tdc, D.Doc, D.KOD, P.Descl, Cast (D.Cant As Double Precision)...

NOTA: Ahora no recuerdo si el tipo de dato Double Precision tiene el mismo nombre en Access.

Yo he entendido algo distinto, así que tú alclararás lo que querías preguntar.

Si tienes una claúsula where donde quieres usar el p.Cant por ejemplo, no usas el quotedStr y listo. Si quieres que sea un integer (no le añadas decimales) y si quieres el motor lo identifique como float, pues le añades el ".0" al final.

el código con Cant como integer y PU como float (para tener los dos ejemplos):

Código Delphi [-]
   qryDetalleValeConsumo.Close;
  qryDetalleValeConsumo.SQL.Text := 'Select D.Tdc, D.Doc, D.KOD, P.Descl, D.Cant, D.PU, D.Pt ' +
            'from (tblConsumoD D ' +
            'Left Join tblArticulo P on D.KOD = P.KOD) ' +
            'Where D.TDC = ' + QuotedStr(qryConsultaValesConsumoTdc.Value) +
            ' and D.DOC = ' + QuotedStr(qryConsultaValesConsumoDOC.Value) 
+         ' and D.Cant = ' + IntTostr(VariableIntegerCant) 
+         ' and D.PU = ' + FloatToStr(Variablefloat)
+
            ' Order by D.Tdc, D.Doc ';
  qryDetalleValeConsumo.Open;

Saludos

Te recomendaria que escribas esta misma consulta en el mismo Access. Luego, desde la opcion de diseño, donde ves todas las columnas (campos de consulta), pulsando Ctrl F2 sobre , en este caso "Cant", te abre el editor de campos, columnas, y desde alli opcion de un monton de funciones propias de Access, entre ellas:
CDbl([PU]) AS PU_doble,
CInt([Cant]) AS Cant_int,

saludos, suerte.