Механические часы с будильником

@cortez35 · Регистрация: 13.12.2012

Студворк — интернет-сервис помощи студентам

Добрый день всем нужно сделать программу "Механических часов с таймером" написать нужно на С++ Билдере , спасибо за внимание.

@gumi250 · 10.12.2014, 11:41

Сообщение от cortez35

всем нужно сделать

Лично мне не нужно ничего подобного. Механические часы с таймером, это как? Будильник или секундомер? Внимания нам не жалко, пользуйтесь.

@SatanaXIII · 10.12.2014, 15:11

gunslinger по моему делал что-то такое.

@gunslinger · 10.12.2014, 16:06

Я делал электронные часы Изобразить на экране электронные часы с цифровым семисегментный индикатором и исправлял механические Усовершенствовать программу Часы. Какой смысл ТС вкладывает в слово "таймер", понятно мало.

@cortez35 · 15.12.2014, 14:21 **[ТС]**

Добрый день уважаемые пользователи.
Мне нужно сделать механические часы с будильником который будет издавать звуки по истечению таймера.
Часы есть , а вот будильника нету .

@Samrisbe · 15.12.2014, 21:24

будильник:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
#include <sys/timeb.h>
#include <vcl.h>
#include <windows.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
bool bIsTimerOn; // Таймер включён
int iHours; // Текущий час.
int iMinutes; // Текущая минута.
int iSeconds; // Текущая секунда.
int iAlarmHours; // Час оповещения.
int iAlarmMinutes; // Минута оповещения.
int iAlarmSeconds; // Секунда оповещения.
 
int iDay; // Текущий день.
int iMonth; // Текущий месяц.
int iYear; // Текущий год.
int iAlarmDay; // День оповещения.
int iAlarmMonth; // Месяц оповещения.
int iAlarmYear; // Год оповещения.

и дальше в теле таймера обрабатываем:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
iHours=StrToInt(FormatDateTime("hh", Time()));
    iMinutes=StrToInt(FormatDateTime("nn", Time()));
    iSeconds=StrToInt(FormatDateTime("ss", Time()));
 
    iDay=StrToInt(FormatDateTime("dd", Date()));
    iMonth=StrToInt(FormatDateTime("mm", Date()));
    iYear=StrToInt(FormatDateTime("yy", Date()));
 
// …получим текущее время системы …
    iAlarmHours=StrToInt(FormatDateTime("hh", Form1->timepicker->Time));
    iAlarmMinutes=StrToInt(FormatDateTime("nn", Form1->timepicker->Time));
    iAlarmSeconds=StrToInt(FormatDateTime("ss", Form1->timepicker->Time));
 
    iAlarmDay=StrToInt(FormatDateTime("dd", Form1->DatePicker1->Date));
    iAlarmMonth=StrToInt(FormatDateTime("mm", Form1->DatePicker1->Date));
    iAlarmYear=StrToInt(FormatDateTime("yy", Form1->DatePicker1->Date));
 
// Время срабатывания срабатывания будильника, которое задал пользователь
    if (Button2->Enabled == false) { //Если кнопка "Старт" не видимая, то
        if (iHours == iAlarmHours &&
                iMinutes == iAlarmMinutes &&
                iSeconds == iAlarmSeconds &&
                iDay ==  iAlarmDay &&
                iMonth == iAlarmMonth &&
                iYear ==  iAlarmYear)
 
            { // и если оно совпало с заданным временем пользователем…
 
                        if (RadioGroup1->ItemIndex==5)
                           {
                           Form1->Close();
                           }
            switch(RadioGroup1->ItemIndex) {
                case 0: {ShellExecute(NULL, "open", "mspaint.exe", NULL, NULL, SW_SHOWNORMAL);break;}
                case 1: {ShellExecute(NULL, "open", "notepad.exe", NULL, NULL, SW_SHOWNORMAL);break;}
                case 2: {ShellExecute(NULL, "open", "calc.exe", NULL, NULL, SW_SHOWNORMAL);break;}
                case 3: {ShellExecute(NULL, "open", "wmplayer.exe", NULL, NULL, SW_SHOWNORMAL);break;}
                case 4: {ShellExecute(NULL, "open", "http://www.skanny.com", NULL, NULL,  SW_SHOWNORMAL);break;}
            }
        }
    }

@SatanaXIII · 16.12.2014, 08:29

Samrisbe, я думаю, имелось в виду, что он не звенит. Таймер есть, а толку нет.

Новые блоги и статьи Все статьи Все блоги /
Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .

@cortez35 0 / 0 / 0 Регистрация: 13.12.2012 Сообщений: 17

	Механические часы с будильником 10.12.2014, 11:35. Показов 2007. Ответов 6 Метки нет (Все метки) Добрый день всем нужно сделать программу "Механических часов с таймером" написать нужно на С++ Билдере , спасибо за внимание. 0

@SatanaXIII Почетный модератор 5851 / 2862 / 392 Регистрация: 01.11.2011 Сообщений: 6,906
	10.12.2014, 15:11
	gunslinger по моему делал что-то такое. 0

@gunslinger place status here 3190 / 2227 / 640 Регистрация: 20.07.2013 Сообщений: 6,023
	10.12.2014, 16:06
	Я делал электронные часы Изобразить на экране электронные часы с цифровым семисегментный индикатором и исправлял механические Усовершенствовать программу Часы. Какой смысл ТС вкладывает в слово "таймер", понятно мало. 1

@cortez35 0 / 0 / 0 Регистрация: 13.12.2012 Сообщений: 17
	15.12.2014, 14:21 [ТС]
	Добрый день уважаемые пользователи. Мне нужно сделать механические часы с будильником который будет издавать звуки по истечению таймера. Часы есть , а вот будильника нету . 0

@SatanaXIII Почетный модератор 5851 / 2862 / 392 Регистрация: 01.11.2011 Сообщений: 6,906
	16.12.2014, 08:29
	Samrisbe, я думаю, имелось в виду, что он не звенит. Таймер есть, а толку нет. 0