`TPSPascalParser`
pt		GetCol
		Next
		SetText

CT Web help

CodeTyphon Studio