डेल्फी 2010 में विशेषताओं के बारे में अधिक जानें। उदाहरण - डेटा सत्यापन

अपने पिछले लेख में, संक्षेप में डेल्फी 2010 में विशेषताओं पर , मैंने विशेषताओं को बनाने, लागू करने और मतदान करने से जुड़ी मूल बातें दिखाईं। हालाँकि, मैंने इस बात का उदाहरण नहीं दिया कि आप उनका उपयोग क्यों कर सकते हैं।



संभवतः सबसे आम उदाहरण दृढ़ता के लिए है, और वास्तव में किसी ने विंग्स ऑफ विंड वेबसाइट पर एक समान उदाहरण पोस्ट किया है। मैं डेटा सत्यापन (सत्यापन) के लिए उनका अन्य आवेदन दिखाना चाहूंगा।





कृपया ध्यान दें कि नीचे जो दिखाया जाएगा, वह विशेषताओं के उपयोग का एक उदाहरण है, न कि डेटा की जाँच के लिए एक पूर्ण रूपरेखा। इसे अवधारणा की परीक्षा के रूप में सोचें, न कि तैयार कोड के रूप में।



इसलिए, चेतावनियों के समाप्त होने के साथ, इस मामले में मैं मेटाडेटा को जोड़ने में सक्षम होना चाहूंगा जो मेरी कक्षाओं के सत्यापन नियमों को दर्शाता है। हो सकता है कि मैं चाहता हूं कि टीपर्सन वर्ग को सही माना जाए जब नाम एक गैर-रिक्त मान है और आयु मान 18 से 65 तक है। इसे प्राप्त करने का एक तरीका यह है कि इन नियमों को परिभाषित करने वाली विशेषताओं के साथ संबंधित गुण प्रदान करें, और फिर कुछ कोड का उपयोग करें किसी भी स्थानांतरित वस्तु को संसाधित करने और पूर्ण आकार की छवि के लिए प्रत्येक क्लिक की जांच करने के लिए आरटीटीआई । प्रॉपर्टी वैल्यू उनसे जुड़ी विशेषताओं के अनुरूप है।





क्या आपने इसे पकड़ा? महान, अब देखते हैं।



मैंने डेटा सत्यापन के लिए कई विशेषताओं को परिभाषित किया है कि वे कैसे विभिन्न प्रकारों के साथ काम करते हैं। एक छोटा पदानुक्रम बनाया गया है जो सत्यापन कोड को थोड़ा और सामान्य बनाता है। मैंने केवल स्ट्रिंग्स और संख्याओं के लिए विशेषताएँ बनाईं, लेकिन आप इस विचार को समझेंगे।



कक्षाओं में से एक के लिए स्रोत कोड पर एक नज़र डालें:

MinimumIntegerAttribute = class (BaseIntegerValidationAttribute)

private

FMinimumValue: Integer;

public

constructor Create(MinimumValue : Integer; const FailureMessage : string );

function Validate(Value : Integer) : boolean; override ;

end;



कंस्ट्रक्टर में दो पैरामीटर होते हैं, सत्यापन विधि बहुत सरल है (इस मामले में, नियम सरल है)। यह इस तरह दिखता है:

function MinimumIntegerAttribute.Validate(Value: Integer): boolean;

begin

Result := Value >= FMinimumValue;

end;



अब मैंने विशेषताओं को परिभाषित किया है और उनका उपयोग इस तरह कर सकता हूं:

TPerson = class

private

FName: String ;

FAge: Integer;

public

[NonEmptyString( 'Must provide a Name' )]

property Name : String read FName write FName;

[MinimumInteger(18, 'Must be at least 18 years old' )]

[MaximumInteger(65, 'Must be no older than 65 years' )]

property Age : Integer read FAge write FAge;

end;

हां, एक और टीपर्सन । बहुत मूल नहीं है।



जैसा कि आप देख सकते हैं, मैंने NonEmtpyString विशेषता के साथ नाम गुण प्रदान किया, और अमान्य मान के लिए एक त्रुटि संदेश जोड़ा। मैंने न्यूनतम और अधिकतम विशेषताओं के साथ आयु संपत्ति को भी नोट किया। संभवतः अधिक उपयोगी एक सीमा के लिए एक विशेषता को परिभाषित कर रहा है, लेकिन मैं एक ही संपत्ति के लिए दो विशेषताओं के आवेदन को दिखाना चाहता था।



इस उदाहरण के लिए, मैंने एक साधारण फ़ंक्शन बनाया जो एक चेक करता है:

function Validate(Target : TObject; ErrorList : TStrings) : boolean;

var

ctx : TRttiContext;

t : TRttiType;

p : TRttiProperty;

a : TCustomAttribute;

begin

Result := True;



if not Assigned(Target) then

raise Exception.Create( 'Can' 't validate nil object' );



if not Assigned(ErrorList) then

raise Exception.Create( 'Can' 't validate with a nil ErrorList' );



ctx := TRttiContext.Create;

try

t := ctx.GetType(Target.ClassType);

for p in t.GetProperties do

for a in p.GetAttributes do

if a is BaseIntegerValidationAttribute then

begin

if not BaseIntegerValidationAttribute(a).Validate(p.GetValue(Target).AsInteger) then

ErrorList.Add(BaseValidationAttribute(a).FailureMessage);

end

else if a is BaseStringValidationAttribute then

begin

if not BaseStringValidationAttribute(a).Validate(p.GetValue(Target).AsString) then

ErrorList.Add(BaseValidationAttribute(a).FailureMessage);

end

finally

ctx.Free;

end;

end;

पहले मैं यह सुनिश्चित करने के लिए एक जांच करता हूं कि वस्तु का वफादार उदाहरण शून्य नहीं है, और वही त्रुटि सूची के लिए जाता है, जिसमें मैं विभिन्न संदेश डालूंगा।



अगला, प्रत्येक संपत्ति के लिए, मैं सभी विशेषताओं का चयन करूंगा। विशेषता के प्रकार के आधार पर, मैं सत्यापन विधि को लागू करूंगा, मान को मान्य करने के लिए पास कर रहा हूं। यदि मान्य कॉल विफल हुई, तो मैं FailureMessage को ErrorList में जोड़ता हूं ।



आप निश्चित रूप से बेहतर कर सकते हैं। उदाहरण के लिए, मैं इस तथ्य की तरह नहीं हूं कि मुझे प्रत्येक प्रकार की जाँच के लिए वैध विधि को अपडेट करना होगा और सिर्फ टिस्टर्स में आउटपुट त्रुटियां। मान्यकरण की वस्तुओं की एक सूची पेश करने से और अधिक सही होने की संभावना है। हालांकि, 45 मिनट के काम में, मुझे लगता है कि यह विचार का काफी अच्छा वर्णन करता है। आप यहाँ नमूना कोड डाउनलोड कर सकते हैं ।



मुझे आशा है कि यह आपके लिए उपयोगी होगा यदि आप दृढ़ता, डेटा सत्यापन या कुछ और के लिए विशेषताओं का उपयोग करना चाहते हैं।

कई लोगों ने कहा कि उन्होंने गुण में बात नहीं देखी। शायद आपको उनका अध्ययन करना चाहिए और उन्हें थोड़ी देर के लिए छोड़ देना चाहिए ताकि वे आपके सिर में "परिपक्व" हो सकें। वे कहते हैं कि हमारी भाषा हमारे विचारों को आकार देती है, और यह केवल इसलिए हो सकता है क्योंकि डेल्फी ने अतीत में विशेषताओं का समर्थन नहीं किया था, हम एक समाधान की तलाश में उनके बारे में सोचने के अभ्यस्त नहीं हैं। जेनेरिक, अनाम विधियों और उनके साथ इंटरफेस के रूप में, मुझे लगता है कि जितना अधिक मैं उनका अध्ययन करता हूं, उनका उपयोग करने के लिए उतने ही अधिक विचार प्रकट होते हैं।



translated.by/you/more-attributes-in-delphi-2010/into-ru/trans

अनुवाद: © r3code, TDelphiBlog