वर्ग घोषणा में एक प्रकार पैरामीटर बाधा के रूप में ही वर्ग का उपयोग करना

Question

मैं डेल्फी XE8 में एक वर्ग के निम्नलिखित घोषणा की है:

TestClass = class; 
TestClass = class 
    function test<T: TestClass>(supplier: TFunc<T>): T; // Compiler error 
end; 

निम्नलिखित में से कौन संकलक त्रुटि फेंकता है:

E2086 Type 'TestClass' is not yet completely defined 

जब मैं जोड़ने मिश्रण के लिए एक और वर्ग और इसके बजाय एक बाधा के रूप में उपयोग करें, यह ठीक काम करता है:

AnotherTestClass = class 
end; 

TestClass = class; 
TestClass = class 
    function test<T: AnotherTestClass>(supplier: TFunc<T>): T; // No Error 
end; 

मुझे निलंबित समस्या यह है कि आगे की घोषणा घोषणा डेल्फी को प्रकार के बारे में अभी तक पर्याप्त नहीं बताती है।

TestClass = class; 
AnotherTestClass = class (TestClass) // Compiler Error 
end; 
TestClass = class 
    function test<T: AnotherTestClass>(supplier: TFunc<T>): T; 
end; 

मैं कुछ गलत कर रहा हूँ और यदि नहीं, वहाँ इस समस्या को हल एक तरीका है: यह शायद और अधिक स्पष्ट के बाद से निम्नलिखित समस्या को हल करने का प्रयास एक अलग लाइन पर बहुत ही संकलक त्रुटि फेंकता है?

Answer 1

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

ध्यान दें कि .net तुम क्या करने कोशिश कर रहे हैं में पूरी तरह से संभव है:

class MyClass 
{ 
    private static T test<T>(Func<T> arg) where T : MyClass 
    { 
     return null; 
    } 
} 

डेल्फी जेनरिक सुविधा .net जेनरिक के आधार पर किया गया था और मैं नहीं बल्कि संदेह है कि समस्या आप का सामना करना एक निरीक्षण करने के लिए नीचे है डेल्फी डेवलपर्स के हिस्से पर।

आपको एक बग रिपोर्ट/सुविधा अनुरोध सबमिट करना चाहिए।

अद्यतन 1

LU आरडी एक बेहतर समाधान का पता चलता है। एक वर्ग सहायक का उपयोग करें:

type 
    TestClass = class 
    end; 

    TestClassHelper = class helper for TestClass 
    function test<T: TestClass>(supplier: TFunc<T>): T; 
    end; 

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

अद्यतन 2

बग रिपोर्ट: RSP-13348