Fórum comparando dateTime #432945
19/01/2013
0
Evandro Viana
Curtir tópico
+ 1Posts
21/01/2013
Bruno Leandro
var
Data: TDateTime;
Ano,Mes,Dia,Hora,Minuto,Segundo: Integer;
begin
Ano := 2012;
Mes := 1;
Dia := 1;
Hora := 10;
Minuto := 1;
Segundo := 10;
Data := EncodeDateTime(Ano,Mes,Dia,Hora,Minuto,Segundo);
Qry.Locate( 'Campo',Data, [] );
Gostei + 0
22/01/2013
Evandro Viana
Gostei + 0
23/01/2013
Bruno Leandro
Gostei + 0
23/01/2013
Evandro Viana
tentei fazer o seguinte
procedure TFDadosAgenda.DTPHoraInicialExit(Sender: TObject);
var tempo01, tempo02 :TDateTime;
begin
tempo01 := FViewAgenda.CDSAgendix.FieldByName('HORARIOINICIALAGENDA').AsDateTime;
tempo02 := DTPHoraInicial.Time;
if TimeToStr(tempo01) = TimeToStr(tempo02)then
begin
ShowMessage(''Horário já agendado'');
end;
end;
Obs: Só consegue pegar o primeiro valor,,ele nao varre todos os valores...como eu posso ajeitar?
Gostei + 0
23/01/2013
Evandro Viana
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)