«Бағдарламалау тілдері» пәнінен оқу тәжірибесі бойынша
жүктеу/скачать 2,75 Mb.
|
| void __fastcall TForm1::RadioButton2Click(TObject *Sender)
{ DBGrid1->DataSource =DataSource2; } Енді осы радиобатырмалар көмегімен клиенттер тізімі және тапсырыстар тізімі арасында ауысуға болады. Button3 батырмасына OnClick өңдеуші оқиғасын құрамыз: void __fastcall TForm1::Button3Click(TObject *Sender) {
{ Table1->SetRangeStart(); Table1->Fields[0]->AsString = Edit1->Text; Table1->SetRangeEnd(); Table1->Fields[0]->AsString = Edit2->Text; Table1->ApplyRange(); } }
Сосын Visual Query Builder арқылы Query2 компонентінің SQL қасиетін орнатамыз. Деректер қоры аты ретінде BCDEMOS таңдаймыз және сұранысқа CUSTOMER және ORDERS кестелерін енгіземіз. Ары қарай кестелер арасында байланыс орнатамыз. Сұранысқа келесі өрістерді енгіземіз: - Customer.CustNo - Customer.Company - Orders.OrderNo - Orders.AmountPaid 4.3.2-сурет. Аралас сұраныс құру үшін Visual Query Builder қолдану Енді сұраныс нәтижесін сатып алушы нөмірі бойынша сұрыптаймыз және Visual Query Builder –ден шығамыз. Объектілер инспекторын қолданып, Query2 компонентін таңдаймыз және Active қасиеті мәнін true теңестіреміз. RadioButton3 радиобатырмасына OnClick өңдеуші оқиғасын құрамыз: жүктеу/скачать 2,75 Mb. Достарыңызбен бөлісу:
|