Skip to content

M
merenje-temperature
Commit 99b3f33f authored by Sasa Jankov's avatar Sasa Jankov
Browse files
Options

no message

parent e1d1f64c
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 1150 additions and 969 deletions
MlekaraMain.cpp
View file @ 99b3f33f
......@@ -150,6 +150,7 @@ void __fastcall TMainForm::FormShow(TObject *Sender)
db->openArtikliCds();
db->cdsUredjaj->Active = false;
db->cdsUredjaj->Active = true;
db->cdsArtikli->Edit();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
......@@ -163,17 +164,28 @@ void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->cdsStampa->Active = true;
cxGrid7DBChartView1->Title->Text = "Vreme merenje u satima za posudu "+IntToStr(db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger);
cxGrid8DBChartView1->Title->Text = "Zapis od "+db->cdsArtikli->FieldByName("OD")->AsString;
db->sqlMaxTemp->Close();
db->sqlMaxTemp->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sqlMaxTemp->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sqlMaxTemp->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->sqlMaxTemp->ExecSQL();
db->sqlMaxTemp->Open();
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
cxLabel6->Caption = db->cdsArtikli->FieldByName("Artikal")->AsString;
cxLabel16->Caption = db->cdsArtikli->FieldByName("Kolicina")->AsString;
cxLabel15->Caption = db->cdsArtikli->FieldByName("od")->AsString;
cxLabel14->Caption = db->cdsArtikli->FieldByName("do")->AsString;
cxLabel13->Caption = 200;
cxLabel11->Caption = 300;
cxLabel13->Caption = db->sqlMaxTemp->FieldByName("max_temp")->AsString;
cxLabel11->Caption = db->cdsArtikli->FieldByName("zadata_temperatura")->AsString;
db->sqlMaxTemp->Close();
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
......@@ -197,3 +209,12 @@ void __fastcall TMainForm::cxButton1Click(TObject *Sender)
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::cxButton2Click(TObject *Sender)
{
cxGroupBox9->Visible = false;
dxComponentPrinter2->RebuildReport();
dxComponentPrinter2->Print(false,NULL,NULL);
cxGroupBox9->Visible = true;
}
//---------------------------------------------------------------------------
MlekaraMain.dfm
View file @ 99b3f33f
This diff is collapsed.
MlekaraMain.h
View file @ 99b3f33f
......@@ -129,7 +129,6 @@
class TMainForm : public TForm
{
__published: // IDE-managed Components
TfrxReport *print;
TcxPageControl *cxPageControl1;
TcxTabSheet *cxTabSheet1;
TcxTabSheet *cxTabSheet2;
......@@ -173,8 +172,6 @@ __published: // IDE-managed Components
TAdvDateTimePicker *AdvDateTimePicker2;
TcxLabel *Uredjaj;
TcxDBLookupComboBox *cxDBLookupComboBox1;
TfrxDBDataset *frxDBDPrint;
TfrxDBDataset *frxDBArtikal;
TdxComponentPrinter *dxComponentPrinter1;
TAdvDateTimePicker *AdvDateTimePicker1;
TcxGroupBox *cxGroupBox5;
......@@ -208,12 +205,26 @@ __published: // IDE-managed Components
TcxButton *cxButton1;
TdxCustomContainerReportLink *dxComponentPrinter1Link1;
TcxGridDBChartSeries *cxGrid7DBChartView1Series1;
TcxLabel *cxLabel17;
TcxDBTextEdit *cxDBTextEdit3;
TcxGridDBColumn *cxGrid6DBTableView1id_uredjaja;
TcxGridDBColumn *cxGrid6DBTableView1zadata_temperatura;
TcxGrid *cxGrid8;
TcxGridLevel *cxGrid8Level1;
TcxGroupBox *cxGroupBox9;
TcxGridDBChartView *cxGrid8DBChartView1;
TcxGridDBChartSeries *cxGrid8DBChartView1Series1;
TcxGridDBChartDataGroup *cxGrid8DBChartView1DataGroup1;
TcxButton *cxButton2;
TdxComponentPrinter *dxComponentPrinter2;
TdxCustomContainerReportLink *dxComponentPrinter2Link1;
void __fastcall btNewClick(TObject *Sender);
void __fastcall btSaveClick(TObject *Sender);
void __fastcall FormShow(TObject *Sender);
void __fastcall AdvDateTimePicker1Change(TObject *Sender);
void __fastcall AdvDateTimePicker2Change(TObject *Sender);
void __fastcall cxButton1Click(TObject *Sender);
void __fastcall cxButton2Click(TObject *Sender);
private: // User declarations
Tdb *dbGets;
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field);
......
Win32/Debug/MlekaraCB.map
View file @ 99b3f33f
Start Length Name Class
0001:00401000 00000A99CH _TEXT CODE
0002:0040C000 000003600H _DATA DATA
0003:0040F600 0000001C0H _BSS BSS
0001:00401000 00000ADB4H _TEXT CODE
0002:0040C000 0000038B4H _DATA DATA
0003:0040F8B4 0000001C0H _BSS BSS
0004:00000000 00000009CH _TLS TLS
Win32/Debug/dbDm.obj
View file @ 99b3f33f
No preview for this file type
__history/MlekaraMain.cpp.~13~ → __history/MlekaraMain.cpp.~15~
View file @ 99b3f33f
......@@ -148,6 +148,8 @@ void __fastcall TMainForm::btSaveClick(TObject *Sender)
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->cdsUredjaj->Active = false;
db->cdsUredjaj->Active = true;
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
......@@ -160,7 +162,7 @@ void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->cdsStampa->Active = false;
db->cdsStampa->Active = true;
cxGrid7DBChartView1->Title->Text = "Vreme merenje u satima za posudu "+IntToStr(db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger);
......
__history/MlekaraMain.cpp.~12~ → __history/MlekaraMain.cpp.~16~
View file @ 99b3f33f
......@@ -148,6 +148,8 @@ void __fastcall TMainForm::btSaveClick(TObject *Sender)
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->cdsUredjaj->Active = false;
db->cdsUredjaj->Active = true;
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
......@@ -160,7 +162,9 @@ void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->cdsStampa->Active = false;
db->cdsStampa->Active = true;
cxGrid7DBChartView1->Title->Text = "Vreme merenje u satima za posudu "+IntToStr(db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger);
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
......@@ -169,7 +173,7 @@ void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
cxLabel15->Caption = db->cdsArtikli->FieldByName("od")->AsString;
cxLabel14->Caption = db->cdsArtikli->FieldByName("do")->AsString;
cxLabel13->Caption = 200;
cxLabel11->Caption = 300;
cxLabel11->Caption = db->cdsArtikli->FieldByName("zadata_temperatura")->AsString;
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
......
__history/MlekaraMain.cpp.~11~ → __history/MlekaraMain.cpp.~17~
View file @ 99b3f33f
......@@ -148,6 +148,9 @@ void __fastcall TMainForm::btSaveClick(TObject *Sender)
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->cdsUredjaj->Active = false;
db->cdsUredjaj->Active = true;
db->cdsArtikli->Edit();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
......@@ -160,7 +163,9 @@ void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->cdsStampa->Active = false;
db->cdsStampa->Active = true;
cxGrid7DBChartView1->Title->Text = "Vreme merenje u satima za posudu "+IntToStr(db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger);
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
......@@ -169,7 +174,7 @@ void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
cxLabel15->Caption = db->cdsArtikli->FieldByName("od")->AsString;
cxLabel14->Caption = db->cdsArtikli->FieldByName("do")->AsString;
cxLabel13->Caption = 200;
cxLabel11->Caption = 300;
cxLabel11->Caption = db->cdsArtikli->FieldByName("zadata_temperatura")->AsString;
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
......@@ -186,8 +191,10 @@ void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
void __fastcall TMainForm::cxButton1Click(TObject *Sender)
{
cxGroupBox8->Visible = false;
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,NULL,NULL);
dxComponentPrinter1->Print(false,NULL,NULL);
cxGroupBox8->Visible = true;
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~10~ → __history/MlekaraMain.cpp.~18~
View file @ 99b3f33f
......@@ -116,6 +116,7 @@
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma link "dxPSContainerLnk"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
......@@ -147,6 +148,9 @@ void __fastcall TMainForm::btSaveClick(TObject *Sender)
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->cdsUredjaj->Active = false;
db->cdsUredjaj->Active = true;
db->cdsArtikli->Edit();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
......@@ -159,7 +163,15 @@ void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->cdsStampa->Active = false;
db->cdsStampa->Active = true;
cxGrid7DBChartView1->Title->Text = "Vreme merenje u satima za posudu "+IntToStr(db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger);
db->sqlMaxTemp->Close();
db->sqlMaxTemp->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sqlMaxTemp->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sqlMaxTemp->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->sqlMaxTemp->ExecSQL();
db->sqlMaxTemp->Open();
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
......@@ -167,8 +179,8 @@ void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
cxLabel16->Caption = db->cdsArtikli->FieldByName("Kolicina")->AsString;
cxLabel15->Caption = db->cdsArtikli->FieldByName("od")->AsString;
cxLabel14->Caption = db->cdsArtikli->FieldByName("do")->AsString;
cxLabel13->Caption = 200;
cxLabel11->Caption = 300;
cxLabel13->Caption = db->sqlMaxTemp->FieldByName("max_temp")->AsString;
cxLabel11->Caption = db->cdsArtikli->FieldByName("zadata_temperatura")->AsString;
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
......@@ -183,3 +195,12 @@ void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::cxButton1Click(TObject *Sender)
{
cxGroupBox8->Visible = false;
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,NULL,NULL);
cxGroupBox8->Visible = true;
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~19~ 0 → 100644
View file @ 99b3f33f
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MlekaraMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDBData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxNavigator"
#pragma link "cxStyles"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinBlueprint"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinDevExpressDarkStyle"
#pragma link "dxSkinDevExpressStyle"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkinHighContrast"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinOffice2013White"
#pragma link "dxSkinPumpkin"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinsDefaultPainters"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSevenClassic"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSharpPlus"
#pragma link "dxSkinSilver"
#pragma link "dxSkinSpringTime"
#pragma link "dxSkinStardust"
#pragma link "dxSkinSummer2008"
#pragma link "dxSkinTheAsphaltWorld"
#pragma link "dxSkinValentine"
#pragma link "dxSkinVS2010"
#pragma link "dxSkinWhiteprint"
#pragma link "dxSkinXmas2008Blue"
#pragma link "cxGridChartView"
#pragma link "cxGridDBChartView"
#pragma link "cxContainer"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGridDBCardView"
#pragma link "cxGroupBox"
#pragma link "cxPC"
#pragma link "cxPCdxBarPopupMenu"
#pragma link "frxClass"
#pragma link "cxCalendar"
#pragma link "cxDBEdit"
#pragma link "cxDropDownEdit"
#pragma link "cxLabel"
#pragma link "cxMaskEdit"
#pragma link "cxTextEdit"
#pragma link "cxButtons"
#pragma link "AdvDateTimePicker"
#pragma link "cxDBLookupComboBox"
#pragma link "cxDBLookupEdit"
#pragma link "cxLookupEdit"
#pragma link "frxDBSet"
#pragma link "cxDrawTextUtils"
#pragma link "dxBkgnd"
#pragma link "dxPrnDev"
#pragma link "dxPrnPg"
#pragma link "dxPSCompsProvider"
#pragma link "dxPSCore"
#pragma link "dxPScxCommon"
#pragma link "dxPScxEditorProducers"
#pragma link "dxPScxExtEditorProducers"
#pragma link "dxPScxGridLayoutViewLnk"
#pragma link "dxPScxGridLnk"
#pragma link "dxPScxPageControlProducer"
#pragma link "dxPSEdgePatterns"
#pragma link "dxPSEngn"
#pragma link "dxPSFillPatterns"
#pragma link "dxPSGlbl"
#pragma link "dxPSPDFExport"
#pragma link "dxPSPDFExportCore"
#pragma link "dxPSPrVwAdv"
#pragma link "dxPSPrVwRibbon"
#pragma link "dxPSPrVwStd"
#pragma link "dxPSUtl"
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma link "dxPSContainerLnk"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btNewClick(TObject *Sender)
{
db->cdsArtikli->Append();
AdvDateTimePicker1->DateTime = Now();
AdvDateTimePicker2->DateTime = Now();
db->cdsArtikli->FieldByName("od")->AsDateTime = Now();
db->cdsArtikli->FieldByName("do")->AsDateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btSaveClick(TObject *Sender)
{
db->cdsArtikli->Post();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->cdsUredjaj->Active = false;
db->cdsUredjaj->Active = true;
db->cdsArtikli->Edit();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
{
if (Field == NULL) {
db->cdsStampa->Active = false;
db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->cdsStampa->Active = true;
cxGrid7DBChartView1->Title->Text = "Vreme merenje u satima za posudu "+IntToStr(db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger);
db->sqlMaxTemp->Close();
db->sqlMaxTemp->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sqlMaxTemp->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sqlMaxTemp->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->sqlMaxTemp->ExecSQL();
db->sqlMaxTemp->Open();
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
cxLabel6->Caption = db->cdsArtikli->FieldByName("Artikal")->AsString;
cxLabel16->Caption = db->cdsArtikli->FieldByName("Kolicina")->AsString;
cxLabel15->Caption = db->cdsArtikli->FieldByName("od")->AsString;
cxLabel14->Caption = db->cdsArtikli->FieldByName("do")->AsString;
cxLabel13->Caption = db->sqlMaxTemp->FieldByName("max_temp")->AsString;
cxLabel11->Caption = db->cdsArtikli->FieldByName("zadata_temperatura")->AsString;
db->sqlMaxTemp->Close();
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("od")->AsDateTime = AdvDateTimePicker1->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("do")->AsDateTime = AdvDateTimePicker2->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::cxButton1Click(TObject *Sender)
{
cxGroupBox8->Visible = false;
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,NULL,NULL);
cxGroupBox8->Visible = true;
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~20~ 0 → 100644
View file @ 99b3f33f
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MlekaraMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDBData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxNavigator"
#pragma link "cxStyles"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinBlueprint"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinDevExpressDarkStyle"
#pragma link "dxSkinDevExpressStyle"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkinHighContrast"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinOffice2013White"
#pragma link "dxSkinPumpkin"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinsDefaultPainters"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSevenClassic"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSharpPlus"
#pragma link "dxSkinSilver"
#pragma link "dxSkinSpringTime"
#pragma link "dxSkinStardust"
#pragma link "dxSkinSummer2008"
#pragma link "dxSkinTheAsphaltWorld"
#pragma link "dxSkinValentine"
#pragma link "dxSkinVS2010"
#pragma link "dxSkinWhiteprint"
#pragma link "dxSkinXmas2008Blue"
#pragma link "cxGridChartView"
#pragma link "cxGridDBChartView"
#pragma link "cxContainer"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGridDBCardView"
#pragma link "cxGroupBox"
#pragma link "cxPC"
#pragma link "cxPCdxBarPopupMenu"
#pragma link "frxClass"
#pragma link "cxCalendar"
#pragma link "cxDBEdit"
#pragma link "cxDropDownEdit"
#pragma link "cxLabel"
#pragma link "cxMaskEdit"
#pragma link "cxTextEdit"
#pragma link "cxButtons"
#pragma link "AdvDateTimePicker"
#pragma link "cxDBLookupComboBox"
#pragma link "cxDBLookupEdit"
#pragma link "cxLookupEdit"
#pragma link "frxDBSet"
#pragma link "cxDrawTextUtils"
#pragma link "dxBkgnd"
#pragma link "dxPrnDev"
#pragma link "dxPrnPg"
#pragma link "dxPSCompsProvider"
#pragma link "dxPSCore"
#pragma link "dxPScxCommon"
#pragma link "dxPScxEditorProducers"
#pragma link "dxPScxExtEditorProducers"
#pragma link "dxPScxGridLayoutViewLnk"
#pragma link "dxPScxGridLnk"
#pragma link "dxPScxPageControlProducer"
#pragma link "dxPSEdgePatterns"
#pragma link "dxPSEngn"
#pragma link "dxPSFillPatterns"
#pragma link "dxPSGlbl"
#pragma link "dxPSPDFExport"
#pragma link "dxPSPDFExportCore"
#pragma link "dxPSPrVwAdv"
#pragma link "dxPSPrVwRibbon"
#pragma link "dxPSPrVwStd"
#pragma link "dxPSUtl"
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma link "dxPSContainerLnk"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btNewClick(TObject *Sender)
{
db->cdsArtikli->Append();
AdvDateTimePicker1->DateTime = Now();
AdvDateTimePicker2->DateTime = Now();
db->cdsArtikli->FieldByName("od")->AsDateTime = Now();
db->cdsArtikli->FieldByName("do")->AsDateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btSaveClick(TObject *Sender)
{
db->cdsArtikli->Post();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->cdsUredjaj->Active = false;
db->cdsUredjaj->Active = true;
db->cdsArtikli->Edit();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
{
if (Field == NULL) {
db->cdsStampa->Active = false;
db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->cdsStampa->Active = true;
cxGrid7DBChartView1->Title->Text = "Vreme merenje u satima za posudu "+IntToStr(db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger);
cxGrid8DBChartView1->Title->Text = "Zapis od "+db->cdsArtikli->FieldByName("OD")->AsString;
db->sqlMaxTemp->Close();
db->sqlMaxTemp->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sqlMaxTemp->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sqlMaxTemp->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->sqlMaxTemp->ExecSQL();
db->sqlMaxTemp->Open();
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
cxLabel6->Caption = db->cdsArtikli->FieldByName("Artikal")->AsString;
cxLabel16->Caption = db->cdsArtikli->FieldByName("Kolicina")->AsString;
cxLabel15->Caption = db->cdsArtikli->FieldByName("od")->AsString;
cxLabel14->Caption = db->cdsArtikli->FieldByName("do")->AsString;
cxLabel13->Caption = db->sqlMaxTemp->FieldByName("max_temp")->AsString;
cxLabel11->Caption = db->cdsArtikli->FieldByName("zadata_temperatura")->AsString;
db->sqlMaxTemp->Close();
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("od")->AsDateTime = AdvDateTimePicker1->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("do")->AsDateTime = AdvDateTimePicker2->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::cxButton1Click(TObject *Sender)
{
cxGroupBox8->Visible = false;
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,NULL,NULL);
cxGroupBox8->Visible = true;
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~21~ 0 → 100644
View file @ 99b3f33f
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MlekaraMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDBData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxNavigator"
#pragma link "cxStyles"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinBlueprint"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinDevExpressDarkStyle"
#pragma link "dxSkinDevExpressStyle"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkinHighContrast"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinOffice2013White"
#pragma link "dxSkinPumpkin"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinsDefaultPainters"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSevenClassic"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSharpPlus"
#pragma link "dxSkinSilver"
#pragma link "dxSkinSpringTime"
#pragma link "dxSkinStardust"
#pragma link "dxSkinSummer2008"
#pragma link "dxSkinTheAsphaltWorld"
#pragma link "dxSkinValentine"
#pragma link "dxSkinVS2010"
#pragma link "dxSkinWhiteprint"
#pragma link "dxSkinXmas2008Blue"
#pragma link "cxGridChartView"
#pragma link "cxGridDBChartView"
#pragma link "cxContainer"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGridDBCardView"
#pragma link "cxGroupBox"
#pragma link "cxPC"
#pragma link "cxPCdxBarPopupMenu"
#pragma link "frxClass"
#pragma link "cxCalendar"
#pragma link "cxDBEdit"
#pragma link "cxDropDownEdit"
#pragma link "cxLabel"
#pragma link "cxMaskEdit"
#pragma link "cxTextEdit"
#pragma link "cxButtons"
#pragma link "AdvDateTimePicker"
#pragma link "cxDBLookupComboBox"
#pragma link "cxDBLookupEdit"
#pragma link "cxLookupEdit"
#pragma link "frxDBSet"
#pragma link "cxDrawTextUtils"
#pragma link "dxBkgnd"
#pragma link "dxPrnDev"
#pragma link "dxPrnPg"
#pragma link "dxPSCompsProvider"
#pragma link "dxPSCore"
#pragma link "dxPScxCommon"
#pragma link "dxPScxEditorProducers"
#pragma link "dxPScxExtEditorProducers"
#pragma link "dxPScxGridLayoutViewLnk"
#pragma link "dxPScxGridLnk"
#pragma link "dxPScxPageControlProducer"
#pragma link "dxPSEdgePatterns"
#pragma link "dxPSEngn"
#pragma link "dxPSFillPatterns"
#pragma link "dxPSGlbl"
#pragma link "dxPSPDFExport"
#pragma link "dxPSPDFExportCore"
#pragma link "dxPSPrVwAdv"
#pragma link "dxPSPrVwRibbon"
#pragma link "dxPSPrVwStd"
#pragma link "dxPSUtl"
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma link "dxPSContainerLnk"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btNewClick(TObject *Sender)
{
db->cdsArtikli->Append();
AdvDateTimePicker1->DateTime = Now();
AdvDateTimePicker2->DateTime = Now();
db->cdsArtikli->FieldByName("od")->AsDateTime = Now();
db->cdsArtikli->FieldByName("do")->AsDateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btSaveClick(TObject *Sender)
{
db->cdsArtikli->Post();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->cdsUredjaj->Active = false;
db->cdsUredjaj->Active = true;
db->cdsArtikli->Edit();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
{
if (Field == NULL) {
db->cdsStampa->Active = false;
db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->cdsStampa->Active = true;
cxGrid7DBChartView1->Title->Text = "Vreme merenje u satima za posudu "+IntToStr(db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger);
cxGrid8DBChartView1->Title->Text = "Zapis od "+db->cdsArtikli->FieldByName("OD")->AsString;
db->sqlMaxTemp->Close();
db->sqlMaxTemp->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sqlMaxTemp->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sqlMaxTemp->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->sqlMaxTemp->ExecSQL();
db->sqlMaxTemp->Open();
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
cxLabel6->Caption = db->cdsArtikli->FieldByName("Artikal")->AsString;
cxLabel16->Caption = db->cdsArtikli->FieldByName("Kolicina")->AsString;
cxLabel15->Caption = db->cdsArtikli->FieldByName("od")->AsString;
cxLabel14->Caption = db->cdsArtikli->FieldByName("do")->AsString;
cxLabel13->Caption = db->sqlMaxTemp->FieldByName("max_temp")->AsString;
cxLabel11->Caption = db->cdsArtikli->FieldByName("zadata_temperatura")->AsString;
db->sqlMaxTemp->Close();
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("od")->AsDateTime = AdvDateTimePicker1->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("do")->AsDateTime = AdvDateTimePicker2->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::cxButton1Click(TObject *Sender)
{
cxGroupBox8->Visible = false;
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,NULL,NULL);
cxGroupBox8->Visible = true;
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~22~ 0 → 100644
View file @ 99b3f33f
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MlekaraMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDBData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxNavigator"
#pragma link "cxStyles"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinBlueprint"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinDevExpressDarkStyle"
#pragma link "dxSkinDevExpressStyle"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkinHighContrast"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinOffice2013White"
#pragma link "dxSkinPumpkin"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinsDefaultPainters"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSevenClassic"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSharpPlus"
#pragma link "dxSkinSilver"
#pragma link "dxSkinSpringTime"
#pragma link "dxSkinStardust"
#pragma link "dxSkinSummer2008"
#pragma link "dxSkinTheAsphaltWorld"
#pragma link "dxSkinValentine"
#pragma link "dxSkinVS2010"
#pragma link "dxSkinWhiteprint"
#pragma link "dxSkinXmas2008Blue"
#pragma link "cxGridChartView"
#pragma link "cxGridDBChartView"
#pragma link "cxContainer"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGridDBCardView"
#pragma link "cxGroupBox"
#pragma link "cxPC"
#pragma link "cxPCdxBarPopupMenu"
#pragma link "frxClass"
#pragma link "cxCalendar"
#pragma link "cxDBEdit"
#pragma link "cxDropDownEdit"
#pragma link "cxLabel"
#pragma link "cxMaskEdit"
#pragma link "cxTextEdit"
#pragma link "cxButtons"
#pragma link "AdvDateTimePicker"
#pragma link "cxDBLookupComboBox"
#pragma link "cxDBLookupEdit"
#pragma link "cxLookupEdit"
#pragma link "frxDBSet"
#pragma link "cxDrawTextUtils"
#pragma link "dxBkgnd"
#pragma link "dxPrnDev"
#pragma link "dxPrnPg"
#pragma link "dxPSCompsProvider"
#pragma link "dxPSCore"
#pragma link "dxPScxCommon"
#pragma link "dxPScxEditorProducers"
#pragma link "dxPScxExtEditorProducers"
#pragma link "dxPScxGridLayoutViewLnk"
#pragma link "dxPScxGridLnk"
#pragma link "dxPScxPageControlProducer"
#pragma link "dxPSEdgePatterns"
#pragma link "dxPSEngn"
#pragma link "dxPSFillPatterns"
#pragma link "dxPSGlbl"
#pragma link "dxPSPDFExport"
#pragma link "dxPSPDFExportCore"
#pragma link "dxPSPrVwAdv"
#pragma link "dxPSPrVwRibbon"
#pragma link "dxPSPrVwStd"
#pragma link "dxPSUtl"
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma link "dxPSContainerLnk"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btNewClick(TObject *Sender)
{
db->cdsArtikli->Append();
AdvDateTimePicker1->DateTime = Now();
AdvDateTimePicker2->DateTime = Now();
db->cdsArtikli->FieldByName("od")->AsDateTime = Now();
db->cdsArtikli->FieldByName("do")->AsDateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btSaveClick(TObject *Sender)
{
db->cdsArtikli->Post();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->cdsUredjaj->Active = false;
db->cdsUredjaj->Active = true;
db->cdsArtikli->Edit();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
{
if (Field == NULL) {
db->cdsStampa->Active = false;
db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->cdsStampa->Active = true;
cxGrid7DBChartView1->Title->Text = "Vreme merenje u satima za posudu "+IntToStr(db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger);
cxGrid8DBChartView1->Title->Text = "Zapis od "+db->cdsArtikli->FieldByName("OD")->AsString;
db->sqlMaxTemp->Close();
db->sqlMaxTemp->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sqlMaxTemp->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sqlMaxTemp->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->sqlMaxTemp->ExecSQL();
db->sqlMaxTemp->Open();
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
cxLabel6->Caption = db->cdsArtikli->FieldByName("Artikal")->AsString;
cxLabel16->Caption = db->cdsArtikli->FieldByName("Kolicina")->AsString;
cxLabel15->Caption = db->cdsArtikli->FieldByName("od")->AsString;
cxLabel14->Caption = db->cdsArtikli->FieldByName("do")->AsString;
cxLabel13->Caption = db->sqlMaxTemp->FieldByName("max_temp")->AsString;
cxLabel11->Caption = db->cdsArtikli->FieldByName("zadata_temperatura")->AsString;
db->sqlMaxTemp->Close();
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("od")->AsDateTime = AdvDateTimePicker1->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("do")->AsDateTime = AdvDateTimePicker2->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::cxButton1Click(TObject *Sender)
{
cxGroupBox8->Visible = false;
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,NULL,NULL);
cxGroupBox8->Visible = true;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::cxButton2Click(TObject *Sender)
{
cxGroupBox6->Visible = false;
dxComponentPrinter2->RebuildReport();
dxComponentPrinter2->Print(false,NULL,NULL);
cxGroupBox6->Visible = true;
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~23~ 0 → 100644
View file @ 99b3f33f
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MlekaraMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDBData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxNavigator"
#pragma link "cxStyles"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinBlueprint"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinDevExpressDarkStyle"
#pragma link "dxSkinDevExpressStyle"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkinHighContrast"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinOffice2013White"
#pragma link "dxSkinPumpkin"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinsDefaultPainters"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSevenClassic"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSharpPlus"
#pragma link "dxSkinSilver"
#pragma link "dxSkinSpringTime"
#pragma link "dxSkinStardust"
#pragma link "dxSkinSummer2008"
#pragma link "dxSkinTheAsphaltWorld"
#pragma link "dxSkinValentine"
#pragma link "dxSkinVS2010"
#pragma link "dxSkinWhiteprint"
#pragma link "dxSkinXmas2008Blue"
#pragma link "cxGridChartView"
#pragma link "cxGridDBChartView"
#pragma link "cxContainer"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGridDBCardView"
#pragma link "cxGroupBox"
#pragma link "cxPC"
#pragma link "cxPCdxBarPopupMenu"
#pragma link "frxClass"
#pragma link "cxCalendar"
#pragma link "cxDBEdit"
#pragma link "cxDropDownEdit"
#pragma link "cxLabel"
#pragma link "cxMaskEdit"
#pragma link "cxTextEdit"
#pragma link "cxButtons"
#pragma link "AdvDateTimePicker"
#pragma link "cxDBLookupComboBox"
#pragma link "cxDBLookupEdit"
#pragma link "cxLookupEdit"
#pragma link "frxDBSet"
#pragma link "cxDrawTextUtils"
#pragma link "dxBkgnd"
#pragma link "dxPrnDev"
#pragma link "dxPrnPg"
#pragma link "dxPSCompsProvider"
#pragma link "dxPSCore"
#pragma link "dxPScxCommon"
#pragma link "dxPScxEditorProducers"
#pragma link "dxPScxExtEditorProducers"
#pragma link "dxPScxGridLayoutViewLnk"
#pragma link "dxPScxGridLnk"
#pragma link "dxPScxPageControlProducer"
#pragma link "dxPSEdgePatterns"
#pragma link "dxPSEngn"
#pragma link "dxPSFillPatterns"
#pragma link "dxPSGlbl"
#pragma link "dxPSPDFExport"
#pragma link "dxPSPDFExportCore"
#pragma link "dxPSPrVwAdv"
#pragma link "dxPSPrVwRibbon"
#pragma link "dxPSPrVwStd"
#pragma link "dxPSUtl"
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma link "dxPSContainerLnk"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btNewClick(TObject *Sender)
{
db->cdsArtikli->Append();
AdvDateTimePicker1->DateTime = Now();
AdvDateTimePicker2->DateTime = Now();
db->cdsArtikli->FieldByName("od")->AsDateTime = Now();
db->cdsArtikli->FieldByName("do")->AsDateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btSaveClick(TObject *Sender)
{
db->cdsArtikli->Post();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->cdsUredjaj->Active = false;
db->cdsUredjaj->Active = true;
db->cdsArtikli->Edit();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
{
if (Field == NULL) {
db->cdsStampa->Active = false;
db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->cdsStampa->Active = true;
cxGrid7DBChartView1->Title->Text = "Vreme merenje u satima za posudu "+IntToStr(db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger);
cxGrid8DBChartView1->Title->Text = "Zapis od "+db->cdsArtikli->FieldByName("OD")->AsString;
db->sqlMaxTemp->Close();
db->sqlMaxTemp->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
db->sqlMaxTemp->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
db->sqlMaxTemp->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
db->sqlMaxTemp->ExecSQL();
db->sqlMaxTemp->Open();
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
cxLabel6->Caption = db->cdsArtikli->FieldByName("Artikal")->AsString;
cxLabel16->Caption = db->cdsArtikli->FieldByName("Kolicina")->AsString;
cxLabel15->Caption = db->cdsArtikli->FieldByName("od")->AsString;
cxLabel14->Caption = db->cdsArtikli->FieldByName("do")->AsString;
cxLabel13->Caption = db->sqlMaxTemp->FieldByName("max_temp")->AsString;
cxLabel11->Caption = db->cdsArtikli->FieldByName("zadata_temperatura")->AsString;
db->sqlMaxTemp->Close();
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("od")->AsDateTime = AdvDateTimePicker1->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("do")->AsDateTime = AdvDateTimePicker2->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::cxButton1Click(TObject *Sender)
{
cxGroupBox8->Visible = false;
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,NULL,NULL);
cxGroupBox8->Visible = true;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::cxButton2Click(TObject *Sender)
{
cxGroupBox9->Visible = false;
dxComponentPrinter2->RebuildReport();
dxComponentPrinter2->Print(false,NULL,NULL);
cxGroupBox9->Visible = true;
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~5~ deleted 100644 → 0
View file @ e1d1f64c
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MlekaraMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDBData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxNavigator"
#pragma link "cxStyles"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinBlueprint"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinDevExpressDarkStyle"
#pragma link "dxSkinDevExpressStyle"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkinHighContrast"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinOffice2013White"
#pragma link "dxSkinPumpkin"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinsDefaultPainters"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSevenClassic"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSharpPlus"
#pragma link "dxSkinSilver"
#pragma link "dxSkinSpringTime"
#pragma link "dxSkinStardust"
#pragma link "dxSkinSummer2008"
#pragma link "dxSkinTheAsphaltWorld"
#pragma link "dxSkinValentine"
#pragma link "dxSkinVS2010"
#pragma link "dxSkinWhiteprint"
#pragma link "dxSkinXmas2008Blue"
#pragma link "cxGridChartView"
#pragma link "cxGridDBChartView"
#pragma link "cxContainer"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGridDBCardView"
#pragma link "cxGroupBox"
#pragma link "cxPC"
#pragma link "cxPCdxBarPopupMenu"
#pragma link "frxClass"
#pragma link "cxCalendar"
#pragma link "cxDBEdit"
#pragma link "cxDropDownEdit"
#pragma link "cxLabel"
#pragma link "cxMaskEdit"
#pragma link "cxTextEdit"
#pragma link "cxButtons"
#pragma link "AdvDateTimePicker"
#pragma link "cxDBLookupComboBox"
#pragma link "cxDBLookupEdit"
#pragma link "cxLookupEdit"
#pragma link "frxDBSet"
#pragma link "cxDrawTextUtils"
#pragma link "dxBkgnd"
#pragma link "dxPrnDev"
#pragma link "dxPrnPg"
#pragma link "dxPSCompsProvider"
#pragma link "dxPSCore"
#pragma link "dxPScxCommon"
#pragma link "dxPScxEditorProducers"
#pragma link "dxPScxExtEditorProducers"
#pragma link "dxPScxGridLayoutViewLnk"
#pragma link "dxPScxGridLnk"
#pragma link "dxPScxPageControlProducer"
#pragma link "dxPSEdgePatterns"
#pragma link "dxPSEngn"
#pragma link "dxPSFillPatterns"
#pragma link "dxPSGlbl"
#pragma link "dxPSPDFExport"
#pragma link "dxPSPDFExportCore"
#pragma link "dxPSPrVwAdv"
#pragma link "dxPSPrVwRibbon"
#pragma link "dxPSPrVwStd"
#pragma link "dxPSUtl"
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btNewClick(TObject *Sender)
{
db->cdsArtikli->Append();
AdvDateTimePicker1->DateTime = Now();
AdvDateTimePicker2->DateTime = Now();
db->cdsArtikli->FieldByName("od")->AsDateTime = Now();
db->cdsArtikli->FieldByName("do")->AsDateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btSaveClick(TObject *Sender)
{
db->cdsArtikli->Post();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
{
if (Field == NULL) {
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("od")->AsDateTime = AdvDateTimePicker1->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("do")->AsDateTime = AdvDateTimePicker2->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btPrintClick(TObject *Sender)
{
// db->cdsStampa->Active = false;
// db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
// db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
// db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
// db->cdsStampa->Active = false;
//
//
// if ( print->LoadFromFile( GetCurrentDir() + "\\Diagram_sa_artiklom.fr3" ) )
// {
// print->ShowReport( );
// }
// else
// ShowMessage( "Ne postoji fajl: " + GetCurrentDir() + "\\Diagram_sa_artiklom.fr3" );
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,null,null);
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~6~ deleted 100644 → 0
View file @ e1d1f64c
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MlekaraMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDBData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxNavigator"
#pragma link "cxStyles"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinBlueprint"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinDevExpressDarkStyle"
#pragma link "dxSkinDevExpressStyle"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkinHighContrast"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinOffice2013White"
#pragma link "dxSkinPumpkin"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinsDefaultPainters"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSevenClassic"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSharpPlus"
#pragma link "dxSkinSilver"
#pragma link "dxSkinSpringTime"
#pragma link "dxSkinStardust"
#pragma link "dxSkinSummer2008"
#pragma link "dxSkinTheAsphaltWorld"
#pragma link "dxSkinValentine"
#pragma link "dxSkinVS2010"
#pragma link "dxSkinWhiteprint"
#pragma link "dxSkinXmas2008Blue"
#pragma link "cxGridChartView"
#pragma link "cxGridDBChartView"
#pragma link "cxContainer"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGridDBCardView"
#pragma link "cxGroupBox"
#pragma link "cxPC"
#pragma link "cxPCdxBarPopupMenu"
#pragma link "frxClass"
#pragma link "cxCalendar"
#pragma link "cxDBEdit"
#pragma link "cxDropDownEdit"
#pragma link "cxLabel"
#pragma link "cxMaskEdit"
#pragma link "cxTextEdit"
#pragma link "cxButtons"
#pragma link "AdvDateTimePicker"
#pragma link "cxDBLookupComboBox"
#pragma link "cxDBLookupEdit"
#pragma link "cxLookupEdit"
#pragma link "frxDBSet"
#pragma link "cxDrawTextUtils"
#pragma link "dxBkgnd"
#pragma link "dxPrnDev"
#pragma link "dxPrnPg"
#pragma link "dxPSCompsProvider"
#pragma link "dxPSCore"
#pragma link "dxPScxCommon"
#pragma link "dxPScxEditorProducers"
#pragma link "dxPScxExtEditorProducers"
#pragma link "dxPScxGridLayoutViewLnk"
#pragma link "dxPScxGridLnk"
#pragma link "dxPScxPageControlProducer"
#pragma link "dxPSEdgePatterns"
#pragma link "dxPSEngn"
#pragma link "dxPSFillPatterns"
#pragma link "dxPSGlbl"
#pragma link "dxPSPDFExport"
#pragma link "dxPSPDFExportCore"
#pragma link "dxPSPrVwAdv"
#pragma link "dxPSPrVwRibbon"
#pragma link "dxPSPrVwStd"
#pragma link "dxPSUtl"
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btNewClick(TObject *Sender)
{
db->cdsArtikli->Append();
AdvDateTimePicker1->DateTime = Now();
AdvDateTimePicker2->DateTime = Now();
db->cdsArtikli->FieldByName("od")->AsDateTime = Now();
db->cdsArtikli->FieldByName("do")->AsDateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btSaveClick(TObject *Sender)
{
db->cdsArtikli->Post();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
{
if (Field == NULL) {
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("od")->AsDateTime = AdvDateTimePicker1->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("do")->AsDateTime = AdvDateTimePicker2->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btPrintClick(TObject *Sender)
{
// db->cdsStampa->Active = false;
// db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
// db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
// db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
// db->cdsStampa->Active = false;
//
//
// if ( print->LoadFromFile( GetCurrentDir() + "\\Diagram_sa_artiklom.fr3" ) )
// {
// print->ShowReport( );
// }
// else
// ShowMessage( "Ne postoji fajl: " + GetCurrentDir() + "\\Diagram_sa_artiklom.fr3" );
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,NULL,null);
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~7~ deleted 100644 → 0
View file @ e1d1f64c
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MlekaraMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDBData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxNavigator"
#pragma link "cxStyles"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinBlueprint"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinDevExpressDarkStyle"
#pragma link "dxSkinDevExpressStyle"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkinHighContrast"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinOffice2013White"
#pragma link "dxSkinPumpkin"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinsDefaultPainters"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSevenClassic"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSharpPlus"
#pragma link "dxSkinSilver"
#pragma link "dxSkinSpringTime"
#pragma link "dxSkinStardust"
#pragma link "dxSkinSummer2008"
#pragma link "dxSkinTheAsphaltWorld"
#pragma link "dxSkinValentine"
#pragma link "dxSkinVS2010"
#pragma link "dxSkinWhiteprint"
#pragma link "dxSkinXmas2008Blue"
#pragma link "cxGridChartView"
#pragma link "cxGridDBChartView"
#pragma link "cxContainer"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGridDBCardView"
#pragma link "cxGroupBox"
#pragma link "cxPC"
#pragma link "cxPCdxBarPopupMenu"
#pragma link "frxClass"
#pragma link "cxCalendar"
#pragma link "cxDBEdit"
#pragma link "cxDropDownEdit"
#pragma link "cxLabel"
#pragma link "cxMaskEdit"
#pragma link "cxTextEdit"
#pragma link "cxButtons"
#pragma link "AdvDateTimePicker"
#pragma link "cxDBLookupComboBox"
#pragma link "cxDBLookupEdit"
#pragma link "cxLookupEdit"
#pragma link "frxDBSet"
#pragma link "cxDrawTextUtils"
#pragma link "dxBkgnd"
#pragma link "dxPrnDev"
#pragma link "dxPrnPg"
#pragma link "dxPSCompsProvider"
#pragma link "dxPSCore"
#pragma link "dxPScxCommon"
#pragma link "dxPScxEditorProducers"
#pragma link "dxPScxExtEditorProducers"
#pragma link "dxPScxGridLayoutViewLnk"
#pragma link "dxPScxGridLnk"
#pragma link "dxPScxPageControlProducer"
#pragma link "dxPSEdgePatterns"
#pragma link "dxPSEngn"
#pragma link "dxPSFillPatterns"
#pragma link "dxPSGlbl"
#pragma link "dxPSPDFExport"
#pragma link "dxPSPDFExportCore"
#pragma link "dxPSPrVwAdv"
#pragma link "dxPSPrVwRibbon"
#pragma link "dxPSPrVwStd"
#pragma link "dxPSUtl"
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btNewClick(TObject *Sender)
{
db->cdsArtikli->Append();
AdvDateTimePicker1->DateTime = Now();
AdvDateTimePicker2->DateTime = Now();
db->cdsArtikli->FieldByName("od")->AsDateTime = Now();
db->cdsArtikli->FieldByName("do")->AsDateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btSaveClick(TObject *Sender)
{
db->cdsArtikli->Post();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
{
if (Field == NULL) {
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("od")->AsDateTime = AdvDateTimePicker1->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("do")->AsDateTime = AdvDateTimePicker2->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btPrintClick(TObject *Sender)
{
// db->cdsStampa->Active = false;
// db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
// db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
// db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
// db->cdsStampa->Active = false;
//
//
// if ( print->LoadFromFile( GetCurrentDir() + "\\Diagram_sa_artiklom.fr3" ) )
// {
// print->ShowReport( );
// }
// else
// ShowMessage( "Ne postoji fajl: " + GetCurrentDir() + "\\Diagram_sa_artiklom.fr3" );
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,NULL,NULL);
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~8~ deleted 100644 → 0
View file @ e1d1f64c
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MlekaraMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDBData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxNavigator"
#pragma link "cxStyles"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinBlueprint"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinDevExpressDarkStyle"
#pragma link "dxSkinDevExpressStyle"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkinHighContrast"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinOffice2013White"
#pragma link "dxSkinPumpkin"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinsDefaultPainters"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSevenClassic"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSharpPlus"
#pragma link "dxSkinSilver"
#pragma link "dxSkinSpringTime"
#pragma link "dxSkinStardust"
#pragma link "dxSkinSummer2008"
#pragma link "dxSkinTheAsphaltWorld"
#pragma link "dxSkinValentine"
#pragma link "dxSkinVS2010"
#pragma link "dxSkinWhiteprint"
#pragma link "dxSkinXmas2008Blue"
#pragma link "cxGridChartView"
#pragma link "cxGridDBChartView"
#pragma link "cxContainer"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGridDBCardView"
#pragma link "cxGroupBox"
#pragma link "cxPC"
#pragma link "cxPCdxBarPopupMenu"
#pragma link "frxClass"
#pragma link "cxCalendar"
#pragma link "cxDBEdit"
#pragma link "cxDropDownEdit"
#pragma link "cxLabel"
#pragma link "cxMaskEdit"
#pragma link "cxTextEdit"
#pragma link "cxButtons"
#pragma link "AdvDateTimePicker"
#pragma link "cxDBLookupComboBox"
#pragma link "cxDBLookupEdit"
#pragma link "cxLookupEdit"
#pragma link "frxDBSet"
#pragma link "cxDrawTextUtils"
#pragma link "dxBkgnd"
#pragma link "dxPrnDev"
#pragma link "dxPrnPg"
#pragma link "dxPSCompsProvider"
#pragma link "dxPSCore"
#pragma link "dxPScxCommon"
#pragma link "dxPScxEditorProducers"
#pragma link "dxPScxExtEditorProducers"
#pragma link "dxPScxGridLayoutViewLnk"
#pragma link "dxPScxGridLnk"
#pragma link "dxPScxPageControlProducer"
#pragma link "dxPSEdgePatterns"
#pragma link "dxPSEngn"
#pragma link "dxPSFillPatterns"
#pragma link "dxPSGlbl"
#pragma link "dxPSPDFExport"
#pragma link "dxPSPDFExportCore"
#pragma link "dxPSPrVwAdv"
#pragma link "dxPSPrVwRibbon"
#pragma link "dxPSPrVwStd"
#pragma link "dxPSUtl"
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btNewClick(TObject *Sender)
{
db->cdsArtikli->Append();
AdvDateTimePicker1->DateTime = Now();
AdvDateTimePicker2->DateTime = Now();
db->cdsArtikli->FieldByName("od")->AsDateTime = Now();
db->cdsArtikli->FieldByName("do")->AsDateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btSaveClick(TObject *Sender)
{
db->cdsArtikli->Post();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
{
if (Field == NULL) {
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("od")->AsDateTime = AdvDateTimePicker1->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("do")->AsDateTime = AdvDateTimePicker2->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btPrintClick(TObject *Sender)
{
// db->cdsStampa->Active = false;
// db->sdsStampa->ParamByName("ID")->AsInteger = db->cdsArtikli->FieldByName("id_uredjaja")->AsInteger;
// db->sdsStampa->ParamByName("D1")->AsDateTime = db->cdsArtikli->FieldByName("OD")->AsDateTime;
// db->sdsStampa->ParamByName("D2")->AsDateTime = db->cdsArtikli->FieldByName("DO")->AsDateTime;
// db->cdsStampa->Active = false;
//
//
// if ( print->LoadFromFile( GetCurrentDir() + "\\Diagram_sa_artiklom.fr3" ) )
// {
// print->ShowReport( );
// }
// else
// ShowMessage( "Ne postoji fajl: " + GetCurrentDir() + "\\Diagram_sa_artiklom.fr3" );
dxComponentPrinter1->RebuildReport();
dxComponentPrinter1->Print(false,NULL,NULL);
}
//---------------------------------------------------------------------------
__history/MlekaraMain.cpp.~9~ deleted 100644 → 0
View file @ e1d1f64c
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MlekaraMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDBData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxNavigator"
#pragma link "cxStyles"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinBlueprint"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinDevExpressDarkStyle"
#pragma link "dxSkinDevExpressStyle"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkinHighContrast"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinOffice2013White"
#pragma link "dxSkinPumpkin"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinsDefaultPainters"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSevenClassic"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSharpPlus"
#pragma link "dxSkinSilver"
#pragma link "dxSkinSpringTime"
#pragma link "dxSkinStardust"
#pragma link "dxSkinSummer2008"
#pragma link "dxSkinTheAsphaltWorld"
#pragma link "dxSkinValentine"
#pragma link "dxSkinVS2010"
#pragma link "dxSkinWhiteprint"
#pragma link "dxSkinXmas2008Blue"
#pragma link "cxGridChartView"
#pragma link "cxGridDBChartView"
#pragma link "cxContainer"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGridDBCardView"
#pragma link "cxGroupBox"
#pragma link "cxPC"
#pragma link "cxPCdxBarPopupMenu"
#pragma link "frxClass"
#pragma link "cxCalendar"
#pragma link "cxDBEdit"
#pragma link "cxDropDownEdit"
#pragma link "cxLabel"
#pragma link "cxMaskEdit"
#pragma link "cxTextEdit"
#pragma link "cxButtons"
#pragma link "AdvDateTimePicker"
#pragma link "cxDBLookupComboBox"
#pragma link "cxDBLookupEdit"
#pragma link "cxLookupEdit"
#pragma link "frxDBSet"
#pragma link "cxDrawTextUtils"
#pragma link "dxBkgnd"
#pragma link "dxPrnDev"
#pragma link "dxPrnPg"
#pragma link "dxPSCompsProvider"
#pragma link "dxPSCore"
#pragma link "dxPScxCommon"
#pragma link "dxPScxEditorProducers"
#pragma link "dxPScxExtEditorProducers"
#pragma link "dxPScxGridLayoutViewLnk"
#pragma link "dxPScxGridLnk"
#pragma link "dxPScxPageControlProducer"
#pragma link "dxPSEdgePatterns"
#pragma link "dxPSEngn"
#pragma link "dxPSFillPatterns"
#pragma link "dxPSGlbl"
#pragma link "dxPSPDFExport"
#pragma link "dxPSPDFExportCore"
#pragma link "dxPSPrVwAdv"
#pragma link "dxPSPrVwRibbon"
#pragma link "dxPSPrVwStd"
#pragma link "dxPSUtl"
#pragma link "dxSkinsdxBarPainter"
#pragma link "dxSkinsdxRibbonPainter"
#pragma link "dxWrap"
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btNewClick(TObject *Sender)
{
db->cdsArtikli->Append();
AdvDateTimePicker1->DateTime = Now();
AdvDateTimePicker2->DateTime = Now();
db->cdsArtikli->FieldByName("od")->AsDateTime = Now();
db->cdsArtikli->FieldByName("do")->AsDateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::btSaveClick(TObject *Sender)
{
db->cdsArtikli->Post();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FormShow(TObject *Sender)
{
db->openArtikliCds();
db->dsArtikli->OnDataChange = &ArtikliDataChange;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ArtikliDataChange(TObject *Sender, TField *Field)
{
if (Field == NULL) {
AdvDateTimePicker1->DateTime = db->cdsArtikli->FieldByName("od")->AsDateTime;
AdvDateTimePicker2->DateTime = db->cdsArtikli->FieldByName("do")->AsDateTime;
}
}
void __fastcall TMainForm::AdvDateTimePicker1Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("od")->AsDateTime = AdvDateTimePicker1->DateTime;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::AdvDateTimePicker2Change(TObject *Sender)
{
db->cdsArtikli->FieldByName("do")->AsDateTime = AdvDateTimePicker2->DateTime;
}
//---------------------------------------------------------------------------
__history/MlekaraMain.dfm.~20~ deleted 100644 → 0
View file @ e1d1f64c
This diff is collapsed.
__history/MlekaraMain.dfm.~21~ deleted 100644 → 0
View file @ e1d1f64c
This diff is collapsed.
__history/MlekaraMain.dfm.~22~ deleted 100644 → 0
View file @ e1d1f64c
This diff is collapsed.
__history/MlekaraMain.dfm.~23~ deleted 100644 → 0
View file @ e1d1f64c
This diff is collapsed.
__history/MlekaraMain.dfm.~24~ deleted 100644 → 0
View file @ e1d1f64c
This diff is collapsed.
__history/MlekaraMain.dfm.~25~ deleted 100644 → 0
View file @ e1d1f64c
This diff is collapsed.
__history/MlekaraMain.dfm.~36~ 0 → 100644
View file @ 99b3f33f
This diff is collapsed.
__history/MlekaraMain.dfm.~37~ 0 → 100644
View file @ 99b3f33f
This diff is collapsed.
__history/MlekaraMain.dfm.~38~ 0 → 100644
View file @ 99b3f33f
This diff is collapsed.
__history/MlekaraMain.dfm.~39~ 0 → 100644
View file @ 99b3f33f
This diff is collapsed.
__history/MlekaraMain.dfm.~40~ 0 → 100644
View file @ 99b3f33f
This diff is collapsed.
__history/MlekaraMain.dfm.~41~ 0 → 100644
View file @ 99b3f33f
This diff is collapsed.
__history/MlekaraMain.h.~18~ 0 → 100644
View file @ 99b3f33f
This diff is collapsed.
__history/MlekaraMain.h.~19~ 0 → 100644
View file @ 99b3f33f
This diff is collapsed.
__history/MlekaraMain.h.~20~ 0 → 100644
View file @ 99b3f33f
This diff is collapsed.
__history/MlekaraMain.h.~4~ deleted 100644 → 0
View file @ e1d1f64c
This diff is collapsed.
__history/MlekaraMain.h.~5~ deleted 100644 → 0
View file @ e1d1f64c
This diff is collapsed.
__history/MlekaraMain.h.~7~ deleted 100644 → 0
View file @ e1d1f64c
This diff is collapsed.
dbUtility/__history/Connection.dfm.~7~ 0 → 100644
View file @ 99b3f33f
This diff is collapsed.
dbUtility/dbDm.dfm
View file @ 99b3f33f
This diff is collapsed.
dbUtility/dbDm.h
View file @ 99b3f33f
This diff is collapsed.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment