hcxx.~dfm

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

object frm_hcxx: Tfrm_hcxx
  Left = 184
  Top = 157
  BiDiMode = bdLeftToRight
  BorderIcons = []
  BorderStyle = bsNone
  Caption = #32791#26448#31649#29702#26723#26696
  ClientHeight = 442
  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 = 281
    Height = 392
    Align = alLeft
    Caption = #32791#26448#22522#26412#20449#24687
    Color = clWhite
    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 = 8
      Top = 52
      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 = 8
      Top = 85
      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 = 8
      Top = 116
      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 = 8
      Top = 155
      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 = 8
      Top = 21
      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 = 8
      Top = 225
      Width = 72
      Height = 13
      Caption = #36827#36135#20215#26684#65306#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 = 8