संदर्भ द्वारा एक सरणी एक proc में पारित कर दिया पर एक SetLength कर

Question

ज़रूर, यहां तक ​​कि मैं यह कर सकता ...

var 
    testarray : array of string; 

setlength(testarray, 5); 

लेकिन मैं चालाक हो और एक प्रक्रिया है जो में मैं द्वारा सरणी पारित करना चाहते हैं, तो इस तरह का संदर्भ मैं इसे नहीं कर सकता!

procedure DoStuffWithArray(var passedarray : array of string); 
begin 
    setlength(passedarray, 5); 
end; 

कंपाइलर मेरी proc में कोड की एक पंक्ति पर 'असंगत प्रकार' कहता है।

मैं सेट सेट तत्व मानों जैसे सरणी पर अन्य सामान कर सकता हूं यदि मैं proc को कॉल करने से पहले एक सेटलेथेंथ करता हूं, लेकिन मैं अपनी proc में setlength नहीं कर सकता, जो मैं करना चाहता हूं।

किसी भी मदद की बहुत सराहना की, धन्यवाद।

Answer 1

पैरामीटर के रूप में ऐरे प्रकारों का नाम होना आवश्यक है। तो:

type TStringArray = array of string; 
procedure DoStuffWithArray(var passedarray: TStringArray); 

फिर यह काम करेगा।

लेकिन यदि आपको तारों के गतिशील रूप से आकार वाले समूह की आवश्यकता है, तो आपको शायद किसी भी प्रकार का उपयोग करने के लिए एक TStringList आसान लगेगा।