function NextSQLToken(var p: PChar; out Token: String; CurSection: TSQLToken): TSQLToken; overload;

TSQLToken NextSQLToken(const char * p, AnsiString Token, TSQLToken CurSection);