hcck.~dfm

一个基于数据的药品行业管理系统,较全面,可供学习数据的开发人员参考消息

object frm_hccK: Tfrm_hccK
  Left = 91
  Top = 112
  BiDiMode = bdLeftToRight
  BorderIcons = []
  BorderStyle = bsNone
  Caption = #32791#26448#39046#29992#20986#24211#20294#21333
  ClientHeight = 585
  ClientWidth = 800
  Color = clSilver
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  ParentBiDiMode = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label8: TLabel
    Left = 18
    Top = 72
    Width = 48
    Height = 13
    Caption = #32852#31995#20154#65306
    Color = clLime
    ParentColor = False
  end
  object Label9: TLabel
    Left = 26
    Top = 80
    Width = 48
    Height = 13
    Caption = #32852#31995#20154#65306
    Color = clLime
    ParentColor = False
  end
  object Label10: TLabel
    Left = 34
    Top = 88
    Width = 48
    Height = 13
    Caption = #32852#31995#20154#65306
    Color = clLime
    ParentColor = False
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 800
    Height = 28
    AutoSize = True
    ButtonWidth = 66
    Caption = 'ToolBar1'
    Color = clInfoBk
    EdgeBorders = [ebTop, ebBottom]
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clGreen
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Images = ImageList2
    List = True
    ParentColor = False
    ParentFont = False
    ShowCaptions = True
    TabOrder = 0
    Wrapable = False
    object tadd: TToolButton
      Left = 0
      Top = 2
      Caption = '  '#26032#22686
      ImageIndex = 8
      OnClick = taddClick
    end
    object tdel: TToolButton
      Left = 66
      Top = 2
      Caption = ' '#21024#38500'    '
      ImageIndex = 0
      OnClick = tdelClick
    end
    object tedit: TToolButton
      Left = 132
      Top = 2
      Caption = ' '#32534#36753
      ImageIndex = 1
      OnClick = teditClick
    end
    object tsave: TToolButton
      Left = 198
      Top = 2
      Caption = ' '#20445#23384
      Enabled = False
      ImageIndex = 2
      OnClick = tsaveClick
    end
    object tcancel: TToolButton
      Left = 264
      Top = 2
      Caption = ' '#21462#28040
      Enabled = False
      ImageIndex = 3
      OnClick = tcancelClick
    end
    object tprint: TToolButton
      Left = 330
      Top = 2
      Caption = ' '#25171#21360
      ImageIndex = 4
    end
    object tfind: TToolButton
      Left = 396
      Top = 2
      Caption = ' '#26597#35810' '
      ImageIndex = 9
      OnClick = tfindClick
    end
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 28
    Width = 284
    Height = 535
    Align = alLeft
    Caption = #32791#26448#22522#26412#20449#24687
    Color = clActiveBorder
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 1
    object Label1: TLabel
      Left = 3
      Top = 198
      Width = 60
      Height = 13
      Caption = #32791#26448#32534#21495#65306
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label2: TLabel
      Left = 3
      Top = 231
      Width = 60
      Height = 13
      Caption = #32791#26448#21517#31216#65306
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label5: TLabel
      Left = 3
      Top = 262
      Width = 60
      Height = 13
      Caption = #21333'        '#20301#65306
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label6: TLabel
      Left = 138
      Top = 264
      Width = 60
      Height = 13
      Caption = #35268'        '#26684#65306
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label12: TLabel
      Left = 3
      Top = 54
      Width = 60
      Height = 13
      Caption = #21378#21830#32534#21495#65306
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label13: TLabel
      Left = 3
      Top = 364
      Width = 60
      Height = 13
      Caption = #36827#36135#20215#26684#65306
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label15: TLabel
      Left = 138
      Top = 296
      Width = 60
      Height = 13
      Caption = #23433#20840#24211#23384#65306
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label3: TLabel
      Left = 3
      Top = 296
      Width = 60
      Height = 13
      Caption = #24635'  '#24211'  '#23384#65306
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label4: TLabel
      Left = 3
      Top = 332
      Width = 60
      Height = 13
      Caption = #25209'        '#27425#65306
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object SpeedButton1: TSpeedButton
      Left = 145
      Top = 194
      Width = 43
      Height = 22
      Caption = #26597#35810
      OnClick = SpeedButton1Click
    end
    object Label7: TLabel
      Left = 138