lxxx_report_pas2.~pas
来自「delphi6.0电子寻更源程序,用来计算保安有无查抄」· ~PAS 代码 · 共 60 行
~PAS
60 行
unit lxxx_report_pas;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Qrctrls, QuickRpt, ExtCtrls;
type
Tlxxx_report = class(TForm)
QuickRep1: TQuickRep;
QRBand1: TQRBand;
L_Title: TQRLabel;
QRGroup1: TQRGroup;
T_PDATE: TQRDBText;
QRLabel2: TQRLabel;
QRGroup2: TQRGroup;
T_LINENAME: TQRDBText;
QRLabel4: TQRLabel;
QRLabel3: TQRLabel;
QRLabel9: TQRLabel;
QRLabel5: TQRLabel;
QRLabel7: TQRLabel;
QRLabel1: TQRLabel;
QRBand2: TQRBand;
T_SHIFT: TQRDBText;
T_WORKERNAME: TQRDBText;
t_case: TQRDBText;
T_coinfo: TQRDBText;
QRDBText1: TQRDBText;
QRBand3: TQRBand;
QRLabel10: TQRLabel;
QRDBText2: TQRDBText;
QRLabel11: TQRLabel;
QRLabel12: TQRLabel;
QRLabel13: TQRLabel;
QRDBText3: TQRDBText;
QRDBText4: TQRDBText;
QRDBText5: TQRDBText;
QRSysData1: TQRSysData;
QRLabel6: TQRLabel;
QRLabel8: TQRLabel;
QRSysData3: TQRSysData;
QRLabel14: TQRLabel;
QRLabel15: TQRLabel;
private
{ Private declarations }
public
{ Public declarations }
end;
var
lxxx_report: Tlxxx_report;
implementation
uses dm_yxxx_view_pas;
{$R *.DFM}
end.
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?