- 博客(3)
- 资源 (6)
- 收藏
- 关注
转载 Delphi写的验证身份证号有效性函数
function ValidatePID(const APID: string): string;{内部函数,取身份证号校验位,最后一位,对18位有效}function GetVerifyBit(sIdentityNum: string): Char;var nNum: Integer;begin Result := #0; nNum := StrToInt(sI
2009-09-18 16:32:00
1591
2
原创 dbgrideh快速导出excel
采用BIFF8规发二进制导出写Excel文件的绿色函数,速度爆快. 收藏 //采用BIFF8格式规范二进制流写入XLS文件 function TsycFunctionSet.sycExportDateToExcel(ASender: TDBGrid): Boolean; var arXlsBegin: array[0..5] of Word ; var arXlsEnd: array[0..1]
2009-08-21 14:38:00
1658
2
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人