Ver Mensaje Individual
  #23  
Antiguo 25-02-2016
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.309
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por AgustinOrtu Ver Mensaje
Es que una consulta SQL escrita asi es un lio para entender

Te recomiendo, como siempre decimos, que uses parametros.

Refactoriza tu codigo para que siga mas o menos este estilo

Código Delphi [-]
  QTemp.SQL.Add(' INSERT INTO Factura (Campo1, Campo2, ...CampoN) ');
  QTemp.SQL.Add(' VALUES (:Campo1, :Campo2, ... :CampoN ');

  // es posible que en algunos casos tengas que especificar el tipo del parametro
  // en la mayoria de los casos lo "reconoce" solo
  QTemp.Parameters.ParamByName('Campo1').DataType:= ftString;
  QTemp.Parameters.ParamByName('Campo2').DataType := ftInteger;
  QTemp.Parameters.ParamByName('Campo3').DataType := ftCurrency;

  // para los componentes ADO se usa Query.Parameters.ParamByName
  QTemp.Parameters.ParamByName('Campo1').Value := ValorCampo1;
  QTemp.Parameters.ParamByName('Campo2').Value := ValorCampo2;

  // el resto de los componentes de acceso a datos, directamente Query.ParamByName
  QTemp.ParamByName('Campo1').Value := ValorCampo1;
  QTemp.ParamByName('Campo2').Value := ValorCampo2;

Pues iba a escribir lo mismo y he visto que Agustín lo ha comentado.
Mucho más sencillo de escribir, mucho más claro y mucho menos propenso a errores, sobre todo en campos a convertir como fechas, floats, cadenas,...
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita