selectdepartfrm.dfm

群星医药系统源码

object FrmSelectDepart: TFrmSelectDepart
  Left = 280
  Top = 220
  Width = 631
  Height = 453
  Caption = #36873#25321#37096#38376'('#20844#21496')'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 389
    Width = 623
    Height = 37
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    object Label1: TLabel
      Left = 212
      Top = 16
      Width = 60
      Height = 12
      Caption = #24555#36895#25628#32034#65306
    end
    object edValue: TRzEdit
      Left = 276
      Top = 11
      Width = 109
      Height = 20
      framehottrack = false
      FrameHotStyle = fsFlat
      FrameVisible = True
      TabOrder = 0
      OnChange = edValueChange
      OnKeyDown = edValueKeyDown
    end
    object RzBitBtn2: TRzBitBtn
      Left = 428
      Top = 8
      Default = True
      Caption = #36873#23450'(&S)'
      Color = 15791348
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      TabOrder = 1
      OnClick = RzBitBtn2Click
      DisabledIndex = 10
      ImageIndex = 1
      Images = ImageList1
    end
    object RzBitBtn1: TRzBitBtn
      Left = 520
      Top = 8
      Caption = #20851#38381'(&C)'
      Color = 15791348
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      TabOrder = 2
      OnClick = RzBitBtn1Click
      DisabledIndex = 10
      ImageIndex = 0
      Images = ImageList1
    end
    object ckViewHLine: TRzCheckBox
      Left = 44
      Top = 12
      Width = 93
      Height = 17
      AlignmentVertical = avCenter
      Caption = #26174#31034#34920#26684#27178#32447
      Checked = True
      HotTrack = True
      State = cbChecked
      TabOrder = 3
      OnClick = ckViewHLineClick
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 623
    Height = 389
    Align = alClient
    BevelOuter = bvNone
    Caption = 'Panel2'
    TabOrder = 1
    object vtDeparts: TVirtualStringTree
      Left = 0
      Top = 0
      Width = 623
      Height = 389
      Align = alClient
      Header.AutoSizeIndex = -1
      Header.Font.Charset = DEFAULT_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'MS Sans Serif'
      Header.Font.Style = []
      Header.Options = [hoColumnResize, hoDrag, hoShowSortGlyphs, hoVisible]
      RootNodeCount = 2
      TabOrder = 0
      TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowHorzGridLines, toShowRoot, toShowTreeLines, toThemeAware, toUseBlendedImages]
      TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect]
      OnBeforeItemErase = vtDepartsBeforeItemErase
      OnDblClick = vtDepartsDblClick
      OnGetText = vtDepartsGetText
      OnGetNodeDataSize = vtDepartsGetNodeDataSize
      OnKeyDown = vtDepartsKeyDown
      Columns = <
        item
          Position = 0
          Width = 150
          WideText = #37096#38376#32534#21495
        end
        item
          Position = 1
          Width = 150
          WideText = #37096#38376#21517#31216
        end
        item
          Position = 2
          Width = 100
          WideText = #30005#35805
        end
        item
          Position = 3
          Width = 100
          WideText = #20256#30495
        end
        item
          Position = 4
          Width = 118
          WideText = #36127#36131#20154
        end>
    end
  end
  object DComm: TDCOMConnection
    ServerGUID = '{8D141DF9-E99C-4C06-876D-F18CBE11DB75}'
    ServerName = 'CommonSvr.CommonRDM'
    Left = 244
    Top = 157
  end
  object DsSelectDepart: TDataSource
    DataSet = CdsSelectDepart
    Left = 424
    Top = 157
  end
  object CdsSelectDepart: TckClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DspBrowDepart'
    RemoteServer = DComm
    Left = 336
    Top = 156
    object CdsSelectDepartDepartID: TAutoIncField
      FieldName = 'DepartID'
      ReadOnly = True
    end
    object CdsSelectDepartDepartNo: TStringField
      FieldName = 'DepartNo'
      Size = 12
    end
    object CdsSelectDepartDepartName: TStringField
      FieldName = 'DepartName'
    end
    object CdsSelectDepartTel: TStringField
      FieldName = 'Tel'
      Size = 15
    end
    object CdsSelectDepartFax: TStringField
      FieldName = 'Fax'
      Size = 15
    end
    object CdsSelectDepartPrincipal: TStringField
      FieldName = 'Principal'
      Size = 8
    end
    object CdsSelectDepartIsCompany: TBooleanField
      FieldName = 'IsCompany'
    end
  end
  object ImageList1: TImageList
    Left = 460
    Top = 256
    Bitmap = {
      494C010102000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      000000000000360000002800000040000000100000000100180000000000000C
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000848484840000840000848484000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000084
      8400000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000840000840000848400848400840000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000084840084
      8400000000000000000000000000000000000000000000000000000000000000
      0000000000000000840000848400848400840000840000848484000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000084840084840084
      8400000000000000000000000000000000000000000000000000000000000000
      0000000000848484840000848400840000848484000000000000840000840000
      8400008400008400008400008400000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000084840084840084
      84000000FFFFFFFFFFFF00000000000000000000000000000000000000000000
      0000000000840000848400840000848484000000000000000000840000848400
      8484008484008484008484008400000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000084840084840000
      00000000FFFFFFFFFFFF00000000000000000000000000000084000000000000
      0000000000840000848400840000000000000000000000000000000000840000
      8484008484008484008484008400000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000084840084840084
      84000000FFFFFFFFFFFF00000000000000000000000084000084000000000000
      0000000000840000848400840000848484000000000000000000000000848484
      8400008484008484008484008400000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000084840084840084
      84000000FFFFFFFFFFFF00000000000000000084000084000084000084000084
      0000000000848484840000848400840000848484000000848484840000840000
      8484008400008484008484008400000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000084840084840084
      84000000FFFFFFFFFFFF00000000000084000084000084000084000084000084
      0000000000000000840000848400848400840000840000840000848400848400
      8400008484848400008484008400000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000084840084840084
      84000000FFFFFFFFFFFF00000000000000000084000084000084000084000084
      0000000000000000000000840000840000848400848400848400840000840000
      0000000000000000008400008400000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000084840084840000
      00FFFFFFFFFFFFFFFFFF00000000000000000000000084000084000000000000
      0000000000000000000000000000848484840000840000840000848484000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000008484000000FFFF
      FFFFFFFFFFFFFFFFFFFF00000000000000000000000000000084000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000000000FFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFF00000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000424D3E000000000000003E000000
      2800000040000000100000000100010000000000800000000000000000000000
      000000000000000000000000FFFFFF00FFFFFFFF00000000FBFFFFFF00000000
      F3FFF0FF00000000E3FFE0FF00000000C3FFC0FF000000000007830100000000
      807F870100000000807B8F810000000080738781000000008060820100000000
      8040C001000000008060E039000000008073F07F00000000807BFFFF00000000
      807FFFFF00000000807FFFFF0000000000000000000000000000000000000000
      000000000000}
  end
  object CdsTemp: TckClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DspTemp'
    RemoteServer = DComm
    Left = 340
    Top = 244
  end
end