?? baobiao.pas
字號:
unit BaoBiao;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, QRCtrls, QuickRpt, ExtCtrls, DB, DBTables, RxMemDS;
type
TBaoBiaoFrm = class(TForm)
BB_Frm: TQuickRep;
PageHeaderBand1: TQRBand;
QRLabel1: TQRLabel;
QRShape17: TQRShape;
DetailBand1: TQRBand;
QRShape13: TQRShape;
QRShape22: TQRShape;
QRShape1: TQRShape;
QRLabel3: TQRLabel;
QRDBText1: TQRDBText;
QRShape2: TQRShape;
QRShape3: TQRShape;
QRShape4: TQRShape;
QRShape5: TQRShape;
QRLabel4: TQRLabel;
QRLabel5: TQRLabel;
QRLabel6: TQRLabel;
QRLabel7: TQRLabel;
QRLabel8: TQRLabel;
QRLabel9: TQRLabel;
QRLabel10: TQRLabel;
QRLabel11: TQRLabel;
QRLabel12: TQRLabel;
QRLabel13: TQRLabel;
QRShape6: TQRShape;
QRShape7: TQRShape;
QRShape8: TQRShape;
QRShape9: TQRShape;
QRMemo2: TQRMemo;
QRMemo3: TQRMemo;
QRMemo4: TQRMemo;
QRMemo6: TQRMemo;
QRShape14: TQRShape;
QRShape18: TQRShape;
QRShape19: TQRShape;
QRShape20: TQRShape;
QRDBText2: TQRDBText;
QRDBText3: TQRDBText;
QRDBText4: TQRDBText;
QRDBText5: TQRDBText;
QRDBText6: TQRDBText;
QRDBText7: TQRDBText;
QRDBText8: TQRDBText;
QRDBText9: TQRDBText;
QRDBText10: TQRDBText;
QRShape16: TQRShape;
QRShape12: TQRShape;
QRDBText11: TQRDBText;
QRDBText12: TQRDBText;
QRLabel15: TQRLabel;
QRDBText15: TQRDBText;
QRDBText16: TQRDBText;
QRDBText17: TQRDBText;
QRDBText19: TQRDBText;
Table1: TTable;
QRShape21: TQRShape;
QRLabel2: TQRLabel;
QRDBText13: TQRDBText;
QRShape23: TQRShape;
QRShape24: TQRShape;
QRShape25: TQRShape;
QRShape26: TQRShape;
QRShape27: TQRShape;
QRShape28: TQRShape;
QRShape29: TQRShape;
QRLabel16: TQRLabel;
QRLabel17: TQRLabel;
QRLabel18: TQRLabel;
QRLabel19: TQRLabel;
QRDBText14: TQRDBText;
QRDBText21: TQRDBText;
QRDBText22: TQRDBText;
QRDBText23: TQRDBText;
QRShape30: TQRShape;
QRShape31: TQRShape;
QRMemo1: TQRMemo;
QRMemo5: TQRMemo;
QRDBText18: TQRDBText;
QRDBText24: TQRDBText;
QRShape32: TQRShape;
QRMemo7: TQRMemo;
QRDBText25: TQRDBText;
QRShape33: TQRShape;
QRLabel20: TQRLabel;
QRDBText26: TQRDBText;
RxMemoryData1: TRxMemoryData;
PageFooterBand1: TQRBand;
QRShape34: TQRShape;
QRLabel14: TQRLabel;
QRSysData1: TQRSysData;
QRShape11: TQRShape;
QRShape15: TQRShape;
procedure FormCreate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;
var
BaoBiaoFrm: TBaoBiaoFrm;
implementation
{$R *.dfm}
procedure TBaoBiaoFrm.FormCreate(Sender: TObject);
begin
// Table1.Active :=True;
end;
procedure TBaoBiaoFrm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Table1.Active := False;
Action := CaFree;
end;
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -