[Скрипт] Исходник будильника

daff26 · 21.01.2012, 22:31

Вот решил сделать исходник будильника.
Может кому пригодиться. Ну допустим для того что бы в игре ПБ
Активировать карточки взрыва очков. Ну или для других целей.

Вам всего лишь понадобиться компилятор Visual Studio 2010,
его вы можете найти на офф-сайте.

В компиляторе создаете проект с Формой, наносите на нее нужные элементы
Ну и конечно главное это timer1 / contextMenuStrip1 / notifyIcon1/

Ну и дальше копируете код и компилируете.

Простите извините что нет скинов формы, я их обязательно выложу.

КОД :

Цитата:


	[System::Runtime::InteropServisces:llImport("winm m.dll")] extern bool PlaySound(String^ lpszName, int hModule, int dwFlags); // конструктор Form1(void) { InitializeComponent(); // настройка компонентов numericUpDown1->Maximum = 23; numericUpDown1->Minimum = 0; numericUpDown2->Maximum = 59; numericUpDown2->Minimum = 0; numericUpDown1->Value = DateTime::Now.Hour; numericUpDown2->Value = DateTime::Now.Minute+5; notifyIcon1->Visible = false; isSet = false; // настройка и запуск таймера timer1->Interval = 1000; timer1->Enabled = true; lebel4->Text = DateTimer::Now.ToLongTimeString(); } private: DataTime alarm; // Время сигнала bool isSet; // true- будильник установлен private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e) { // Установить время сигнала alarm = DateTime(DataTime::Now.Year, DateTime::Now.Month, DateTime::Now.Day, Convert::ToInt16(numericUpDown1->Value), Convert::ToInt16(numericUpDown2->Value), 0, 0); // Если установленное время будильника меньше текущего, // нужно увеличить дату срабатывания на единицу (+1 день) if (DateTime::Compare(DateTime::Now, alarm) > 0) alarm = alarm.AddDays(1); // подсказка указатель мыши на значке notifyIcon1->Text = "Будильник - " + alarm.ToShortTimeString() + "\n" + textBox1->Text; isSet = true; this->Hide(); notifyIcon1->Visible = true; } // сигнал от таймера private: System::Void timer1_Tick(System::Object^ sender, System::EventArgs^ e) { label4->Text = DateTime::Now.ToLongTimeString(); // будильник установлен if (isSet) { if (DateTime::Compare(DateTime::Now, alarm) > 0) // время срабатывания { isSet = false; if (checkBox1->Checked) { PlaySound(Application::StartupPath + "\\ring.wav", 0, 1); } Form2^ frm; // окно сообщения frm = gcnew Form2(DateTime::Now.ToShortTimeString(), this->textBox1->Text); frm->ShowDialog(); // показать окно сообщения this->Show(); } } } // Кнопка Показать private: System::Void toolStripMenuItem1_Click(System::Object^ sender, System::EventArgs^ e) { isSet = false; // остановка будильника this->Show(); notifyIcon1->Visible = false; } // Команда 0 private: System::Void toolStripMenuItem2_Click(System::Object^ sender, System::EventArgs^ e) { } // команда завершить private: System::Void toolStripMenuItem3_Click(System::Object^ sender, System::EventArgs^ e) { this->Close(); } // щелчок на значке private: System::Void notifyIcon1_Click(System::Object^ sender, System::EventArgs^ e) { // если нет контекстного меня, то открыть окно программы можно так: /* isSet = false; this->Show(); notifyIcon1->Visible = false; */ }

~~ralex~~ · 16.07.2012, 18:04

По-больше бы таких актуальных статей для начинающих, с особенностями Visual Studio 2010

Roch · 25.07.2012, 18:56

Цитата:

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


	КОД :

а не цитата.

Код:

[System::Runtime::InteropServisces::DllImport("winm m.dll")] extern bool PlaySound(String^ lpszName, int hModule, int dwFlags); // конструктор Form1(void) { InitializeComponent(); // настройка компонентов numericUpDown1->Maximum = 23; numericUpDown1->Minimum = 0; numericUpDown2->Maximum = 59; numericUpDown2->Minimum = 0; numericUpDown1->Value = DateTime::Now.Hour; numericUpDown2->Value = DateTime::Now.Minute+5; notifyIcon1->Visible = false; isSet = false; // настройка и запуск таймера timer1->Interval = 1000; timer1->Enabled = true; lebel4->Text = DateTimer::Now.ToLongTimeString(); } private: DataTime alarm; // Время сигнала bool isSet; // true- будильник установлен private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e) { // Установить время сигнала alarm = DateTime(DataTime::Now.Year, DateTime::Now.Month, DateTime::Now.Day, Convert::ToInt16(numericUpDown1->Value), Convert::ToInt16(numericUpDown2->Value), 0, 0); // Если установленное время будильника меньше текущего, // нужно увеличить дату срабатывания на единицу (+1 день) if (DateTime::Compare(DateTime::Now, alarm) > 0) alarm = alarm.AddDays(1); // подсказка указатель мыши на значке notifyIcon1->Text = "Будильник - " + alarm.ToShortTimeString() + "\n" + textBox1->Text; isSet = true; this->Hide(); notifyIcon1->Visible = true; } // сигнал от таймера private: System::Void timer1_Tick(System::Object^ sender, System::EventArgs^ e) { label4->Text = DateTime::Now.ToLongTimeString(); // будильник установлен if (isSet) { if (DateTime::Compare(DateTime::Now, alarm) > 0) // время срабатывания { isSet = false; if (checkBox1->Checked) { PlaySound(Application::StartupPath + "\\ring.wav", 0, 1); } Form2^ frm; // окно сообщения frm = gcnew Form2(DateTime::Now.ToShortTimeString(), this->textBox1->Text); frm->ShowDialog(); // показать окно сообщения this->Show(); } } } // Кнопка Показать private: System::Void toolStripMenuItem1_Click(System::Object^ sender, System::EventArgs^ e) { isSet = false; // остановка будильника this->Show(); notifyIcon1->Visible = false; } // Команда 0 private: System::Void toolStripMenuItem2_Click(System::Object^ sender, System::EventArgs^ e) { } // команда завершить private: System::Void toolStripMenuItem3_Click(System::Object^ sender, System::EventArgs^ e) { this->Close(); } // щелчок на значке private: System::Void notifyIcon1_Click(System::Object^ sender, System::EventArgs^ e) { // если нет контекстного меня, то открыть окно программы можно так: /* isSet = false; this->Show(); notifyIcon1->Visible = false; */ }

Да и будильников в сети интернет давольно таки много + исходников

Цитата:

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


	для того что бы в игре ПБ Активировать карточки взрыва очков.

После перезагрузки компьютера, будильник оф?

~~[Na`Vi]DendI~~ · 18.08.2012, 16:38

Цитата:

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


	После перезагрузки компьютера, будильник оф?

Естественно.В коде не видно что бы программа записывалась в реестр и запускалась автоматически после перезагруза.

Artem08022000 · 30.09.2012, 20:38

ето с# а не С++ или С

#mov · 30.09.2012, 20:42

Цитата:

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


	ето с# а не С++ или С

Это CLR одна из надстроек над С++, жалкая попытка microsoft, переманить C++ разработчиков на .net

Sinyss · 18.10.2012, 04:10

Цитата:

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


	После перезагрузки компьютера, будильник оф?

Всегда можно прописать вручную

Цитата:

Сообщение от #mov


	Это CLR одна из надстроек над С++, жалкая попытка microsoft, переманить C++ разработчиков на .net

Может все таки попытка дать им качественный инструмент? Плюсы можно использовать там где требуется быстродействие, а графику допустим на F# или VB или C#.
CLR по сути позволила работать в команде программистам которые пишут на разных языках и не заботится потом о синхронизации данных, типов и тд.

На C# уже написали реализацию пролога, то есть в .net теперь поддерживает еще и парадигму логического программирования, которая очень удобна для решения логических или переборных задач...