Román y todos, muchas gracias por la ayuda, ya quedó.
Hoy aprendí algo, ya me puedo dormir tranquilo
Perdón por las preguntas de párvulo, así pasa cuando uno apenas está aprendiendo.
FCG
Código Delphi
[-]
cCadena := ' UPDATE segmento SET '+
' IDEmpresa = '+ QuotedStr(IntToStr(FMain.oVariables.nEmpresa))+
' , IDSucursal = '+ QuotedStr(IntToStr(FMain.oVariables.nSucursal))+
' , Nombre = '+ QuotedStr(csNombre.Text)+
' , Comentario = '+ QuotedStr(csComentario.Text)+
' , Lapsos = '+ QuotedStr(IntToStr(nLapsos))+
' , Usuario = '+ QuotedStr(FMain.oVariables.cUsuario)+
' , U_Fecha = '+ QuotedStr(DateToStr(Now))+
' , Juntar1 = '+ QuotedStr(FloatToStr (nsJuntar1.Value))+
' , Juntar2 = '+ QuotedStr(FloatToStr (nsJuntar2.Value))+
' , Juntar3 = '+ QuotedStr(FloatToStr (nsJuntar3.Value))+
' , Juntar4 = '+ QuotedStr(FloatToStr (nsJuntar4.Value))+
' , Juntar5 = '+ QuotedStr(FloatToStr (nsJuntar5.Value))+
' , Juntar6 = '+ QuotedStr(FloatToStr (nsJuntar6.Value))+
' , Juntar7 = '+ QuotedStr(FloatToStr (nsJuntar7.Value))+
' , Juntar8 = '+ QuotedStr(FloatToStr (nsJuntar8.Value))+
' , Juntar9 = '+ QuotedStr(FloatToStr (nsJuntar9.Value))+
' , Juntar10 = '+ QuotedStr(FloatToStr (nsJuntar10.Value))+
' , HoraInicio1 = :h1'+
' , HoraInicio2 = :h2'+
' , HoraInicio3 = :h3'+
' , HoraInicio4 = :h4'+
' , HoraInicio5 = :h5'+
' , HoraInicio6 = :h6'+
' , HoraInicio7 = :h7'+
' , HoraInicio8 = :h8'+
' , HoraInicio9 = :h9'+
' , HoraInicio10 = :h10'+
' , HoraFin1 = :f1'+
' , HoraFin2 = :f2'+
' , HoraFin3 = :f3'+
' , HoraFin4 = :f4'+
' , HoraFin5 = :f5'+
' , HoraFin6 = :f6'+
' , HoraFin7 = :f7'+
' , HoraFin8 = :f8'+
' , HoraFin9 = :f9'+
' , HoraFin10 = :f10'+
' Where IDSegmento = '+ QuotedStr(IntToStr(nIDSegmento)) ;
SQL.Clear;
SQL.Add(cCadena);
Parameters.ParamByName('h1').Value := dsInicio1.Time;
Parameters.ParamByName('h2').Value := dsInicio2.Time;
Parameters.ParamByName('h3').Value := dsInicio3.Time;
Parameters.ParamByName('h4').Value := dsInicio4.Time;
Parameters.ParamByName('h5').Value := dsInicio5.Time;
Parameters.ParamByName('h6').Value := dsInicio6.Time;
Parameters.ParamByName('h7').Value := dsInicio7.Time;
Parameters.ParamByName('h8').Value := dsInicio8.Time;
Parameters.ParamByName('h9').Value := dsInicio9.Time;
Parameters.ParamByName('h10').Value := dsInicio10.Time;
Parameters.ParamByName('f1').Value := dFin1.Time;
Parameters.ParamByName('f2').Value := dFin2.Time;
Parameters.ParamByName('f3').Value := dFin3.Time;
Parameters.ParamByName('f4').Value := dFin4.Time;
Parameters.ParamByName('f5').Value := dFin5.Time;
Parameters.ParamByName('f6').Value := dFin6.Time;
Parameters.ParamByName('f7').Value := dFin7.Time;
Parameters.ParamByName('f8').Value := dFin8.Time;
Parameters.ParamByName('f9').Value := dFin9.Time;
Parameters.ParamByName('f10').Value := dFin10.Time;
SQL.Text := cCadena;
ExecSQL;