//LIVELLI DI LOG: 0=NIENTE 1=TUTTO 2=SOLO ERR
void XaLibLog::Write(const string& LogMessageLevel,const char* ClassName,const char* MethodName,const int& LineNumber,const string& LogMessage){
stringstream LineNumberStringStream;
LineNumberStringStream << LineNumber;
string LineNumberString= LineNumberStringStream.str();
if (SETTINGS["LogLevel"]=="0"){
} else {
if (SETTINGS["LogUseDb"]=="yes" && SETTINGS["DatabaseEnable"]=="yes") {
WriteDb(LogMessageLevel,ClassName,MethodName,LineNumberString,LogMessage);
} else {
unique_ptr<XaLibTime> LibTimeLocal(new XaLibTime());
string LogTime=LibTimeLocal->GetDateTimeIsoComplete();
string MyLogString="["+SETTINGS["AppName"]+"]["+LogMessageLevel+"]["+SESSION.FrontEndIp+"]["+LogTime+"]["+SESSION.ClientIp+ "]["+FromIntToString(SESSION.XaUser_ID)+"]["+ClassName +"]["+LineNumberString+"]["+MethodName+"]["+LogMessage+"]";
WriteFile(MyLogString,LogMessageLevel);
}
}
};
//---------------------------------------------------------------------------
void __fastcall TForm1::mnuDelClick(TObject *Sender)
{
if(lvList->Selected == NULL)
return;
lvList->Selected->Delete();
WriteDb();
LoadDb();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N2Click(TObject *Sender)
{
//new
frmmstscAdd = new TfrmmstscAdd(this);
if(frmmstscAdd->ShowModal() == mrOk)
{
TListItem*Item = lvList->Items->Add();
Item->Caption = IntToStr(Item->Index+1);
Item->SubItems->Add(frmmstscAdd->Edit1->Text);
Item->SubItems->Add(frmmstscAdd->Edit2->Text);
Item->SubItems->Add(frmmstscAdd->Edit3->Text);
WriteDb();
LoadDb();
}
delete frmmstscAdd;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::mnuEditClick(TObject *Sender)
{
if(lvList->Selected == NULL)
return;
//edit
frmmstscAdd = new TfrmmstscAdd(this);
frmmstscAdd->Edit1->Text = lvList->Selected->SubItems->Strings[0];
frmmstscAdd->Edit2->Text = lvList->Selected->SubItems->Strings[1];
frmmstscAdd->Edit3->Text = lvList->Selected->SubItems->Strings[2];
if(frmmstscAdd->ShowModal() == mrOk)
{
lvList->Selected->SubItems->Strings[0] = frmmstscAdd->Edit1->Text;
lvList->Selected->SubItems->Strings[1] = frmmstscAdd->Edit2->Text;
lvList->Selected->SubItems->Strings[2] = frmmstscAdd->Edit3->Text;
WriteDb();
LoadDb();
}
delete frmmstscAdd;
}
