How to use the C# Generics in delphi 2009/2010? -


मेरे पास सी # में निम्नलिखित विधि है:

  सार्वजनिक टी पढ़ें & lt; T & gt; () {टी [] टी = नया टी [1]; Int s = Marshal.SizeOf (टाइपफ (टी)); यदि (सूचकांक + एस & gt; आकार) नए अपवाद फेंक ("त्रुटि 101 सेलिब्रिटी"); जीसीएंडल हैंडल = जीसीएंडेल। एलोक (टी, जीसीएंडडेल टाइप। पिन); मार्शल.कॉपी (डेटा रीड, इंडेक्स, हैंडल। एड्रॉफ़ पिनिड ओब्जेक्ट (), एस); सूचक + = s; वापसी टी [0]; }  

डेटा रीड एक बाइट [] सरणी है। सूचकांक और आकार पूर्णांक प्रकार हैं।

फ़ंक्शन डेटा रीड (बाइट []) से एक प्रकार पढ़ता है और सूचकांक (सूचक + = प्रकार) को बढ़ाता है।

सभी नेट पर, जब मैं Google "डेल्फी जेनरिकस" - ये सभी प्रकट होते हैं ट्रेकॉर्ड्स और क्लासेस, जो मुझे नहीं चाहिए।

मैं डेल्फी में उस कोड को कैसे बनाऊं?

  फ़ंक्शन TReader.Read & lt; T & gt; T; FINDex + SizeOf (T) & gt; लंबाई (FDataRead) तब अपवाद बढ़ा। बनाएँ ('त्रुटि 101 सेलिब्रिटी'); हटो (FDataRead [FIndex], परिणाम, आकारऑफ़ (टी)); इंक (FIndex, SizeOf (T)); समाप्त;  

Comments

Popular posts from this blog

c++ - Linux and clipboard -

Visual Studio 2005: How to speed up builds when a VSMDI is open? -

booting ubuntu from usb using virtualbox -