ADO के साथ डेल्फी क्वेरी का उपयोग करना

TADOQuery घटक प्रदान करता है डेल्फी डेवलपर्स एक से एक या कई तालिकाओं से डेटा लाने की क्षमता ADO डेटाबेस SQL का उपयोग कर।

ये SQL स्टेटमेंट या तो डीडीएल (डेटा डेफिनिशन लैंग्वेज) हो सकते हैं जैसे क्रिएट टेबल, अलर्ट INDEX, और इसके बाद, या वे DML (Data Manipulation Language) स्टेटमेंट, जैसे SELECT, UPDATE, और हो सकते हैं हटा दें। हालाँकि, सबसे सामान्य कथन, SELECT स्टेटमेंट है, जो टेबल कंपोनेंट का उपयोग करके उपलब्ध के समान दृश्य पैदा करता है।

नोट: भले ही ADOQuery घटक का उपयोग करके कमांड निष्पादित करना संभव है, ADOCommandइस उद्देश्य के लिए घटक अधिक उपयुक्त है। इसका उपयोग अक्सर डीडीएल कमांड को निष्पादित करने या संग्रहीत प्रक्रिया को निष्पादित करने के लिए किया जाता है (भले ही आपको इसका उपयोग करना चाहिएTADOStoredProc ऐसे कार्यों के लिए) जो परिणाम सेट वापस नहीं करता है।

ADOQuery घटक में प्रयुक्त SQL उपयोग में ADO ड्राइवर के लिए स्वीकार्य होना चाहिए। दूसरे शब्दों में, आपको SQL लेखन के बीच के अंतरों से परिचित होना चाहिए, उदाहरण के लिए, MS Access और MS SQL।

जब एडॉटेबल घटक के साथ काम करते हैं, तो डेटाबेस में डेटा ADOQuery घटक द्वारा स्थापित डेटा स्टोर कनेक्शन का उपयोग करके एक्सेस किया जाता है

एक डेल्फी फॉर्म को ADOQuery घटक के साथ एक एक्सेस डेटाबेस से डेटा को पुनः प्राप्त करने में सक्षम बनाने के लिए बस सभी को छोड़ दें इस पर संबंधित डेटा-एक्सेस और डेटा-जागरूक घटक और लिंक बनाते हैं जैसा कि इस के पिछले अध्यायों में वर्णित है पाठ्यक्रम। डेटा-एक्सेस घटक: डेटा स्रोत, ADOonnection के साथ ADOQuery (ADOTable के बजाय) और एक डेटा-जागरूक घटक जैसे DBGrid हम सभी की आवश्यकता है।
जैसा कि पहले ही समझाया गया है, ऑब्जेक्ट इंस्पेक्टर ने उन घटकों के बीच की कड़ी को निम्नानुसार सेट किया:

DBGrid1.DataSource = DataSource1
DataSource1.DataSet = ADOQuery1
ADOQuery1.Connection = ADOConnection1
// ConnectionString का निर्माण करें
ADOConnection1.ConnectionString = ...
ADOConnection1.oginPrompt = गलत

TADOQuery घटक एक नहीं है तालिका नामसंपत्ति के रूप में संपत्ति करता है। TADOQuery नामक एक संपत्ति (TStrings) है एसक्यूएल जिसका उपयोग SQL स्टेटमेंट को स्टोर करने के लिए किया जाता है। आप डिज़ाइन समय में ऑब्जेक्ट इंस्पेक्टर के साथ या रनटाइम पर कोड के माध्यम से SQL प्रॉपर्टी की वैल्यू सेट कर सकते हैं।

डिज़ाइन-टाइम पर, ऑब्जेक्ट इंस्पेक्टर में ellipsis बटन पर क्लिक करके SQL प्रॉपर्टी के लिए प्रॉपर्टी एडिटर को इनवाइट करें। निम्न एसक्यूएल कथन टाइप करें: "लेखकों से चयन करें"।

SQL कथन को दो प्रकारों में से एक में निष्पादित किया जा सकता है, यह कथन के प्रकार पर निर्भर करता है। डेटा डेफिनिशन लैंग्वेज स्टेटमेंट को आम तौर पर निष्पादित किया जाता है ExecSQL तरीका। उदाहरण के लिए किसी विशिष्ट तालिका से एक विशिष्ट रिकॉर्ड को हटाने के लिए आप एक DELETE DDL कथन लिख सकते हैं और ExecSQL पद्धति से क्वेरी चला सकते हैं।
(साधारण) SQL कथनों को सेट करके निष्पादित किया जाता है TADOQuery। सक्रिय के लिए संपत्ति सच या फोन करकेखुला हुआ विधि (आवश्यक समान)। यह दृष्टिकोण टैडोटेबल घटक के साथ एक टेबल डेटा प्राप्त करने के समान है।

रन-टाइम पर, SQL प्रॉपर्टी में SQL स्टेटमेंट का उपयोग किसी भी स्ट्रिंग ऑब्जेक्ट के रूप में किया जा सकता है:

ADOQuery1 के साथ बंद शुरू; 
SQL.Clear; 
SQL.Add: = 'का चयन करें * लेखकों से' SQL.Add: = 'ORDER BY ऑस्ट्रोरनाम DESC' खोलें; 
समाप्त;

उपर्युक्त कोड, रन-टाइम पर, डेटासेट बंद कर देता है, SQL प्रॉपर्टी में SQL स्ट्रिंग को खाली करता है, एक नया SQL कमांड असाइन करता है और ओपन विधि को कॉल करके डेटासेट सक्रिय करता है।

ध्यान दें कि स्पष्ट रूप से ADOQuery घटक के लिए फ़ील्ड ऑब्जेक्ट की एक निरंतर सूची बनाने से कोई मतलब नहीं है। अगली बार जब आप ओपन विधि को कॉल करते हैं तो एसक्यूएल इतना अलग हो सकता है कि दायर नाम (और प्रकार) का पूरा सेट बदल सकता है। बेशक, यह मामला नहीं है अगर हम खेतों के निरंतर सेट के साथ सिर्फ एक टेबल से पंक्तियों को लाने के लिए ADOQuery का उपयोग कर रहे हैं - और परिणामी सेट SQL कथन के WHERE भाग पर निर्भर करता है।

TADOQuery घटकों के महान गुणों में से एक है पैरामीटर संपत्ति। एक पैरामीटरकृत क्वेरी वह है जो SQL कथन के WHERE क्लॉज में एक पैरामीटर का उपयोग करके लचीली पंक्ति / स्तंभ चयन की अनुमति देता है। परमेस संपत्ति पूर्वनिर्धारित SQL कथन में बदली जाने योग्य मापदंडों की अनुमति देती है। एक पैरामीटर WHERE क्लॉज में मान के लिए एक प्लेसहोल्डर है, जिसे क्वेरी खोलने से ठीक पहले परिभाषित किया गया है। किसी क्वेरी में एक पैरामीटर निर्दिष्ट करने के लिए, एक बृहदान्त्र (:) एक पैरामीटर नाम से पहले का उपयोग करें।
डिज़ाइन-टाइम पर SQL गुण सेट करने के लिए ऑब्जेक्ट इंस्पेक्टर का उपयोग करें:

ADOQuery1.SQL: = 'जहां से आवेदन का चयन करें * टाइप करें: = apptype'

जब आप SQL संपादक विंडो बंद करते हैं तो ऑब्जेक्ट इंस्पेक्टर में ellipsis बटन पर क्लिक करके पैरामीटर विंडो खोलें।

पूर्ववर्ती SQL कथन में पैरामीटर नाम दिया गया हैapptype. हम पैरामीटर टाइम में पैरामीटर के मान को पैरामीटर डायलॉग बॉक्स के माध्यम से डिज़ाइन समय पर सेट कर सकते हैं, लेकिन अधिकांश समय हम रनटाइम पर पैरामीटर बदल रहे होंगे। पैरामीटर्स डायलॉग का उपयोग किसी क्वेरी में उपयोग किए गए मापदंडों के डेटाटाइप्स और डिफ़ॉल्ट मानों को निर्दिष्ट करने के लिए किया जा सकता है।

रन-टाइम पर, मापदंडों को बदला जा सकता है और डेटा को रीफ्रेश करने के लिए क्वेरी को फिर से निष्पादित किया जाता है। पैरामीटर किए गए क्वेरी को निष्पादित करने के लिए, क्वेरी के निष्पादन से पहले प्रत्येक पैरामीटर के लिए एक मूल्य की आपूर्ति करना आवश्यक है। पैरामीटर मान को संशोधित करने के लिए, हम या तो Params संपत्ति या ParamByName विधि का उपयोग करते हैं। उदाहरण के लिए, ऊपर दिए गए SQL स्टेटमेंट के अनुसार, रन-टाइम में हम निम्नलिखित कोड का उपयोग कर सकते हैं:

ADOQuery1 के साथ शुरू करते हैं
बंद करे;
SQL.Clear;
SQL.Add ('चयन करें * आवेदन जहां से =: apptype');
। ParamByName ( 'apptype') मूल्य: = 'मल्टीमीडिया';
खुला हुआ;
समाप्त;

जैसे जब ADOTable घटक के साथ काम कर रहे हैं ADOQuery एक सेट या रिकॉर्ड्स को तालिका (या दो या अधिक) से लौटाता है। किसी डेटासेट के माध्यम से नेविगेट करना "डेटासेट्स में डेटा के पीछे" अध्याय में वर्णित विधियों के समान सेट के साथ किया जाता है।

सामान्य रूप से ADOQuery घटक का उपयोग तब नहीं किया जाना चाहिए जब संपादन होता है। SQL आधारित क्वेरीज़ का उपयोग ज्यादातर रिपोर्टिंग उद्देश्यों के लिए किया जाता है। यदि आपकी क्वेरी परिणाम सेट करती है, तो लौटे डेटासेट को संपादित करना कभी-कभी संभव है। परिणाम सेट में एक एकल तालिका से रिकॉर्ड होना चाहिए और इसमें किसी भी SQL कुल फ़ंक्शन का उपयोग नहीं किया जाना चाहिए। ADOQuery द्वारा लौटाए गए डेटासेट का संपादन ADOTAble के डेटासेट के संपादन के समान है।

कुछ ADOQuery कार्रवाई देखने के लिए हम एक छोटा उदाहरण कोड करेंगे। आइए एक क्वेरी बनाते हैं जिसका उपयोग डेटाबेस में विभिन्न तालिकाओं से पंक्तियों को लाने के लिए किया जा सकता है। एक डेटाबेस में सभी तालिकाओं की सूची दिखाने के लिए हम इसका उपयोग कर सकते हैं GetTableNamesकी विधि ADOConnection घटक। प्रपत्र के OnCreate ईवेंट में GetTableNames तालिका नामों के साथ कॉम्बो बॉक्स को भरता है और बटन का उपयोग क्वेरी को बंद करने और एक चुने हुए टेबल से रिकॉर्ड को पुनः प्राप्त करने के लिए इसे फिर से बनाने के लिए किया जाता है। () ईवेंट हैंडलर की तरह दिखना चाहिए:

प्रक्रिया TForm1.FormCreate (प्रेषक: TObject);
शुरू
ADOConnection1.GetTableNames (ComboBox1.Items);
समाप्त;
प्रक्रिया TForm1.Button1 क्लिक करें (प्रेषक: Tobject);
var tblname: स्ट्रिंग;
शुरू
यदि ComboBox1.ItemIndex तो बाहर निकलें;
tblname: = ComboBox1.Items [ComboBox1.ItemIndex];
ADOQuery1 के साथ शुरू करते हैं
बंद करे;
SQL.Text: = 'SELECT * FROM' + tblname;
खुला हुआ;
समाप्त;
समाप्त;

ध्यान दें कि यह सब कुछ ADOTable और उसके TableName गुण का उपयोग करके किया जा सकता है।