Efectuarea ceasului cu alarmă, blogul unui programator delphi

În acest articol, aș vrea să vorbesc despre cum vă puteți face ceasul cu alarmă. Da, știu că Internetul este plin de astfel de exemple și toate astfel de software de pe computer în formă de alarme, „napominalok“, și așa mai departe o mare cantitate sub forma unui finit și profesionist, dar am decis să fac ceva pentru ei înșiși. Desigur, aceasta va fi foarte simplu organizată și am făcut-o numai pentru mine și pentru privilegiile mele. La urma urmei, când mă duc la culcare, întotdeauna pornesc jucătorul cu o mulțime de albume muzicale pe laptopul meu. Ei bine, de exemplu, este foarte convenabil pentru mine să adorm la muzică, și cred că și multi. Deci, bineînțeles, toată noaptea, pentru a juca muzică - nu este cazul, pentru că în mijlocul nopții vă puteți trezi de la ea. Așadar, am decis să fac așa încât să puteți seta alarma pentru momentul în care muzica va fi oprită sau, mai degrabă, nu va fi oprită, ci pur și simplu opriți sunetul sistemului de pe computer. Ei bine, și puteți seta alarma atunci când muzica contrar - va porni, care este, se dovedește un ceas normal de alarmă. De exemplu, setați ora la de la 12 am la ora 1 în dimineața muzica se juca și a fost oprit în dimineața, iar la 7:00 a fost inclus muzica (asta e ceea ce am făcut pentru mine). Da, cu siguranță știu că puteți face acest lucru cu componente vizuale (TMediaPlayer), folosind biblioteca (bass.dll), care este, a face player-ul și opriți-l, jucați-l și așa mai departe. Dar am decis să o fac - foarte bine, foarte simplu. Folosesc playerul JetAudio. în care, dacă Playlistul se termină, începe să redea, deci nu trebuie să-mi fac griji când alarma este declanșată atunci când player-ul este oprit (adică toate melodiile sunt deja pierdute).







Da, de asemenea, vreau să spun că toate acestea se pot face și cu utilizarea propriului cronometru de timp, însă am decis să fac dependența de timpul de sistem al computerului. Vom verifica dacă valorile de timp stabilite de utilizator se potrivesc cu ora sistemului calculatorului. În proiectul meu, am instalat TPageControl și am creat 2 file - Audio și Alarmă. În fila Audio, putem seta ora la care trebuie să dezactivați muzica, iar în fila Alarme vom seta momentul în care vom activa muzica ca un ceas cu alarmă. Pe aceste 2 file, am instalat 6 TSpinEdit. pe 3 și pe fiecare. În ele vom seta ora în formă: ore, minute, secunde separat. Pentru a începe cu evenimentul OnShow al formularului nostru, vom scrie codul care va citi ora sistemului în momentul în care programul a fost pornit, astfel încât utilizatorul să-l poată instala singur atunci când închide / oprește ceasul deșteptător. Pentru aceasta folosim funcțiile FormatDateTime. și codul în sine va fi după cum urmează







Apoi lucrăm cu fila Audio. Îl adăugăm pe TTimer. precum și un buton, făcând clic pe care vom seta ora și începem cronometrul nostru, care va monitoriza când este necesar să opriți sunetul sistemului. Da, nu uitați să setați proprietatea Enabled la Fals în TTimer. Lângă butonul Instalare, vom activa cronometrul nostru, adică Enabled va fi setat la True. iar la evenimentul OnTimer vom scrie următorul cod

Da, aproape că am uitat, trebuie să conectăm modulul MMSystem în Utilizări. din acest modul, avem nevoie de funcția waveOutSetVolume. cu care vom deconecta sunetul sistemului (setați-l la 0). Asta este, după cum se poate vedea, avem la fiecare a doua oară de verificare stabilit de către utilizator, cu timpul de sistem al computerului, dacă este o coincidență faptul că, cu ajutorul funcției waveOutSetVolume am stabilit sunetul de sistem la 0 (volumul la 0), iar player-ul continuă să joace melodii, dar noi acestea nu mai sunt auzite. Acum, adorm la muzică. Dacă am nevoie de un ceas cu alarmă, mergem la fila Ceas alarmă. Există, de asemenea, 3 TSpinEdit instalate. și, de asemenea, să instalați încă un TTimer. în proprietatea Activat. pe care le instalam și în False. În dreptul butonului Instalare, activați și TTimerul nostru. care este, Enabled este setat la True. Și pe evenimentul OnTimer al TTimerului nostru. care este responsabil pentru ceasul deșteptător (includerea muzicii), scrieți următorul cod

Asta este, după cum se poate vedea în cadrul Serviciului, vom verifica, de asemenea, timpul setat de utilizator, computerul timp de sistem în cazul în care corespund, apoi folosind funcția waveOutSetVolume setează volumul la maxim, ca rezultat, deoarece jucătorul nu a oprit de joc, aceasta continuă să joace un cântec, și le putem auzi deja (în funcție de cine dormește strâns =)).

Oprirea muzicii ar putea fi aranjată prin finalizarea procesului. Asta inseamna ca ai putea termina procesul jucatorului, dar cu ceasul cu alarma trebuie sa gandesti ceva special. Am făcut acest ceas de alarmă foarte simplu pentru mine, pe care îl folosesc acum. Iată capturile de ecran:

Efectuarea ceasului cu alarmă, blogul unui programator delphi

Sursele articolului pot fi descărcate aici (proiect complet)







Articole similare

Trimiteți-le prietenilor: