unitcustbrowsebase_p.pas

来自「delphi开发的中国移动大客户管理系统,后台数据库为oracle」· PAS 代码 · 共 65 行

unit Unitcustbrowsebase_P;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Unit_base, Grids, DBGrids, Buttons, StdCtrls, TFlatEditUnit,
  TFlatComboBoxUnit, ComCtrls, TFlatButtonUnit, ExtCtrls;

type
  TForm_custbrowsebase_P = class(TForm_base)
    Panel1: TPanel;
    Panel4: TPanel;
    Bevel2: TBevel;
    btn_grandset: TFlatButton;
    btn_brandcond: TFlatButton;
    Panel5: TPanel;
    Bevel1: TBevel;
    FlatButton1: TFlatButton;
    PageControl1: TPageControl;
    TabSheet1: TTabSheet;
    Panel6: TPanel;
    ScrollBox1: TScrollBox;
    Panel8: TPanel;
    Panel7: TPanel;
    Label1: TLabel;
    Label2: TLabel;
    Label5: TLabel;
    Label6: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label7: TLabel;
    co_query_city_code: TFlatComboBox;
    co_grade_id: TFlatComboBox;
    co_query_brand_code: TFlatComboBox;
    co_query_off_no_home: TFlatComboBox;
    ed_query_wk_no: TFlatEdit;
    ed_query_cust_name: TFlatEdit;
    ed_query_cust_sid: TFlatEdit;
    Panel16: TPanel;
    Panel9: TPanel;
    Label14: TLabel;
    SpeedButton1: TSpeedButton;
    Panel10: TPanel;
    Panel2: TPanel;
    Panel3: TPanel;
    FlatButton2: TFlatButton;
    FlatButton3: TFlatButton;
    FlatButton4: TFlatButton;
    DBGrid1: TDBGrid;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form_custbrowsebase_P: TForm_custbrowsebase_P;

implementation

{$R *.DFM}

end.