-
Notifications
You must be signed in to change notification settings - Fork 0
/
UnitNC.cpp
55 lines (51 loc) · 2.05 KB
/
UnitNC.cpp
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
42
43
44
45
46
47
48
49
50
51
52
53
54
55
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "UnitNC.h" // Ôîðìà äîáàâëååíèÿ íîâîé êàòåãîðèè
#include "Unit2DBThings.h" // Çàãîëîâîê âòîðîé ôîðìû (äîáàâëåíèå èëè ðåäàêòèðîâàíèå âåùè)
#include "UnitDBThings.h" // Çàãîëîâîê ãëàâíîé ôîðìû
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFormNC *FormNC;
//---------------------------------------------------------------------------
__fastcall TFormNC::TFormNC(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
// Íàæàòèå íà êíîïêó "Äîáàâèòü", äîáàâëÿåì íîâóþ êàòåãîðèþ --
//---------------------------------------------------------------------------
void __fastcall TFormNC::AddCategoryClick(TObject *Sender)
{
if(Edit1->Text != "")
{
if(Form1->ADOQuery1->Active)
{
Form1->ADOQuery1->Active = false;
}
Form1->ADOQuery1->SQL->Text = "SELECT * FROM Category";
Form1->ADOQuery1->Active = true;
if(Form1->ADOQuery1->Active)
{
Form1->ADOQuery1->Active = false;
}
Form1->ADOQuery1->SQL->Text = "INSERT INTO Category VALUES('"+IntToStr(Form2->FilingID("Category"))+"', '"+Edit1->Text+"')";
Form1->ADOQuery1->ExecSQL();
Form2->UpdateComboBox1(); // Îáíîâëÿåì ñïèñîê ComboBox1
Form2->ResetQuery1();
Form1->ScrollBox1->SetFocus();
}
else
{
ShowMessage("Íàçâàíèå íå äîëæíî áûòü ïóñòûì!");
}
}
//---------------------------------------------------------------------------
// Çàêðûâàåì ôîðìó êíîïêîé "Îòìåíà" --
//---------------------------------------------------------------------------
void __fastcall TFormNC::CanselClick(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------