Как конвертировать string в массив char?

← →
Arhangel (2002-04-12 13:30) [0]

Мастера подскажите новечку, как в массив символов записать небольшую строку? например:
a:array[1..4] of char;
s:="1234";

← →
yaJohn (2002-04-12 13:33) [1]

Move(s[1],a[1],4);

← →
Виктор Щербаков (2002-04-12 13:33) [2]

a:array[0..3] of char;
s: string;

s := "1234";
StrLCopy(a, PChar(s), 4);

← →
yaJohn (2002-04-12 13:35) [3]

И почему бы не использовать саму string как массив?
s[1]:="X";

← →
troits (2002-04-12 13:35) [4]

a: array[1..5] of char;
StrCopy(a, "1234");