csda.~dfm

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

object frm_csda: Tfrm_csda
  Left = 2
  Top = 104
  BiDiMode = bdLeftToRight
  BorderIcons = []
  BorderStyle = bsNone
  Caption = #20379#24212#21830#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
  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 = 800
    Height = 117
    Align = alTop
    Caption = #20379#24212#21830#36164#26009
    Color = clSilver
    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 = 9
      Top = 16
      Width = 60
      Height = 13
      Caption = #21378#21830#32534#21495#65306
      Color = clSilver
      ParentColor = False
    end
    object Label2: TLabel
      Left = 9
      Top = 49
      Width = 60
      Height = 13
      Caption = #21378#21830#21517#31216#65306
      Color = clSilver
      ParentColor = False
    end
    object Label5: TLabel
      Left = 9
      Top = 77
      Width = 60
      Height = 13
      Caption = #22320'        '#22336#65306
      Color = clSilver
      ParentColor = False
    end
    object Label6: TLabel
      Left = 310
      Top = 14
      Width = 60
      Height = 13
      Caption = #32852'  '#31995'  '#20154#65306
      Color = clSilver
      ParentColor = False
    end
    object Label12: TLabel
      Left = 560
      Top = 13
      Width = 47
      Height = 13
      Caption = 'E-MAIL'#65306
      Color = clSilver
      ParentColor = False
    end
    object Label13: TLabel
      Left = 560
      Top = 42
      Width = 60
      Height = 13
      Caption = #32593'        '#22336#65306
      Color = clSilver
      ParentColor = False
    end
    object Label15: TLabel
      Left = 310
      Top = 82
      Width = 60
      Height = 13
      Caption = #20256'        '#30495#65306
      Color = clSilver
      ParentColor = False
    end
    object Label3: TLabel
      Left = 310
      Top = 46
      Width = 60
      Height = 13
      Caption = #30005'        '#35805#65306
      Color = clSilver
      ParentColor = False
    end
    object Label7: TLabel
      Left = 560
      Top = 80
      Width = 60
      Height = 13
      AutoSize = False
      Caption = #36523'  '#20221'  '#35777#65306
      Color = clSilver
      ParentColor = False
    end