Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

abajo

Cómo comparar fechas y la diferencia entre ellas para obtener un entero Encontrar ramas similares


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

La forma de comparar dos fechas y la diferencia entre ellas se registra en una variable de tipo Integer. Por ejemplo, para que 21.12.2001 menos 19.12.2001 sea igual a 2.



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

Trunc (EncodeDate (2001,12,21) - Trunc (EncodeDate (2001,12,19) es exactamente igual a 2)



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

Escribí lo siguiente

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

Delphi escribe - [Sugerencia] Unit1.pas (30): el valor asignado a "Cifra" nunca se usó
¿Qué es?



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

Esto es solo una advertencia de que Cifra no se usa en ningún otro lugar.
Preocúpate, ¿te has olvidado de Cifra?



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

y escribe correctamente! ¿Y dónde se usa generalmente el resultado obtenido? Variable es local



Páginas: 1 rama entera

Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba





Memoria: 0.55 MB
Tiempo: 0.023 c
4-22509
Karan
2001-11-08 12:50
2002.01.08
GetkeyboardState- ¿Qué hace?


3-21956
Sevostyanov Igor
2001-12-05 17:56
2002.01.08
Ejecutar programáticamente SHUTDOWN INMEDIATE


7-22437
Paradoja
2001-09-25 18:48
2002.01.08
wav


1-22215
VovaKomarov
2001-12-16 13:36
2002.01.08
actualización del cliente


1-22129
Aleksandr
2001-12-19 16:04
2002.01.08
¿Cómo eliminar el parpadeo de tu barra de desplazamiento?





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish French
gallego georgiano Alemán Griego criollo haitiano Hebreo hindi Húngaro islandés Indonesian irlandés Italiano Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese Rumano Ruso Serbio Slovak Esloveno Español swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español