Пример #1
0
void __fastcall TMainForm::DBGridJournalDBTableView1CustomDrawCell(
      TcxCustomGridTableView *Sender, TcxCanvas *ACanvas,
      TcxGridTableDataCellViewInfo *AViewInfo, bool &ADone)
{
  if (m_use_terms == false)
  {
    ADone = false;
    return;
  }

  exec_date_col_index = -1;
  done_col_index = -1;

  for (int i=0; i < DBGridJournalDBTableView1->ColumnCount; i++)
  {
    if (DBGridJournalDBTableView1->Columns[i]->DataBinding->FieldName.LowerCase() == m_date_execute.LowerCase())
        exec_date_col_index = DBGridJournalDBTableView1->Columns[i]->Index;

    if (DBGridJournalDBTableView1->Columns[i]->DataBinding->FieldName.LowerCase() == m_done.LowerCase())
        done_col_index = DBGridJournalDBTableView1->Columns[i]->Index;
  }


  if (exec_date_col_index == -1 || done_col_index == -1)
  {
    ADone = false;
    return;
  } // done_col_index // AViewInfo->GridRecord->DisplayTexts[done_col_index];
  else if (AViewInfo->Item->Index == exec_date_col_index && AViewInfo->GridRecord->DisplayTexts[done_col_index].LowerCase() == "0")
  {
    if (!AViewInfo->Value.IsNull() && VarToDateTime (AViewInfo->Value) <= TDateTime::CurrentDate())
    {
      const TColor clRed  = 0x000000FF;

      TRect ARec = AViewInfo->Bounds;

      ACanvas->Canvas->Brush->Style = bsSolid;
      ACanvas->Canvas->Brush->Color = clRed;
      ACanvas->Canvas->FillRect(ARec);
    }
    else if (!AViewInfo->Value.IsNull() && VarToDateTime (AViewInfo->Value) <= (TDateTime::CurrentDate() + m_notification_days) && AViewInfo->GridRecord->DisplayTexts[done_col_index].LowerCase() == "0")
    {
      const TColor clGreen = 0x0000FF00;

      TRect ARec = AViewInfo->Bounds;

      ACanvas->Canvas->Brush->Style = bsSolid;
      ACanvas->Canvas->Brush->Color = clGreen;
      ACanvas->Canvas->FillRect(ARec);
    }
  }
}
Пример #2
0
        delete(l);
        this->DestroyWnd();
    }
}

//---------------------------------------------------------------------------
void __fastcall TFrmNewRec::Clear_btnClick(TObject *Sender){
    if(Sender != NULL){
        delete(l);
        l = new label();

        Header_txt->Text = "";
        Title_txt->Text = "";
        PDate_drp->Text = "-- Select the date of the Piece --";
        Material_drp->Text = "-- Select Material --";

        Approved_btn->Text = "-- Approved By --";
        EDate_date->Text = "";
        Approved_chk->Checked = false;
        Artist_txt->Text = "";
        Title2_txt->Text = "";
        Dimensions_txt->Text = "";
        Date_txt->Text = "";

        sqlConnection *conn = new sqlConnection();
        MYSQL_RES *res = conn->query("SELECT NOW()");
        MYSQL_ROW row;
Пример #3
0
//---------------------------------------------------------------------------
void __fastcall TFrmNewRec::FormClose(TObject *Sender,
      TCloseAction &Action){
    if((Sender != NULL) || (Action != NULL)){
        this->DestroyWnd();
        delete(l);
    }
}

//---------------------------------------------------------------------------
void __fastcall TFrmNewRec::OK_btnClick(TObject *Sender){
    sqlConnection *conn = new sqlConnection();
    String sql, sql2, trm;

    if(Sender == NULL)
        return;
        
    if((Header_txt->Text == "") || (Header_txt == NULL)){
        MessageDlg("Header is a required field.", mtError, TMsgDlgButtons()
            << mbOK, 0);
    }
    else if ((Material_drp->Text == "-- Select Material --") ||
        (Material_drp->Text == "") || (Material_drp->Text == NULL)){
        MessageDlg("Material Type is a required field.", mtError,
            TMsgDlgButtons() << mbOK, 0);
    }
    else if ((PDate_drp->Text == "-- Select the date of the Piece --") ||
        (PDate_drp->Text == "") || (PDate_drp->Text == NULL)){
        MessageDlg("Period Date is a required field.", mtError, TMsgDlgButtons()
            << mbOK, 0);
    }
    else if((Entered_drp->Text == "-- Entered By --") ||
        (Entered_drp->Text == "") || (Entered_drp->Text == NULL)){
        MessageDlg("Entered by is a required field.",mtError,TMsgDlgButtons()
            << mbOK,0);
    }
    else{
        sqlConnection *conn = new sqlConnection();

        MYSQL_RES *res = conn->query("SELECT NOW()");
        MYSQL_ROW row;
        String matNum, PDate, empId, approveEmpId;

        if (res != NULL){
            if(row = mysql_fetch_row(res)){
                EDate_date->Text = VarToDateTime(row[0]);
            }
            mysql_free_result(res);
        }

        l->header = Header_txt->Text;
        l->title = Title_txt->Text;
        l->title2 = Title2_txt->Text;
        l->Material = Material_drp->Text;
        l->PDate = PDate_drp->Text;
        l->Enter = Entered_drp->Text;
        l->Is_Approved = Approved_chk->Checked;
        l->Artist = Artist_txt->Text;
        l->Dimension = Dimensions_txt->Text;
        l->EDate = EDate_date->Text;

        //----------------------------------------------------------------------
        //* Get Material number
        sql = "SELECT tb_MaterialKey FROM tb_materials WHERE tb_MaterialDesc = '";
        sql = sql + SQLParse(Material_drp->Text) + "'";

        res = conn->query(sql);
        if (res != NULL){
            if(row = mysql_fetch_row(res)){
                matNum = row[0];
            }
            mysql_free_result(res);
        }

        //* Get Period Date number
        sql = "SELECT tb_PDateKey FROM tb_period WHERE tb_PDateDesc = '";
        sql = sql + SQLParse(PDate_drp->Text) + "'";

        res = conn->query(sql);
        if (res != NULL){
            if(row = mysql_fetch_row(res)){
                PDate = row[0];
            }
            mysql_free_result(res);
        }

        //* Get Entered by number
        sql = "SELECT tb_EmpKey FROM tb_employees WHERE ";
        sql = sql + "concat(concat(tb_FirstName, ' '), tb_LastName)  = '";
        sql = sql + SQLParse(Entered_drp->Text) + "'";

        res = conn->query(sql);
        if (res != NULL){
            if(row = mysql_fetch_row(res)){
                empId = row[0];
            }
            mysql_free_result(res);
        }

        //* Get Approved by Employee number
        sql = "SELECT tb_EmpKey FROM tb_employees WHERE ";
        sql = sql + "concat(concat(tb_FirstName, ' '), tb_LastName)  = '";
        sql = sql + SQLParse(Approved_btn->Text) + "'";

        res = conn->query(sql);
        if (res != NULL){
            if(row = mysql_fetch_row(res)){
                approveEmpId = row[0];
            }
            mysql_free_result(res);
        }

        //-------------------------------------------------------------------

        sql = "INSERT INTO vrl.tb_slides (tb_Header, tb_Title, tb_Title2, ";
        sql = sql + "tb_MaterialKey, tb_PDateKey, tb_EDate, tb_EmpKey, " +
            "tb_IsApproved, tb_AppEmpKey, tb_Artist, tb_Dimensions, " +
            "tb_Date, Picture) VALUES ('" + SQLParse(Header_txt->Text) + "', '"
            + SQLParse(Title_txt->Text) + "', '" + SQLParse(Title2_txt->Text)
            + "', " + matNum + ", " + PDate + ", '" + SQLParse(EDate_date->Text)
            + "', '" +
            SQLParse(empId);

        if(Approved_chk->Checked == TRUE){