Validando comandos SQL

Alguem sabe como validar comandos sql existe agora no Delphi XE expressao regular... mais na classe
DBCommon
algumas funcoes mais nao consegui muita coisa

function NextSQLToken(var p: PAnsiChar; out Token: AnsiString; CurSection: TSQLToken): TSQLToken; overload;

alguem ja usou ? pra algo do fim....