root/trunk/KeyChangerForm.cpp

Revision 3, 1.7 kB (checked in by sagrer, 10 months ago)

Добавил информационную шапку в файлы исходников.

Line 
1 ///////////////////////////////////////////////////////////
2 //                      MobSurgeon                       //
3 //          Ðåäàêòîð mob-îâ äëÿ Ïðîêëÿòûõ Çåìåëü         //
4 //           Copyright (C) 2005-2007 Gipat Group         //
5 //              Ðàñïðîñòðàíÿåòñÿ íà óñëîâèÿõ             //
6 //    Gipat Group's opened EI-editor-utility license     //
7 //                      âåðñèè 1.0                       //
8 //                                                       //
9 //                  www.gipatgroup.org                   //
10 ///////////////////////////////////////////////////////////
11
12 //Ê ðàáîòå íàä äàííûì ôàéëîì ïðèëîæèëè ðóêè, íîãè.... êîðî÷å àôôòàðû:
13 // 1) Sagrer (sagrer@yandex.ru)
14
15 ////////////////////////////////////////////////////////////////////////
16
17 //---------------------------------------------------------------------------
18
19 #include <vcl.h>
20 #pragma hdrstop
21
22 #include "KeyChangerForm.h"
23 //---------------------------------------------------------------------------
24 #pragma package(smart_init)
25 #pragma resource "*.dfm"
26 TKeyChangerF *KeyChangerF;
27 //---------------------------------------------------------------------------
28 __fastcall TKeyChangerF::TKeyChangerF(TComponent* Owner)
29         : TForm(Owner)
30 {
31
32 }
33 //---------------------------------------------------------------------------
34 void __fastcall TKeyChangerF::CancelButClick(TObject *Sender)
35 {
36   this->ModalResult = mrCancel;       
37 }
38 //---------------------------------------------------------------------------
39 void __fastcall TKeyChangerF::OkButClick(TObject *Sender)
40 {
41   this->ModalResult = mrOk;
42 }
43 //---------------------------------------------------------------------------
44
Note: See TracBrowser for help on using the browser.