dfm_xsqxfx.pas

来自「仓库管理系统 仓库管理系统」· PAS 代码 · 共 46 行

unit dfm_xsqxfx;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  TeeProcs, TeEngine, Chart, mxgraph, mxpivsrc, mxDB, mxstore, ExtCtrls,
  ComCtrls, Series, Db, DBTables, mxtables;

type
  Tdfmxsqxfx = class(TForm)
    StatusBar1: TStatusBar;
    Panel1: TPanel;
    Panel2: TPanel;
    DecisionCube1: TDecisionCube;
    DecisionSource1: TDecisionSource;
    DecisionGraph1: TDecisionGraph;
    DecisionQuery1: TDecisionQuery;
    Series1: TBarSeries;
    DecisionPivot1: TDecisionPivot;
    Series4: TBarSeries;
    Series27: TBarSeries;
    Series2: TBarSeries;
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  dfmxsqxfx: Tdfmxsqxfx;

implementation

uses dfm_xscx;

{$R *.DFM}

procedure Tdfmxsqxfx.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  action:=cafree;
end;

end.