Cita:
Empezado por gonza_619
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;
end;
Para comparar:
Código Delphi
[-]
var
X, Comparacion: TTime;
begin
X := Now;
Comparacion := StrToTime('05:00:00');
if (X < Comparacion) then ShowMessage(TimeToStr(X) + ' es menor a ' + TimeToStr(Comparacion))
else if (X > Comparacion) then ShowMessage(TimeToStr(X) + ' es mayor a ' + TimeToStr(Comparacion))
else
ShowMessage('Son iguales');
end;