...

/usr/share/doc/firebird/sample/object_pascal/common/FbCharsets.pas