该文被密码保护。 阅读全文
摘要:
function ExportToWord(StrList: TStrings; SavePath: string): Boolean; var WordApp: TWordApplication; WordDoc: TWordDocume... 阅读全文
摘要:
function GetNumSumFromStr(Str: string): Integer; function IsNumber(SoureChar: Char): Boolean; begin Result... 阅读全文