01.00 majd" />

Hogyan összehasonlítani az időt

hogyan lehet összehasonlítani idő

Üdvözlünk! eljárás TForm1.Button1Click (Sender: TObject);
kezdődik

ha az idő <01.00 then ShowMessage("Рано!") ;
ha az idő> 01.00 majd ShowMessage ( "Túl késő!");
végén; miért nem működik rendesen a kódot. Nem számít, hogy mennyi az idő kiabál, hogy a korai. És hogyan lehet összehasonlítani az időt. Köszönöm mindenkinek, aki válaszolni fog

milyen időben és 01.00


> Mi az az idő, és a 01.00

idő a jelenlegi rendszer idején 01.00 az idő, ami összehasonlítva a jelenlegi

> Nem számít, hogy mennyi az idő kiabál, hogy előbb

mert az idő - tört része egy dupla, hogy képviseli a dátum-idő. A tört része mindig <1


eljárás TForm1.Button1Click (Sender: TObject);

var
# XA0; Present: TDateTime;
# XA0; Hour, Min, Sec, Msec: szó;
kezdődik
# XA0; Present: = Most;

# XA0; DecodeTime (Present, óra, Min, Sec, ms);
# XA0, ha órás <1 then ShowMessage("Рано!") ;
# XA0, ha Óra> 1, akkor ShowMessage ( "Túl késő!");

TDateTime (01.00) == == 1 nap 24 óra == == és 1440 perc 86.400 másodperc

> [8] anton773 # XA0; (11.03.11 18:44)
> Works!

Miért érted?

ha (T <1/24) then ShowMessage("Рано!");
if (T> 1/24), akkor ShowMessage ( "Túl késő!");

Az idő mindig kevesebb, mint 1

Egy másik kérdés is: mi van, ha = 1 óra, akkor a „csak jobb”?


> Az idő mindig kevesebb, mint 1

akkor miért van erre szükség. és általában használt? (Úgy értem, ha ez nem a pontos időt)


> Az idő mindig kevesebb, mint 1

Ezért mindig egy kis időt :(

Meg mindig kevesebb, mint egy, a másik, hogy nem lehet.

Végezzen egy oktatási program, hogy van.
A dátum és idő tárolódnak lebegőpontos szám

Beépített f-CIÓ Most visszatér a típus TDatetime, amelynek lényege egy lebegőpontos szám
például
345678.334456
ahol az egész része - az a dátum és a frakcionált - ezúttal
azaz a dátum lesz = 345678
és idő = 0.334456
használt lefordítani két funkcióban érthető formában
DecodeDate
DecodeTime
hogy konvertálni egy lebegőpontos számot egy pár szám, melyek mindegyike a nap, hónap, év, második, perc, óra

Általánosságban elmondható, hogy jobb. ToStr

Valószínűleg azért, mert szocializált „zadavalschika kérdések” # XA0; bármilyen okból, hogy menjen be a „Nettó helyett tanulmányozza a kérdést.

Íme néhány igazi előnyöket anton773 # XA0; egy ilyen válasz?


> De miért van ilyen válaszok mindig ideges?

ha nyugtalanító, akkor ne olvassa.

és nem bánom, hogy megosszák a felhalmozott tudást.
Egyszer volt, és úgy tudom, hogy milyen nehéz volt, hogy minden fejedben.

És így, hála a fórum mindenki megosztják tudásukat - hozzájárulni a felgyorsult technológiai fejlődés.
Hurrá!

345678.334456 elfelejtettem felvenni - ez a Julián-naptár
1 Julian század pontosan 36525 nap


> Teach "zadavalschika kérdések" # XA0; bármilyen okból mászni
> Az internet helyett tanulmányozza a kérdést.
>

hagyja mászik.
és hogyan kell tanulni, nincs internet? drága tankönyvek, és az elavult gyorsan.

Memória: 0,76 MB
Idő: 0.058 c