bene.pas

来自「1. 纯粹的合同管理,不涉及其它业务,独立成系统2. 简单明了,流程清析3. 合」· PAS 代码 · 共 70 行

PAS
70
字号
unit bene;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ahmtbackground, StdCtrls, ComCtrls, dxDBTLCl, dxGrClms, dxTL,
  dxDBCtrl, dxDBGrid, dxCntner, ExtCtrls, ahmtlabel, Buttons, ahmtpanel;

type
  TF_Bene = class(TForm)
    Splitter1: TSplitter;
    AHMPanel1: TAHMPanel;
    SpeedButton1: TSpeedButton;
    SpeedButton2: TSpeedButton;
    SpeedButton3: TSpeedButton;
    SpeedButton4: TSpeedButton;
    SpeedButton5: TSpeedButton;
    AHMPanel2: TAHMPanel;
    AHMLabel1: TAHMLabel;
    Panel1: TPanel;
    AHMPanel4: TAHMPanel;
    AHMLabel2: TAHMLabel;
    AHMLabel3: TAHMLabel;
    SpeedButton6: TSpeedButton;
    SpeedButton7: TSpeedButton;
    Edit77: TEdit;
    Edit88: TEdit;
    Panel2: TPanel;
    dxDBGrid1: TdxDBGrid;
    AHMPanel3: TAHMPanel;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label7: TLabel;
    Label16: TLabel;
    SpeedButton8: TSpeedButton;
    SpeedButton9: TSpeedButton;
    Label17: TLabel;
    Edit1: TEdit;
    Edit2: TEdit;
    Edit3: TEdit;
    DateTimePicker1: TDateTimePicker;
    memo2: TMemo;
    Edit12: TEdit;
    AHMBackground1: TAHMBackground;
    AHMBackground2: TAHMBackground;
    dxDBGrid1Bene_ID: TdxDBGridMaskColumn;
    dxDBGrid1Bene_Name: TdxDBGridMaskColumn;
    dxDBGrid1Bene_Birthday: TdxDBGridDateColumn;
    dxDBGrid1Bene_IDcard: TdxDBGridMaskColumn;
    dxDBGrid1Bene_Money: TdxDBGridMaskColumn;
    dxDBGrid1Bene_Relationship: TdxDBGridMaskColumn;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  F_Bene: TF_Bene;

implementation

uses dm;

{$R *.dfm}

end.

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?