Ver Mensaje Individual
  #3  
Antiguo 14-10-2008
[FGarcia] FGarcia is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Cordoba, Veracruz, México
Posts: 1.123
Reputación: 22
FGarcia Va por buen camino
Efectivamente si te quieres quitar dolores de cabeza envia parametros, yo lo he hecho asi usando ADO y Access

Código Delphi [-]
With ConsultaTotales1 do
        Begin
          Close;
          SQL.Clear ;
          miSQL := '';
          miSQL := 'SELECT * FROM Captura ' +
'WHERE (HoraFecha BETWEEN :FIni AND :FFin)' +
'ORDER BY Consecutivo';
          SQL.Add(miSQL);
          Parameters.ParamByName('FIni').Value := FechaInicio;
              Parameters.ParamByName('FFin').Value := FechaFinal;
          Open;
 
 
//En el click de un boton envio y formateo, obtengo los datos de un Maskedit
procedure TfrmHoraFecha.Button1Click(Sender: TObject);
var
HInicial, HFinaliza : TDateTime;
begin
  HInicial := StrtoDateTime(meTInicio.Text);
  DateTimetoString(HoraInicio, 'hh:nn:ss am/pm', HInicial);

  HFinaliza := StrtoDateTime(meTFinal.text);
  DateTimetoString(HoraFinal, 'hh:nn:ss am/pm', HFinaliza) ;

  FechaInicio := meFInicio.Text + ' ' + HoraInicio ;
  FechaFinal := meFFin.Text + ' ' + HoraFinal ;

  MDatos.ConsultaHoraFecha ;
  Close;
end;
__________________
ESTO ES UN FORO ... NO UN MÓVIL
¿Por qué no escribir de una manera comprensible para que los humanos lo podamos entender?
Responder Con Cita