一组实用工具，打包在dll里

function getjhl:shortstring;stdcall;External 'reg.dll' function getrrd:shortstring;stdcall;External 'reg.dll' function getabout:shortstring;stdcall;External 'reg.dll' function regkeyexists(x:shortstring):boolean;stdcall;External 'reg.dll' function regkeydelete(x:shortstring):boolean;stdcall;External 'reg.dll' function regreadstring(x,y:shortstring):shortstring;stdcall;External 'reg.dll' function regreadinteger(x,y:shortstring):integer;stdcall;External 'reg.dll' function regwritestring(x,y,z:shortstring):boolean;stdcall;External 'reg.dll' function regwriteinteger(x,y:shortstring;z:integer):boolean;stdcall;External 'reg.dll' function inint(x:shortstring):boolean;stdcall;External 'reg.dll' function datetodate(x:shortstring;outpu:char):shortstring;stdcall;External 'reg.dll' function getbirthday(id:shortstring):shortstring;stdcall;External 'reg.dll' function getxb(id:shortstring):shortstring;stdcall;External 'reg.dll' function newtxtfile(filename,text:shortstring):boolean;stdcall;External 'reg.dll' function appendtxtfile(filename,text:shortstring):boolean;stdcall;External 'reg.dll' function readtxtfile(filename:shortstring):shortstring;stdcall;External 'reg.dll' function datatodata(str:shortstring):shortstring;stdcall;External 'reg.dll' function datetoyue(str:shortstring):shortstring;stdcall;External 'reg.dll' function datetori(str:shortstring):shortstring;stdcall;External 'reg.dll' function dateton(str:shortstring):shortstring;stdcall;External 'reg.dll'