Q&A

  • SetLength 사용시 문의 사항입니다. 도와주세여..
strTmp: String;
str : array of String; 라 할때

SetLength(str,1) 이라 할때

str[0] := strTmp;


strTmp가 255자가 넘으면 error가 나오거든여 어떻게 처리 해야 하는지??

SetLength(var S; NewLength: Integer);

S가 short-string 이라서 나는것 같기도 한데??? 어떻게 처리를 하면 좋나여 도와 주세여.
1  COMMENTS
  • Profile
    최용일 2004.04.29 02:21
    안녕하세요. 최용일입니다.

    흠... 별로 이상없는 코드인데...

    아마도 어디에서인가 Long String사용하는 옵션이 꺼져 있을거 같네요...

    꼭 이 옵션을 꺼야 한다면 아래와 같이 필요할 때만 다시 켜주시구요...

    {$H+}
    var
        Str: string;
        StrArray: array of string;
        Index: Integer;
        Src: string;
    begin
        Src := '0123456789ABCDEF';
        for Index := 0 to 17 do
            Str := Str + Src;
        SetLength(StrArray, 1);
        StrArray[0] := Str;
        ShowMessage(StrArray[0]+#13#10 + IntToStr(Length(StrArray[0])));
    end;
    {$H-}

    그렇지 않으면... 프로그램 소스에서 $H(=$LONGSTRINGS)옵션을 끄는 부분을 찾아서 지우시고, 델파이 메뉴의 Project/Options의 Compiler탭에서 Huge Strings를 체크하시고 사용하세요...

    ^^ 항상 즐코하세요...