Registrace nového uživatele     Návod     Kluby     Archív  Lopuchu     Lopuch.cz  

Nudou jsi opuch?
Navštiv Lopuch!

Lopuch.cz
Jméno:
Heslo:
Podpora LCD:
 
Archiv klubu Delphi [ŽP: neomezená] (kategorie Programování) moderuje Šéf Lopuchu.
  • Klub Pascal - diskuze obecne o jazyce Pascal
  • Torry's Delphi Pages - stránky se spoustou komponent, tutoriálů a informací o Delphi - doporučuje 6 z 5ti vývojářů
    • Download Opera
      Nastavení klubu     Nastavení práv     Homepage     Anketa     Přítomní     Oblíbené     Lopuch     Kategorie  
    autor: 
    text: 
    vyplnit a 
    Help
       
    [ 118 ] <Novější  <<<Nejnovější  Nejstarší>>>  Starší>  
    fontan 12.12.2005 13:47  110
    nekronedivím se, lidi jsou ochotni prodat/zaplatit /za každou blbinu, i když jim to komplikuje život :-). Ba ne, uznávám, že občas by se to mohlo hodit, ale převážně preferuju standardní způsob nastavování budíku.
    nekromancer 12.12.2005 08:55  109
    fontan: 99: Budeš se divit, ale stává se mi že si nastavuju místo budíka alarm do kalendáře :-)
    A na ThinkGeeku se slušně prodává budík, u kterýho si můžeš nastavit časy buzení samostatně pro každý den týdne.
    fontan 8.12.2005 15:05  108
    pepakumáš pravdu, jen jsem se fanaticky snažil hájit to, že datum není potřeba. Jen tak na okraj, nevím na jakém procesoru by se projevil rozdíl ve výkonu, ale přesto souhlasím, že se má psát efektivní kód.
    pepak pepak - Pepak.net 8.12.2005 14:09  107
    Fontan: Tu predchozi reakci jsem trochu prehnal. Ale stejne, tvuj kod se mi vubec nelibi.
    pepak pepak - Pepak.net 8.12.2005 14:05  106
    Fontan: Uzasny. A tenhle vypocet budes delat kazdou sekundu (nebo jak casto se bude displej aktualizovat)? Ja bych radsi na zacatku vypocital cas budiku (viz prispevek 104) a potom jednou za sekundu pocital CasDoSpusteniBudiku := CasBudiku-Now. No ale kazdy je sveho stesti strujcem, ze? (V tomto pripade vsak take strujcem nestesti uzivatelu tohoto programu. Ale co, mam Pentium D, takze klidne muzu jedno jadro vyhradit pro aktualizaci budiku :-))
    fontan 8.12.2005 13:47  105
    pepakunemusí, ale nemusí, zajímá, kolik zbývá do spuštění budíku, resp, jestli ho má spustit a ne, DatumČas spuštění budíku
    CasBudiku := EncodeTime(HodinaBudiku,MinutaBudiku,SekundaBudiku);
    CasDoSpusteniBudiku := CasBudiku - frac(now);
    i f CasDoSpusteniBudiku menší než 0 t h e n
    CasDoSpusteniBudiku := CasDoSpusteniBudiku + 1;
    if CasDoSpusteniBudiku větší než MinulyCasDoSpusteniBudiku t h e n
    spustbudik
    e l s e
    MinulyCasDoSpusteniBudiku := CasDoSpusteniBudiku;
    pepak pepak - Pepak.net 8.12.2005 13:28  104
    Fontan: To ovsem nic nemeni na skutecnosti, ze stejne musi pracovat s datumem:

    CasBudiku := EncodeTime(HodinaBudiku,MinutaBudiku,SekundaBudiku);
    CasBudiku := CasBudiku + Date + (CasBudiku >= Frac(Now));
    anonym 8.12.2005 12:33  103
    fontan
    anonym 8.12.2005 12:32  102
    pepakuMě by to nebavilo, většinou vstávám ve všední den vždycky stejně a na víken ho nechám vyplej. To je jedno, podle mě hercoš to chtěl bez data, jako klasickej budík.
    pepak pepak - Pepak.net 8.12.2005 12:02  101
    Fontan: Nepouzil, ale ne proto, ze bych nechtel, ale proto, ze to moje budiky (na hodinkach a v mobilu) neumi...
    lucid Lucid mlčet a naslouchat - zážitek, který bolí tak moc a tak krásně 8.12.2005 10:07  100
    pepakSorry, asi jsem to spatne pochopil. POokud ten cas chces vypsat, tak to asi mas dobre.
    fontan 8.12.2005 10:06  99
    pepakuu budíku tě dny nezajímají, už sis někdy na budíku nařizoval datum? To by byla celkem otrava ne?
    pepak pepak - Pepak.net 8.12.2005 06:03  98
    Chybi mi jedna ukoncovaci zavorka...
    pepak pepak - Pepak.net 8.12.2005 06:02  97
    var CasBudiku:TDateTime;
    begin
    CasBudiku := EncodeDate(RokBudiku,MesicBudiku,DenBudiku) + EncodeTime(HodinaBudiku,MinutaBudiku,SekundaBudiku,0);
    ShowMessage('Do alarmu zbyva '+FormatDateTime('yyyy.mm.dd hh:nn:ss',CasBudiku-Now);
    end;

    Znas jednodussi reseni?
    pepak pepak - Pepak.net 8.12.2005 06:00  96
    Lucid: Kde proboha pocitam s retezci??? t1,t2:tdatetime; showmessage('Budik bude aktivni za '+Int(t2-t1)+' dni a '+TimeToStr(Frac(t2-t1)));
    Retezec se samozrejme pouziva jen pro zobrazeni uzivateli, vsechny vypocty jedou pres float...
    [ 118 ] <Novější  <<<Nejnovější  Nejstarší>>>  Starší>  

    (c) 2001-2011 Lopuch.cz   
    Kontakt