📄 odmplani.pas
字号:
unit odmplani;
interface
uses Windows, SysUtils, Messages, Classes, Graphics, Controls,
StdCtrls, ExtCtrls, Forms, Quickrpt, QRCtrls, Db, DBTables;
type
TQr3 = class(TQuickRep)
QRBand1: TQRBand;
QRDBText17: TQRDBText;
QRLabel5: TQRLabel;
QRLabel6: TQRLabel;
QRDBText18: TQRDBText;
QRLabel7: TQRLabel;
QRDBText19: TQRDBText;
QRDBText20: TQRDBText;
QRSysData2: TQRSysData;
QRBand2: TQRBand;
QRLabel8: TQRLabel;
QRLabel25: TQRLabel;
QRLabel26: TQRLabel;
QRShape6: TQRShape;
QRLabel27: TQRLabel;
QRBand3: TQRBand;
QRDBText21: TQRDBText;
QRDBText22: TQRDBText;
QRDBText23: TQRDBText;
QRSysData3: TQRSysData;
QRBand4: TQRBand;
QRLabel28: TQRLabel;
QRExpr1: TQRExpr;
Query1: TQuery;
Query1SIRKOD: TStringField;
Query1SENETNO: TIntegerField;
Query1MUSNO: TFloatField;
Query1ADI: TStringField;
Query1SOYADI: TStringField;
Query1VADE: TDateField;
Query1ODMTAR: TDateField;
Query1DURUM: TStringField;
Query1TUTAR: TFloatField;
Query1KASAFISNO: TFloatField;
Query1USER: TFloatField;
QRShape1: TQRShape;
QRLabel1: TQRLabel;
QRDBText1: TQRDBText;
QRLabel2: TQRLabel;
QRDBText2: TQRDBText;
QRDBText3: TQRDBText;
QRLabel3: TQRLabel;
private
public
end;
var
Qr3: TQr3;
musno:Integer;
implementation
USES mushar;
{$R *.DFM}
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -