T ting__ting Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-09 #2 用函数Ord()就可以了 如果你要编写,就看DELPHI的原函数不就得了