AnsiString erzeugen

[Berni68]

Es geht eigentlich um die "Typumwandlung string -> PAnsiChar"
ich habe eine TStringList x brauche die einzelnen Strings aber als AnsiString
was geht wenn man

var
h: AnsiString;

h:= x[i];
record.abc:= PAnsiChar(h);

Jetzt braucht man für jeden Eintrag in x ein h, also möchte ich ein AnsiString erzeugen.

Ich hoffe ich habe mich einigermassen verständlich ausgedrückt. Allerdings sieht man wohl dass mir hier noch das Verständnis fehlt.