«Бағдарламалау тілдері» пәнінен оқу тәжірибесі бойынша
жүктеу/скачать 2,7 Mb.
|
с
| void __fastcall TForm1::Button3Click(TObject *Sender)
{ if (Table1->Active) { Table1->SetRangeStart(); Table1->Fields[0]->AsString = Edit1->Text; Table1->SetRangeEnd(); Table1->Fields[0]->AsString = Edit2->Text; Table1->ApplyRange(); } } Енді Edit1 және Edit2 өңдеу өрістері және Button3 батырмасы көмегімен клиенттер нөмірі диапазонын таңдауға болады, яғни олар туралы мәліметтер DBGrid1 көрінуі үшін. Сосын 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,7 Mb. Достарыңызбен бөлісу:
|