u_cncode.pas

来自「这是一个用条码录入的数据的进销存(只对成品）---做童装的」· PAS 代码 · 共 18 行

unit U_Cncode;

{
 GB2312/BIG5 convert unit for Delphi 3,4,5,6,7
 ver 1.01
 By Tom Lee  1997/9/5
 E-Mail Address : [e-mail]
 It is Freeware !
}

interface
uses SysUtils;

function GBtoBIG5(value: string): string; //虏锣羉
function BIG5toGB(value: string): string; //羉锣虏
function isGB(value: string): Boolean; //  IS 虏砰
function isBIG5(value: string): Boolean; //  IS 羉砰
 //