डेल्फी # 4 में क्रॉस-प्लेटफ़ॉर्म मोबाइल एप्लिकेशन डेवलपमेंट

भाग # 1
भाग # 2
भाग # ३

इस श्रृंखला के चौथे भाग में, हम "डेस्कटॉप" एप्लिकेशन के विकास में वापस आएंगे और ऑब्जेक्ट बाइंडिंग लाइवबाइंडिंग की तकनीक को और अधिक विस्तार से समझने का प्रयास करेंगे। यह तंत्र सार्वभौमिक और मोबाइल और डेस्कटॉप दोनों अनुप्रयोगों के लिए उपयुक्त है। इसके अलावा, यह तंत्र VCL में भी काम करता है। LiveBinding के साथ परिचित एक क्लासिक परियोजना में शुरू करने के लिए सबसे अच्छा है।

सबसे पहले, हमें एक ही प्रकार के कई कार्य करने होंगे, जिस पर काम करना नियमित लग सकता है। यह संपादन सूचियों के लिए प्रपत्र बनाने के बारे में है, अर्थात्, माप की इकाइयों की सूची और उत्पादों की सूची। इन रूपों को मुख्य फॉर्म मेनू से बुलाया जाएगा, जिसे हमें भी बनाना होगा।

इसलिए, हम डेटा मॉड्यूल में दो TFDTable घटक रखेंगे और उन्हें tblUnit और tblFoodstuff टेबल (tblRecipe टेबल के साथ काम करने के लिए डेटासेट के समान) के साथ काम करने के लिए कॉन्फ़िगर करें। फ़ील्ड संपादक को खोलने के लिए घटक पर डबल-क्लिक करें, सभी फ़ील्ड (संदर्भ मेनू आइटम सभी फ़ील्ड जोड़ें) जोड़ें।

यह समझना महत्वपूर्ण है कि लगभग सभी कार्यान्वयन में, डेटासेट घटक TDataSet वर्ग से विरासत में मिले हैं और कुछ सेट फ़ील्ड के साथ काम करते हैं। यह वर्गों के उदाहरणों को संदर्भित करता है, TField वंशज (TtetegerField, TStringField, आदि)। फ़ील्ड का एक सेट डिज़ाइन-टाइम (डिज़ाइन-टाइम) में बनाया जा सकता है और "ऑब्जेक्ट इंस्पेक्टर" का उपयोग करके फ़ील्ड के गुणों को सेट कर सकता है। यदि हम तालिका के भौतिक क्षेत्रों के अनुरूप TFDTable पर विचार करते हैं, तो आप अन्य प्रकार के फ़ील्ड बना सकते हैं, उदाहरण के लिए, एक संगणित (Caclulated) या प्रतिस्थापित (LookUp) फ़ील्ड। इन क्षेत्रों के मूल्यों की गणना कार्यक्रम के दौरान गतिशील रूप से की जाएगी, और डेटा स्रोत से नहीं ली जाएगी। नीचे हम ऐसे क्षेत्र बनाने का एक उदाहरण पर विचार करेंगे।

उसी स्थिति में, यदि फ़ील्ड सेट डिज़ाइन मोड में नहीं बनाया गया है, जब आप प्रोग्राम ऑपरेशन के दौरान डेटा सेट खोलते हैं, तो फ़ील्ड सेट स्वचालित रूप से बनाया जाएगा।

नीचे यूडीएम.एफडीएम डेटा मॉड्यूल फॉर्म फाइल का एक टुकड़ा है जिसमें एक डेटा सेट और उनसे जुड़े क्षेत्रों का विवरण है। फॉर्म के संदर्भ मेनू में "टेक्स्ट के रूप में देखें" का चयन करके फॉर्म का एक पाठात्मक प्रतिनिधित्व प्राप्त किया जा सकता है। सामान्य फ़ॉर्म सबमिशन मोड पर लौटने के लिए, "फॉर्म के रूप में देखें" पर क्लिक करें।

object FDTUnits: TFDTable IndexFieldNames = 'Id' Connection = FDConnection1 UpdateOptions.UpdateTableName = 'tblUnit' TableName = 'tblUnit' Left = 112 Top = 208 object FDTUnitsId: TFDAutoIncField FieldName = 'Id' Origin = 'Id' ProviderFlags = [pfInWhere, pfInKey] ReadOnly = True end object FDTUnitsUnitName: TStringField FieldName = 'UnitName' Origin = 'UnitName' Required = True Size = 25 end object FDTUnitsAbbr: TStringField FieldName = 'Abbr' Origin = 'Abbr' Required = True Size = 7 end end 

प्रोग्राम शुरू होने पर बनाए गए डेटा सेट को खोला जाना चाहिए। हम ConnectToDB प्रक्रिया को निम्नानुसार संशोधित करते हैं:

 function TDM.ConnectToDB: Boolean; begin try FDConnection1.Connected := True; FDTRecipe.Open; FDTUnits.Open; FDTFoodstuff.Open; except end; Result := FDConnection1.Connected; end; 

अनुप्रयोग के विकास में अगला कदम माप की इकाइयों की तालिका (सूची) को प्रदर्शित करने और संपादित करने के लिए एक नए रूप का निर्माण होगा। स्वाभाविक रूप से, यह एक एफएम एचडी प्रारूप होगा। स्थिति गुण का मान poMainFormCenter के रूप में सेट करें, ताकि यह फ़ॉर्म मुख्य रूप के बीच में प्रदर्शित हो।

कार्यान्वयन अनुभाग में उपयोग किए गए मॉड्यूल की सूची में डेटा मॉड्यूल जोड़ें:

 implementation {$R *.fmx} uses uDM; 

प्रपत्र पर TGrid, TPanel घटक रखें। पैनल में, बटन, इनपुट फ़ील्ड और टीलाबेल लेबल रखें, जैसा कि चित्र में दिखाया गया है। बटन का एकमात्र उद्देश्य फॉर्म को बंद करना है। ModalResult गुण mrOk पर सेट है।

हम स्पष्टता के कारणों के लिए डिफ़ॉल्ट रूप से दृश्य घटकों के नामों को बनाए रखते हैं। काम करने वाली परियोजनाओं में, निश्चित रूप से, उनका नाम बदलना बेहतर है।



LiveBinding एडिटर का उपयोग करते हुए , हम दृश्य घटकों को डेटा स्रोतों के साथ जोड़ते हैं। अपने सबसे सामान्य शब्दों में, लाइवबाइंडिंग एक ऐसा तंत्र है जो आपको विभिन्न वस्तुओं के गुणों को बांधने की अनुमति देता है, लेकिन एक कड़ी लिंक संकलित लिंक का उपयोग करके नहीं, बल्कि लचीले भावों के आधार पर। LiveBindings तंत्र प्रेक्षक पैटर्न पर आधारित है। इसलिए, LiveBinding का उपयोग करते हुए ऑब्जेक्ट A की कुछ संपत्ति में बदलाव, वस्तु B की संपत्ति में बदलाव का कारण बन सकता है। वस्तुओं के बीच संबंध अप्रत्यक्ष और द्विदिश हो सकते हैं। डेटा सेट से डेटा प्रदर्शित करने के लिए यह दृष्टिकोण बहुत सुविधाजनक है। वास्तव में, जब वीसीएल मानक दृष्टिकोण को टेबल से डेटा प्रदर्शित करने के लिए विशेष डीबी-उन्मुख (डीबी-एवेयर) दृश्य घटकों की आवश्यकता होती है, तो लाइवबाइंडिंग आपको इस उद्देश्य के लिए सबसे सामान्य नियंत्रण ("नियंत्रण") का उपयोग करने की अनुमति देता है। इसके अलावा, दृश्य घटकों को लाइवबिन्डिंग के साथ काम करने के लिए विशेष तैयारी की आवश्यकता नहीं होती है। इस दृष्टिकोण का लाभ स्पष्ट है। आइए इस प्रक्रिया को थोड़ा और ध्यान से अधिक विस्तार से देखें।

इसलिए, लाइवबाइंडिंग डिज़ाइनर खोलें और डेटासेट, FDTUnits के अनुरूप तत्व ढूंढें। यदि डेटा मॉड्यूल से तत्व लाइवबाइंडिंग डिज़ाइनर में प्रदर्शित नहीं होते हैं, तो एक अपडेट किया जाना चाहिए (संदर्भ मेनू में ताज़ा डिज़ाइनर आइटम का चयन करें)। आइए डेटा सेट में UnitName फ़ील्ड के मान के साथ Edit1 इनपुट फ़ील्ड के पाठ गुण के मूल्य को जोड़ने का प्रयास करें। हम सामान्य ड्रैग एंड ड्रॉप (ड्रैग-एन-ड्रॉप) का उपयोग करते हैं।



वास्तव में क्या हुआ?

इस तथ्य के अलावा कि डिजाइनर ने कनेक्शन को प्रदर्शित किया, फॉर्म पर दो नए गैर-दृश्य घटक दिखाई दिए। डेटासेट प्रॉपर्टी का उपयोग करते हुए TBindSourceDB घटक, मूल डेटा सेट (हमारे मामले में, DM.FDTUnits) के साथ संचार करता है। ध्यान दें कि जैसे ही दृश्य घटक और फ़ील्ड की संपत्ति के बीच संबंध स्थापित किया गया था, लाइवबाइंडिंग डिज़ाइनर में, DM.FDTUnits ऑब्जेक्ट को नए BindSourceDB1 ऑब्जेक्ट में नेस्टेड किया गया था, और यह ऑब्जेक्ट फॉर्म पर दिखाई दिया।



यह अनुमान लगाना आसान है कि इस ऑब्जेक्ट में DataSet संपत्ति का क्या मूल्य होगा। जो लोग "क्लासिक वीसीएल विकास" के संदर्भ में सोचते हैं, उनके लिए TBindSourceDB को किसी प्रकार के TDataSource एनालॉग के रूप में समझना सबसे आसान है। आप केवल इस घटक को फ़ॉर्म पर फेंक सकते हैं और डेटासेट गुण का मान निर्दिष्ट कर सकते हैं। और फिर इसे "संलग्न" नियंत्रण। केवल अब यह एक विशेष डीबी-नियंत्रण नहीं होगा, बल्कि कोई भी दृश्य घटक होगा। और, इसलिए, आपको यह निर्दिष्ट करना होगा कि घटक की कौन सी संपत्ति है और इसे डेटा सेट से डेटा (और संभवतः संशोधित) कैसे प्रदर्शित करना चाहिए। आइए देखें कि यह कैसे करना है।

BindSourceDB1 के अलावा, फॉर्म पर एक और ऑब्जेक्ट दिखाई दिया - BindingsList1। यह वस्तुओं के बीच सभी कनेक्शनों के लिए एक भंडार है। ये कनेक्शन विभिन्न प्रकार के हो सकते हैं। जैसा कि आप आंकड़े से देख सकते हैं, हमारे मामले में टिंडकॉन्ट्रोलटोफिल्ड का एक लिंक बिंदिंगलिस्ट में जोड़ा गया था।



आप इसके गुणों को संपादित कर सकते हैं, उदाहरण के लिए, कनेक्शन को यूनिडायरेक्शनल नहीं, बल्कि यूनिडायरेक्शनल।



यदि आप एक नया कनेक्शन जोड़ने का प्रयास करते हैं, तो आप देखेंगे कि कुछ अलग प्रकार के कनेक्शन हैं जो व्यावहारिक रूप से आपको "सब कुछ के साथ सब कुछ" जोड़ने की अनुमति देते हैं।



अब हम ग्रिड और BindNavigator को एक डेटा सेट के साथ जोड़ेंगे। BindNavigator घटक के लिए, बस DataSource गुण सेट करें। हालाँकि, BindingsList1 लिंक सूची में कोई नया लिंक नहीं बनाया गया है। लेकिन जब ग्रिड को बांधते हैं , तो इसके विपरीत, प्रकार की एक वस्तु TLinkGridToDataSourceBindSourceDB बनाई जाती है ।



ऑब्जेक्ट इंस्पेक्टर में हम खेतों की सूची को संपादित कर सकते हैं। ऐसा करने के लिए, कॉलम संपत्ति को कॉल करें और फ़ील्ड संपादक में, सभी फ़ील्ड जोड़ें बटन पर क्लिक करें। वैसे, यह संपादक TDBGrid में क्षेत्र संपादक के समान है। प्रत्येक फ़ील्ड के लिए, आप गुणों को संपादित कर सकते हैं, विशेष रूप से फ़ील्ड की चौड़ाई और शीर्षक पाठ। इसके अलावा, आप एक नया फ़ील्ड बना सकते हैं, और तालिका कॉलम में प्रदर्शित करने के लिए अभिव्यक्ति (CustomFormat संपत्ति) सेट कर सकते हैं। तो आईडी और संक्षिप्त नाम के संयोजन को प्रदर्शित करने के लिए, हम इस अभिव्यक्ति को निर्दिष्ट कर सकते हैं:

 DataSet.FieldByName('Id').AsString +" - "+DataSet.FieldByName('Abbr').AsString 

ऊपर से निम्नानुसार, LiveBinding तंत्र डेटा प्रदर्शित करने के लिए पर्याप्त अवसर प्रदान करता है। लाइवबाइंडिंग डिजाइनर, बदले में, आपको दृश्य घटकों को डेटा स्रोत से जोड़ने की प्रक्रिया को कल्पना और सरल बनाने की अनुमति देता है।
अंत में, LiveBinding के साथ काम करने की एक और चाल पर विचार करें। डिज़ाइनर में, DM तत्व के Abbr फ़ील्ड को सक्रिय करें। FDTUnits और संदर्भ मेनू में नए नियंत्रण के लिए लिंक का चयन करें ...। दिखाई देने वाली सूची में, TEdit चुनें।



"ओके" बटन पर क्लिक करें और नया टीईडिट कंट्रोल और टीएलबेल लेबल "सरेस से जोड़ा हुआ" इसे फॉर्म पर रखा जाएगा। आपको बस इस ऑब्जेक्ट को वांछित स्थिति में रखना है और लेबल की टेक्स्ट प्रॉपर्टी का वांछित मान सेट करना है।



हम मेनू का उपयोग करके मुख्य फ़ॉर्म से सूची संपादन रूपों की कॉल को व्यवस्थित करते हैं। मुख्य रूप पर, TMainMenu घटक रखें। मेनू संपादक खोलने के लिए डबल-क्लिक करें। और कुछ बिंदु बनाएं, जैसा कि आंकड़े में दिखाया गया है।



मेनू आइटम "माप की इकाइयां" के लिए, हम निम्नलिखित ऑनक्लिक इवेंट हैंडलर को परिभाषित करते हैं:

 procedure TfMain.aSprUnitExecute(Sender: TObject); begin fSprUnits.ShowModal; end; 

स्वाभाविक रूप से, सूची प्रपत्र के साथ एक मॉड्यूल मुख्य रूप से जुड़ा होना चाहिए।

 implementation {$R *.fmx} uses uAddRecipe, uSprUnit; 

आप सादृश्य द्वारा उत्पादों की प्रपत्र-सूची बना सकते हैं।

श्रृंखला के इस भाग में, हमने लाइवबाइंडिंग तंत्र, इसके उद्देश्य और इसके कार्य करने के तरीके पर अधिक विस्तार से देखा। इसके अलावा हम कार्यक्रम की कार्यक्षमता के कार्यान्वयन को जारी रखेंगे।

अगले शुक्रवार तक!