Fórum TMonthCalendar estranho #346874

01/10/2007

0

Delphi

Boa noite,

Seguinte tenho um componente TMonthCalendar no form, mas o mesmo só entra em uma determinada condição quando eu ´Clico´ no calendário.

Ou seja, quando eu abro o form não está entrando na condição...

obs: no evento show do form, eu estou colocando ´mcagenda.date´;

Problema
 if mcagenda.Date = Date then


clicando na agenda funciona está condição.

Segue abaixo um pouco mais...
              if mcagenda.Date = Date then
              begin
                if StrToTime(Cells[0,i]) < Time then
                begin
                  horai := StrToTime(Cells[0,i]);
                  horaf := Time;
                  tempo := MinutesBetween(horaf,horai);
                  Cells[7,i]:= ´At.´+´ ´+IntToStr(tempo)+´ Min´;
                end;
              end;



Unix

Unix

Responder

Posts

01/10/2007

Unix

Problema resolvido

[CODE}
if DateToStr(mcagenda.Date) = DateToStr(Date) then
[/CODE]


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar