Ver Mensaje Individual
  #17  
Antiguo 19-11-2010
BrunoBsso BrunoBsso is offline
Miembro
 
Registrado: nov 2009
Ubicación: Berisso, Buenos Aires, Argentina
Posts: 239
Reputación: 15
BrunoBsso Va por buen camino
Cita:
Empezado por gonza_619 Ver Mensaje
hola, bueno para guardar hora en un campo string, la hora de un dtpicker, podria ser algo como:

primero cambio el formato: dtpicker.format:=HH:mm

luego
var x:tdatetime
x:=dtpicker.time;
tablex.fieldbyname('hora'),asstring:=timetostr(x);

estaria en lo correcto?
otra pregunta, si quiero comparar la variable x para ver si es > o < a por ej:05:00
if x<05:00 then hace algo
me lo compara?
Para guardar la hora en un string y mandarla a la BD:
Código Delphi [-]
var
  S: String;
begin
  S := FormatDateTime('HH:mm',dtpicker.Time);
  tablex.fieldbyname('hora'),asstring := S;
  //Mas simple: tablex.fieldbyname('hora'),asstring :=  FormatDateTime('HH:mm',dtpicker.Time);
end;

Para comparar:
Código Delphi [-]
var
  X, Comparacion: TTime;
begin
  X := Now;
  Comparacion := StrToTime('05:00:00');
  if (X < Comparacion) then //Si X es menor a 05:00:00
    ShowMessage(TimeToStr(X) + ' es menor a ' + TimeToStr(Comparacion))
  else if (X > Comparacion) then //O mayor
         ShowMessage(TimeToStr(X) + ' es mayor a ' + TimeToStr(Comparacion))
       else
         ShowMessage('Son iguales');
end;
Responder Con Cita