I don't know if it can help:
http://www.freepascal.org/docs-html/...x122-1210003.4