[개발/delphi] string to char array 문자열 복사

[개발/delphi] string to char array 문자열 복사

Visual C++ 뿐만 아니라 델파이도...
배열 문자열에 string 문자열을 복사해야할 경우가 생긴다.

StrLCopy () 함수를 사용하여 해결해 보자.

var

  ch: array[0..10] of Char;

  c: Char;

  x: Integer;

  st: string;

begin

  st := 'Testing';

  StrLCopy(PChar(@ch[0]), PChar(st), High(ch)); // or StrPLCopy(ch, st, High(ch));

  x := 100;

  for c in ch do

  begin

    Canvas.TextOut(x, 100, c);

    Inc(c, Canvas.TextWidth(c) + 3);

  end;

end;