摘要：var GPage,GIndex,FGIndex:integer; PageList:array of integer; PageLine: integer; PageMaxRow: integer=28; procedure PageFooter1OnBeforePrint(Sender: TfrxComponent);begin GPage := GPage + 1;end;procedure Page1OnBeforePrint(Sender: TfrxComponent);begin GPage :=1; end;procedure GroupFooter1OnBeforePrint( 阅读全文

摘要：function BytesToStr(const i64Size: Int64): string;const i64GB = 1024 * 1024 * 1024; i64MB = 1024 * 1024; i64KB = 1024;begin if i64Size div i64GB > 0 then Result := Format('%.2f GB ', [i64Size / i64GB]) else if i64Size div i64MB > 0 then Result := Format('%.2f MB ', [i64Size / i 阅读全文

摘要：（1）控件属性设置RecvBufferSize说明（默认值为8192字节）：该属性为整型变量，用于指定连接所用的接受缓冲区大小。这些属性是indyftp里面的。SendBufferSize说明（默认值为32768字节）：该属性也为整型变量，用于指定连接所用的发送缓冲区的最大值。该属性在WriteStream方法中 时，可用于TStream指定要发送内容的块数。如果要发送的内容大于本属性值，则发送内容被分为多个块发送。TransferType说明（默认值为ftBinary）：该属性为TIdFTPTransferType型变量。用于指定传输内容是二进制文件（ftBinary ）还是ASCII文 件 阅读全文

摘要：打印纸的长度尺寸2孔为1英寸，1英寸等于2.54mm，11英寸等于27.94cm(2.54*11)所以6孔的纸尺寸为7.62(2.54*3)附：1英寸＝2.54厘米1厘米＝0.3937008英寸1英尺＝12英寸1英尺＝30.48厘米1英寸＝0.0833333英尺1码 = 91.44厘米 阅读全文

摘要：如何用idftp遍历整个目录----下载、删除_delphi教程 unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection,IdFTPList, IdTCPClient, IdFTP ; type TForm1 = class(TForm) Btt_DownLoadDir: TButton; IdFTP1: TIdFTP; B 阅读全文