codeusagerfrm.pas

来自「供水营销打印程序源码」· PAS 代码 · 共 40 行

unit CodeUsagerFrm;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, SJCustomCodeFrm, PropStorageEh, Grids, DBGridEh, ExtCtrls,
  ComCtrls, cxControls, cxContainer, cxEdit, cxTextEdit, cxMaskEdit,
  cxDBEdit, StdCtrls, cxCurrencyEdit;

type
  TfrmCodeUsager = class(TSJCustomCodeForm)
    Label1: TLabel;
    edtPayID: TcxDBMaskEdit;
    Label2: TLabel;
    edtUsingname: TcxDBMaskEdit;
    Label3: TLabel;
    edtsPrice: TcxDBCurrencyEdit;
    Label4: TLabel;
    edtwPrice: TcxDBCurrencyEdit;
    Label5: TLabel;
    Label6: TLabel;
    edtDescription: TcxDBMaskEdit;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  frmCodeUsager: TfrmCodeUsager;

implementation

uses InvPrintDM;

{$R *.dfm}

end.