डेल्फी 'स्ट्रिंग' अक्षर 255 से अधिक कैसे हो सकता है?

Question

im डेल्फी 7 पर काम कर रहा है और मैं एक तार पर काम कर रहा था, मैं डिफ़ॉल्ट लंबाई के एक स्ट्रिंग के लिए यह

में आए, वह है, घोषित बस स्ट्रिंग के रूप में, अधिकतम आकार हमेशा 255 एक ShortString है 255 से अधिक वर्णों में कभी बढ़ने की अनुमति नहीं है।

delphi strings

एक बार मैं अपने डेल्फी कोड में इस तरह कुछ करने के लिए (जो एक बहुत बड़ा प्रश्न के लिए था)

var 
    sMyStringOF256characters : string; 
    ilength : integer; 
    begin 
     sMyStringOF256characters:='ThisStringisofLength256,ThisStringisofLength256,.....' 
     //length of sMyStringOF256characters is 256 
    end; 

मैं इस त्रुटि मिलती थी पर

[त्रुटि] u_home.pas (38): स्ट्रिंग अक्षर में अधिकतम 255 तत्व हो सकते हैं।

लेकिन जब मैं इस

var 
     iCounter    : integer; 
     myExtremlyLongString : string; 
    begin 
     myExtremlyLongString:=''; 
     Label1.Caption:=''; 
     for iCounter:=0 to 2500 do 
     begin 
      myExtremlyLongString:=myExtremlyLongString+inttostr(iCounter); 
      Label1.Caption:=myExtremlyLongString; 
     end; 
     Label2.Caption:=inttostr(length(myExtremlyLongString)); 
    end; 

कोशिश करते हैं और परिणाम

है आप देख सकते हैं myExtremlyLongString की लंबाई वर्ण है।

डेल्फी ने कोई त्रुटि क्यों नहीं दी कि लंबाई myExtremlyLongString के लिए 255 से अधिक है?

संपादित मैं

SetLength(sMyStringOF256characters,300); 

थे, लेकिन यह does not काम।

Answer 1

डेल्फी ने कोई त्रुटि क्यों नहीं दी कि लंबाई myExtremlyLongString के लिए 255 से अधिक है?

आप अनुभाग लांग स्ट्रिंग (AnsiString) में अपना जवाब एक सा पाठ में नीचे है।

डेल्फी के वर्तमान संस्करण में, स्ट्रिंग प्रकार बस AnsiString के लिए उपनाम,

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

sMyString:='ThisStringisofLength255'+'ThisStringisofLength255'; 

Answer 2

अंतर यह है कि आपके पहले कोड उदाहरण में आप स्ट्रिंग को अपने कोड - शाब्दिक स्ट्रिंग के हिस्से के रूप में डाल रहे हैं। इस पर एक सीमा है कि यह कितने पात्रों की अनुमति देगा।

अपने दूसरे कोड उदाहरण में आप इसे गतिशील रूप से उत्पन्न कर रहे हैं और इसे एक बड़ी शाब्दिक स्ट्रिंग के रूप में नहीं डाल रहे हैं।

डेल्फी में स्ट्रिंग प्रकार (शॉर्टस्ट्रिंग के विपरीत जो केवल 255 तक हो सकता है) आपकी स्मृति जितनी बड़ी हो सकती है।

Answer 3

यह विभाजन अप में:

sMyStringOF256characters := 
    'ThisStringis' + 
    'ofLength256' + 
    'And ManyManyManyManyManyManyManyManyManyManyManyManyMany' + 
    'ManyManyManyManyManyManyManyManyManyManyManyManyMany' + 
    'ManyManyManyManyManyManyManyManyManyManyManyManyMany' + 
    'ManyManyManyManyManyManyManyManyManyManyManyManyMany' + 
    'ManyManyManyManyManyManyManyManyManyManyManyManyMany' + 
    'ManyManyManyManyManyManyManyManyManyManyManyManyMany' + 
    'ManyManyManyManyManyManyManyManyManyManyManyManyMany' + 
    'ManyManyManyManyManyManyManyManyManyManyManyManyMany' + 
    'CharactersCharactersCharactersCharactersCharactersCharactersCharactersCharacters'; 

Answer 4

वर्ष DOS/टर्बो पास्कल दिनों में वापस, "तार" वास्तव में 255 वर्णों तक सीमित थे। बड़े हिस्से में क्योंकि 1 बाइट में स्ट्रिंग लम्बाई होती है, और बाइट के पास केवल 0 और 255 के बीच एक मान हो सकता है।

अब डेल्फी के समकालीन संस्करणों में कोई समस्या नहीं है।

"शॉर्टस्ट्रिंग" पुराने डॉस/पास्कल स्ट्रिंग प्रकार का प्रकार है।

"लॉन्गस्ट्रिंग" लंबे समय तक डिफ़ॉल्ट स्ट्रिंग प्रकार रहा है (बोरलैंड डेल्फी 2006 मैं वर्तमान में अधिकांश उत्पादन कार्य के लिए उपयोग करता हूं)। LongStrings (उर्फ "AnsiStrings") 8-बिट अक्षर पकड़ो, और केवल उपलब्ध स्मृति द्वारा ही सीमित हैं।

डेल्फी के हाल के संस्करण (डेल्फी 200 9 और उच्चतर, नई डेल्फी एक्सई 2 समेत) अब सभी बहु-बाइट यूनिकोड "वाइडस्ट्रिंग" तारों के लिए डिफ़ॉल्ट हैं। AnsiStrings की तरह वाइडस्ट्रिंग, अधिकतम लंबाई में प्रभावी रूप से "असीमित" भी हैं।

यह लेख और अधिक विस्तार से बताते हैं:

http://delphi.about.com/od/beginners/l/aa071800a.htm

Answer 5

आप डेल्फी में वास्तव में लंबी स्ट्रिंग की जरूरत है, तो आप एक txt फाइल या किसी भी विस्तार के साथ सिर्फ सादा पाठ जैसे अन्य संसाधनों से इसे लोड कर सकते हैं। मैं इसका उपयोग कर रहा हूँ और यह काम करता है। आप सादे पाठ लाइन संख्याओं का उपयोग करके "ए" सारणी सारणी बना सकते हैं। डेल्फी कोड में, आप @arjen van der Spek के रूप में कर सकते हैं और अन्य केवल कहते हैं।

मेरे लिए, वर के रूप में पाठ के साथ फ़ाइलों को स्वरूपित -

sometext:string=
'txt...'+
'txt...'+
'txt...';

भविष्य संपादन के लिए बुरा कर रहे हैं।

पेशेवर: आप किसी भी लंबे पाठ का उपयोग कर सकते हैं।

विपक्ष: पाठ कोड खुला है, किसी को भी यह नोटपैड आदि

Answer 6

आप StringBuilder वर्ग का उपयोग कर की कोशिश कर सकते में फ़ाइल खोलने पढ़ सकते हैं:

procedure TestStringBuilder; 
var 
    I: Integer; 
    StringBuilder: TStringBuilder; 
begin 
    StringBuilder := TStringBuilder.Create; 
    try 
     for I := 1 to 10 do 
     begin 
      StringBuilder.Append('a string '); 
      StringBuilder.Append(66); //add an integer 
      StringBuilder.Append(sLineBreak); //add new line 
     end; 

     OutputWriteLine('Final string builder length: ' + IntToStr(StringBuilder.Length)); 
    finally 
     StringBuilder.Free; 
    end; 
end;