TSQLScanner

pt 

BuildKeyWords

pt 

Error

Create

Destroy

OpenFile

FetchToken

IsEndOfLine