productmanageunit.pas

来自「批发商品管理系统 目前我正在潜心研究」· PAS 代码 · 共 94 行

unit ProductManageUnit;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, cxContainer, cxEdit, cxGroupBox, ActnList, ImgList, RzPanel,
  RzButton, ExtCtrls, cxPC, cxControls, Buttons, Menus, TeeProcs, TeEngine,
  Chart, DbChart, StdCtrls, cxRadioGroup, RzLabel, Grids, DBGrids, RzDBGrid,
  cxGraphics, cxDBLabel, cxLabel, cxTextEdit, cxMaskEdit, cxDropDownEdit,
  cxLookupEdit, cxDBLookupEdit, cxDBLookupComboBox, DB, ADODB;

type
  TProductManageForm = class(TForm)
    MainPC: TcxPageControl;
    Inventory_TS: TcxTabSheet;
    ImageList: TImageList;
    TranList: TActionList;
    Query: TAction;
    Add: TAction;
    Change: TAction;
    Save: TAction;
    Cancel: TAction;
    Delete: TAction;
    First: TAction;
    Prior: TAction;
    Next: TAction;
    Last: TAction;
    Check: TAction;
    Customer_TS: TcxTabSheet;
    Trend_TS: TcxTabSheet;
    Manage_TS: TcxTabSheet;
    Main_GB: TcxGroupBox;
    Panel1: TPanel;
    RzDBGrid1: TRzDBGrid;
    RzDBGrid2: TRzDBGrid;
    RzLabel1: TRzLabel;
    RzLabel3: TRzLabel;
    Panel3: TPanel;
    RzDBGrid3: TRzDBGrid;
    cxRadioGroup1: TcxRadioGroup;
    cxRadioButton1: TcxRadioButton;
    cxRadioButton2: TcxRadioButton;
    cxRadioButton3: TcxRadioButton;
    Panel2: TPanel;
    RzDBGrid4: TRzDBGrid;
    Panel4: TPanel;
    RzDBGrid6: TRzDBGrid;
    RzLabel2: TRzLabel;
    RzLabel4: TRzLabel;
    cxTabSheet1: TcxTabSheet;
    Panel5: TPanel;
    RzDBGrid5: TRzDBGrid;
    Panel6: TPanel;
    RzDBGrid7: TRzDBGrid;
    RzLabel5: TRzLabel;
    cxTabSheet2: TcxTabSheet;
    DBChart1: TDBChart;
    Panel7: TPanel;
    RzDBGrid8: TRzDBGrid;
    cxRadioGroup2: TcxRadioGroup;
    cxRadioButton4: TcxRadioButton;
    cxRadioButton5: TcxRadioButton;
    cxRadioButton6: TcxRadioButton;
    cxTabSheet3: TcxTabSheet;
    Panel8: TPanel;
    ProductNo_LCB: TcxLookupComboBox;
    ProductNo_Label: TcxLabel;
    cxDBLabel1: TcxDBLabel;
    cxLabel1: TcxLabel;
    Panel9: TPanel;
    RzDBGrid10: TRzDBGrid;
    RzLabel6: TRzLabel;
    Inventory: TADODataSet;
    ADODataSet2: TADODataSet;
    DS_Inventory: TDataSource;
    RzDBGrid9: TRzDBGrid;
    Panel10: TPanel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  ProductManageForm: TProductManageForm;

implementation
uses
  DataModule;
{$R *.dfm}

end.