डेल्फी पुनर्वितरण की स्ट्रिंग टेबल संसाधन आईडी कैसे प्राप्त करें?

Question

डेल्फी में आप मॉड्यूल के संसाधन खंड की स्ट्रिंग तालिका में संग्रहीत तारों की घोषणा कर सकते हैं।

resourcestring 
    rsExample = 'Example'; 

संकलन समय में, डेल्फी यह और स्ट्रिंग तालिका में यह स्टोर के लिए एक आईडी प्रदान करती है जाएगा।

क्या एक स्ट्रिंग के रूप में घोषित स्ट्रिंग की आईडी पुनर्प्राप्त करने का कोई तरीका है?

कारण यह है कि मैं एक पैकेज का उपयोग करता हूं जो gnugettext की तरह काम करता है। System.pas (जैसे LoadResString) में कुछ फ़ंक्शंस झुकाए जाते हैं, इसलिए जब मैं अभिव्यक्ति में पुनर्वितरण का उपयोग करता हूं, तो इसे एक अलग स्ट्रिंग (अनुवाद) द्वारा प्रतिस्थापित किया जाएगा। बेशक, यह बहुत आसान है, लेकिन कभी-कभी मुझे पुनर्वितरण के मूल (अप्रतिबंधित) पाठ की आवश्यकता होती है।

जब मैं स्ट्रिंग के संसाधन आईडी को पुनर्प्राप्त करने में सक्षम हूं, तो मैं अनुवादित पाठ के बजाय मूल पाठ प्राप्त करने के लिए लोडस्ट्रिंग API को कॉल कर सकता हूं।

Answer 1

पुनर्विक्रेता की संसाधन आईडी प्राप्त करने के लिए, आप स्ट्रिंग का पता PResStringRec प्रकार पर डाल सकते हैं और फिर Identifier मान तक पहुंच सकते हैं।

इस नमूने का प्रयास करें

{$APPTYPE CONSOLE} 

{$R *.res} 

uses 
    System.SysUtils; 

resourcestring 
    rsExample = 'Example'; 
begin 
    try 
    Writeln(rsExample); 
    Writeln(PResStringRec(@rsExample)^.Identifier); 
    except 
    on E: Exception do 
     Writeln(E.ClassName, ': ', E.Message); 
    end; 
    readln; 
end.