Delphi의 문자 및 문자열[4] - 문자열, 문자 포인터 및 문자열 배열

1287 단어 Delphi

//    < >     
var
  arr: array[0..5] of Char;
  str: string;
begin
  {                ;      }
  arr := 'Delphi';
  ShowMessage(arr); {Delphi}

  {                }
  str := arr;
  ShowMessage(str); {Delphi}

  {                  ,        ,           1}
  ShowMessage(str[1]); {D}
  ShowMessage(arr[0]); {D}

  {                 }
  //arr := str;     {  ;           ,          }
end;

 

//     >     
var
  arr: array[0..6] of Char;
  p: PChar;
begin
  arr := 'Delphi';
  
  {              ,      ,            (#0)  }
  {            #0     }
  arr[Length(arr)-1] := #0;
  p := arr;
  ShowMessage(p); {Delphi}

  {    #0        ?}
  arr[3] := #0;
  p := arr;
  ShowMessage(p); {Del;     }
end;

 

//문자열 상수 > 문자열 배열 상수

const
  arr1: array[0..5] of Char = 'Delphi';
  arr2: array[0..5] of AnsiChar = AnsiString('Delphi');
begin
  ShowMessage(arr1[0]); {D}
  ShowMessage(arr2[0]); {D}
end;

 

좋은 웹페이지 즐겨찾기