关于ExtractStrings,该怎么解决

关于ExtractStringsTStringList*lstnewTStringListStringstr1TSysCharSetSeparators,WhiteSpaceSepara

关于ExtractStrings
TStringList*   lst   =   new   TStringList;
  String   str1;
TSysCharSet   Separators,WhiteSpace;
  Separators < < '$ ';
ExtractStrings(Separators,WhiteSpace,PAnsiChar(str1),lst);
其中PAnsiChar(str1)出错,该怎么写呢

[解决办法]
ExtractStrings(Separators, WhiteSpace, str1.c_str(), lst);