FastScript + डेल्फी की एक विशेषता

फास्टस्क्रिप्ट का उपयोग करते हुए डेल्फी में एक छोटी परियोजना विकसित करते समय, उन्हें एक गैर-स्पष्ट सुविधा का सामना करना पड़ा।
मुझे आशा है कि किसी ने पाया कि सुविधा उपयोगी होगी और विकास के समय को बचाएगी।

परियोजना में ज़ोसलिब का उपयोग किया गया था, और एक अतिरिक्त परत बनाने के लिए निम्नलिखित निर्माण को लिखा गया था:

type TMyQuery = TZQuery; 

अर्थात्, TMyQuery प्रकार को TZQuery के पर्याय के रूप में घोषित किया गया था, और फिर इस प्रकार की वस्तुओं को कार्यक्रम में बनाया गया था।
सब कुछ तब तक ठीक रहा जब तक कि हम फास्टकैप प्रोजेक्ट के लिए ब्लॉक में कार्यक्षमता के हिस्से को हटाने के लिए बांधना शुरू कर दिया, जो परियोजना को फिर से शुरू किए बिना (और) को बदला जा सकता था।

स्क्रिप्ट के अंदर, डेटाबेस प्रश्नों का उपयोग निहित था।
इसलिए, दस्तावेज़ीकरण के अनुसार, जब स्क्रिप्ट इंजन को इनिशियलाइज़ करना है, तो हमने अपनी क्लास को इसमें जोड़ा:

 TFunctions = class(TfsRTTIModule) private ... public constructor Create(AScript: TfsScript); override; end; constructor TFunctions.Create(AScript: TfsScript); begin inherited Create(AScript); with AScript do begin ... AddClass(TMyQuery ,'TDataSet'); ... end; end; 

स्क्रिप्ट के अंदर हमारे प्रकार के एक वैरिएबल को घोषित करने की कोशिश करने पर, उन्हें एक संदेश मिला:

: 10:4: : 'TMyQuery'

उसी समय, स्क्रिप्ट में आयातित अन्य वर्गों ने चुपचाप काम किया। हाँ, और लाइन पर ही:

  AddClass(TMyQuery ,'TDataSet'); 

न तो संकलन समय पर, न ही चलाने के समय में कोई त्रुटि और चेतावनी थी।
समस्या के लिए खोज करने के कुछ घंटों के परिणामस्वरूप, यह पता चला कि फास्टस्क्रिप्ट बस उन वर्गों को सही ढंग से आयात नहीं कर सकता है जिन्हें किसी अन्य वर्ग के पर्याय के रूप में वर्णित किया गया है।

टाइप विवरण बदलने के बाद:

 type TMyQuery = class(TZQuery); 

(यह है, TMyQuery अब एक पर्याय नहीं है, लेकिन एक TZQuery वंशज है)
सब कुछ जगह में गिर गया।

सॉफ्टवेयर संस्करण: डेल्फी 2010, फास्टस्क्रिप्ट 4. अन्य संस्करणों और संयोजनों में इसका परीक्षण नहीं किया गया है।