|
다음 코드는 스피드버튼이 눌려졌을때 4개의 combobox의 text를 읽어와 필터로 활용하려고 하는 예제입니다.
void __fastcall TForm1::SpeedButton2Click(TObject *Sender)
{
OrderNavi->Visible = true;
OrderGrid->Visible = true;
ExcelOpenButton->Enabled = true;
OrderTable->Active = true;
OrderTable->Filtered = true;
if((TeamCombo->Text != "몽땅") && (ChargeCombo->Text != "몽땅"))
OrderTable->Filter = "MONTH = " + QuotedStr(MonthCombo->Text) +" AND "+ "VER = " + QuotedStr(VersionCombo->Text) +" AND "+"TEAM = "+QuotedStr(TeamCombo->Text)+" AND "+"CHARGE = "+QuotedStr(ChargeCombo->Text);
if((TeamCombo->Text == "몽땅") && (ChargeCombo->Text != "몽땅"))
OrderTable->Filter = "MONTH = " + QuotedStr(MonthCombo->Text) +" AND "+ "VER = " + QuotedStr(VersionCombo->Text) +" AND "+"CHARGE = "+QuotedStr(ChargeCombo->Text);
if((TeamCombo->Text != "몽땅") && (ChargeCombo->Text == "몽땅"))
OrderTable->Filter = "MONTH = " + QuotedStr(MonthCombo->Text) +" AND "+ "VER = " + QuotedStr(VersionCombo->Text) +" AND "+"TEAM = "+QuotedStr(TeamCombo->Text);
if((TeamCombo->Text == "몽땅") && (ChargeCombo->Text == "몽땅")){
OrderTable->Filtered = false;
}
OrderTable->Refresh();
}
최종적으로 원하는대로 되긴 하는데
"업데이트나 새로 고치는데 필요한 키 열에 대한 정보가 부족합니다" 라고 메세지가 뜨는데요.
이거 왜 이런가요? 데이타는 원하는대로 필터링은 됩니다.
답변 부탁드립니다.
감사합니다.
|