In glPrint procedure (writer.pas) when you use glCallLists, cast the string to PChar.
Code:
glCallLists(length(text),GL_UNSIGNED_BYTE,Pchar(text));