摘要：
function Post(AURL: string; ASource: TIdStrings): string; overload; function Post(AURL: string; ASource: TStream): string; overload; function Post(AURL: string; ASource: TIdMultiPartFormDataStream): string; overload; procedure Post(AURL: string; ASource: TIdMultiPartFormDataStream; AResponseConte... 阅读全文
摘要：
VclZip用法详 转载Vclzip控件主要的类为TVclUnZip 和TVclZip 其中，TVclZip继承自TVclUnZip。function Zip(ZipMode,PackSize:Integer;ZipFile,UnzipDir:String):Boolean; //压缩或解压缩文件var ziper:TVCLZip;begin//函数用法：Zip(压缩模式，压缩包大小，压缩文件，解压目录)//ZipMode为0：压缩；为1：解压缩 PackSize为0则不分包；否则为分包的大小tryif copy(UnzipDir, length(UnzipDir), 1) = '\& 阅读全文