On Sun, 25 Jul 2010 15:20:49 +0200 Bernd Kreuss <prof7bit at googlemail.com> wrote: > + case LowerCase(LeftStr(TVNode.Text, 7)) of > + 'functio' : CodePos.X += 9; Does that work in fpc 2.4.2? Mattias