?? unit2.pas
字號:
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, QuickRpt, QRCtrls, DB, DBTables, QRExport;
type
TForm2 = class(TForm)
QuickRep1: TQuickRep;
PageFooterBand1: TQRBand;
TitleBand1: TQRBand;
ColumnHeaderBand1: TQRBand;
QRLabel1: TQRLabel;
QRLabel2: TQRLabel;
QRLabel3: TQRLabel;
QRLabel4: TQRLabel;
QRLabel5: TQRLabel;
QRShape4: TQRShape;
QRShape5: TQRShape;
QRShape6: TQRShape;
QRExpr2: TQRExpr;
ReportDatabase: TDatabase;
QueryEmployee: TQuery;
QueryEmployeeEMP_NO: TSmallintField;
QueryEmployeeLAST_NAME: TStringField;
QueryEmployeeFIRST_NAME: TStringField;
QueryEmployeeHIRE_DATE: TDateTimeField;
QueryEmployeeSALARY: TFloatField;
DetailBand1: TQRBand;
QRDBText1: TQRDBText;
QRDBText2: TQRDBText;
QRDBText3: TQRDBText;
QRShape3: TQRShape;
QRDBText4: TQRDBText;
QRShape1: TQRShape;
QRShape2: TQRShape;
QRExpr1: TQRExpr;
SummaryBand1: TQRBand;
QRExpr3: TQRExpr;
QRExpr4: TQRExpr;
QRExpr5: TQRExpr;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
{$R *.dfm}
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -