Am_wjgls.pas
上传用户:szruida
上传日期:2007-06-01
资源大小:6518k
文件大小:1k
源码类别:

Delphi控件源码

开发平台:

Delphi

  1. unit Am_wjgls;
  2. interface
  3. uses
  4.   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  5.   Dialogs, ImgList, DB, XPBarMenu, Grids, DBGrids, StdCtrls, ComCtrls,
  6.   ExtCtrls, ToolWin;
  7. type
  8.   TAm_wjgl = class(TForm)
  9.     CoolBar1: TCoolBar;
  10.     ToolBar1: TToolBar;
  11.     ToolButton1: TToolButton;
  12.     ToolButton5: TToolButton;
  13.     ToolButton6: TToolButton;
  14.     ToolButton4: TToolButton;
  15.     Panel1: TPanel;
  16.     Splitter1: TSplitter;
  17.     Panel2: TPanel;
  18.     TreeView1: TTreeView;
  19.     Panel3: TPanel;
  20.     Splitter2: TSplitter;
  21.     Panel4: TPanel;
  22.     GroupBox1: TGroupBox;
  23.     DBGrid1: TDBGrid;
  24.     Panel5: TPanel;
  25.     GroupBox2: TGroupBox;
  26.     DBGrid2: TDBGrid;
  27.     XPBarMenu1: TXPBarMenu;
  28.     WJGL: TDataSource;
  29.     WJFJ: TDataSource;
  30.     ImageList1: TImageList;
  31.     DataSource3: TDataSource;
  32.   private
  33.     { Private declarations }
  34.   public
  35.     { Public declarations }
  36.   end;
  37. var
  38.   Am_wjgl: TAm_wjgl;
  39. implementation
  40. uses dms,u_public;
  41. {$R *.dfm}
  42. end.