delphi中string轉array of char

   在delphi中如何将string轉成array of char？

   網上的例子說用for循環,一個個将字元指派給char數組;

   系統帶的有個函數的,

function StrLCopy(Dest: PChar; const Source: PChar; MaxLen: Cardinal): PChar;

   source用pchar強轉下,char數組名直接作第一個參數,MaxLen可以用數組長度,取sizeof(數組)不知道是否OK.