Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

Para baixo

Como comparar datas e a diferença entre elas obter Integer Encontre agências semelhantes


DerZky   (2001-12-19 18:14) [0]

Como comparar duas datas e escrever a diferença entre elas em uma variável do tipo Integer. Por exemplo, para que 21.12.2001 menos 19.12.2001 seja igual a 2.



Mick   (2001-12-19 18:18) [1]

Trunc(EncodeDate(2001,12,21) - Trunc(EncodeDate(2001,12,19) как раз и равно 2



DerZky   (2001-12-19 19:46) [2]

Написал я следующее

procedure TForm1.Button1Click(Sender: TObject);
var
Cifra:Integer;
begin
Cifra:=Trunc(EncodeDate(2001,12,21))-Trunc(EncodeDate(2001,12,19));
end;

а Дельфи пишет - [Hint] Unit1.pas(30): Value assigned to "Cifra" never used
O que é isso?



LLL   (2001-12-19 21:16) [3]

Это просто предупреждение, что Cifra более нигде не используется.
Беспокоится - не забыли ли Вы о Cifra?



a100   (2001-12-19 21:16) [4]

и правильно пишет ! А где вообще используется полученный результат ?! Переменная - то локальная



Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

em cima









Memória: 0.82 MB
Hora: 0.037 c
4-22502
Alexander
2001-11-06 11:00
2002.01.08
Como obter um ícone para uma extensão registrada no sistema


14-22385
moderador
2001-11-03 11:57
2002.01.08
> Para Merlin - (SYSTRAY)


1-22104
Derzky
2001-12-18 19:54
2002.01.08
Como comparar datas.


1-22069
Xtorm
2001-12-19 10:40
2002.01.08
Como?


14-22350
Ouriço
2001-11-04 16:49
2002.01.08
Eu sento aqui e nada para fazer!





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese romeno Russa sérvio Slovak esloveno espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol