umain.~dfm

一个小程序

          item
            Expanded = False
            FieldName = 'dbid'
            Title.Alignment = taCenter
            Title.Caption = #32534#21495
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dbname'
            Title.Alignment = taCenter
            Title.Caption = #21517#31216
            Width = 101
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dbalias'
            Title.Alignment = taCenter
            Title.Caption = #23454#20363
            Width = 112
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dbuser'
            Title.Alignment = taCenter
            Title.Caption = #29992#25143#21517
            Width = 122
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dbpass'
            Title.Alignment = taCenter
            Title.Caption = #23494#30721
            Visible = False
          end
          item
            Expanded = False
            FieldName = 'dbip'
            Title.Alignment = taCenter
            Title.Caption = 'IP'#22320#22336
            Width = 150
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dbport'
            Title.Alignment = taCenter
            Title.Caption = #31471#21475
            Width = 106
            Visible = True
          end>
      end
      object RzPanel1: TRzPanel
        Left = 0
        Top = 29
        Width = 767
        Height = 103
        Align = alTop
        BorderOuter = fsNone
        GradientColorStyle = gcsMSOffice
        TabOrder = 1
        object RzLabel7: TRzLabel
          Left = 39
          Top = 24
          Width = 32
          Height = 13
          AutoSize = False
          Caption = #21517#31216
        end
        object RzLabel8: TRzLabel
          Left = 244
          Top = 24
          Width = 46
          Height = 13
          AutoSize = False
          Caption = #23454#20363#21517
        end
        object RzLabel9: TRzLabel
          Left = 445
          Top = 24
          Width = 42
          Height = 13
          AutoSize = False
          Caption = 'IP'#22320#22336
        end
        object RzLabel10: TRzLabel
          Left = 27
          Top = 56
          Width = 46
          Height = 13
          AutoSize = False
          Caption = #29992#25143#21517
        end
        object RzLabel11: TRzLabel
          Left = 256
          Top = 56
          Width = 32
          Height = 13
          AutoSize = False
          Caption = #23494#30721
        end
        object RzLabel12: TRzLabel
          Left = 455
          Top = 56
          Width = 32
          Height = 13
          AutoSize = False
          Caption = #31471#21475
        end
        object RzEditName: TRzEdit
          Left = 72
          Top = 20
          Width = 121
          Height = 21
          TabOrder = 0
          OnKeyPress = RzEditNameKeyPress
        end
        object RzEditAlias: TRzEdit
          Left = 288
          Top = 20
          Width = 121
          Height = 21
          TabOrder = 1
          OnKeyPress = RzEditAliasKeyPress
        end
        object RzEditIp: TRzEdit
          Left = 488
          Top = 20
          Width = 121
          Height = 21
          TabOrder = 2
          OnKeyPress = RzEditIpKeyPress
        end
        object RzEditUser: TRzEdit
          Left = 72
          Top = 52
          Width = 121
          Height = 21
          TabOrder = 3
          OnKeyPress = RzEditUserKeyPress
        end
        object RzEditPass: TRzEdit
          Left = 288
          Top = 52
          Width = 121
          Height = 21
          PasswordChar = '*'
          TabOrder = 4
          OnKeyPress = RzEditPassKeyPress
        end
        object RzEditPort: TRzEdit
          Left = 488
          Top = 52
          Width = 121
          Height = 21
          Text = '1521'
          Color = clInfoBk
          ReadOnly = True
          TabOrder = 5
          OnKeyPress = RzEditPortKeyPress
        end
      end
    end
    object rztbsht2: TRzTabSheet
      ImageIndex = 3
      Caption = #36830#25509#35774#32622
      object RzToolbar3: TRzToolbar
        Left = 0
        Top = 0
        Width = 767
        Height = 29
        ButtonWidth = 60
        ShowButtonCaptions = True
        TextOptions = ttoSelectiveTextOnRight
        BorderInner = fsNone
        BorderOuter = fsGroove
        BorderSides = [sdTop]
        BorderWidth = 0
        GradientColorStop = 14215660
        TabOrder = 0
        VisualStyle = vsGradient
        ToolbarControls = (
          btnGet2
          btnConnect)
        object btnGet2: TRzToolButton
          Left = 4
          Top = 2
          ImageIndex = 5
          Images = ilMain
          Caption = #25552#21462
          OnClick = btnGetClick
        end
        object btnConnect: TRzToolButton
          Left = 64
          Top = 2
          ImageIndex = 9
          Images = ilMain
          Caption = #36830#25509
          OnClick = btnConnectClick
        end
      end
      object RzDBGrid2: TRzDBGrid
        Left = 0
        Top = 29
        Width = 767
        Height = 422
        Align = alClient
        DataSource = ds1
        DefaultDrawing = True
        ReadOnly = True
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'dbid'
            Title.Alignment = taCenter
            Title.Caption = #32534#21495
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dbalias'
            Title.Alignment = taCenter
            Title.Caption = #21035#21517
            Width = 98
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dbname'
            Title.Alignment = taCenter
            Title.Caption = #25968#25454#24211#21517
            Width = 234
            Visible = True
          end>
      end
    end
    object rztbsht3: TRzTabSheet
      ImageIndex = 3
      Caption = #21512#21516#35774#32622
      object RzPanel2: TRzPanel
        Left = 0
        Top = 29
        Width = 767
        Height = 108
        Align = alTop
        BorderOuter = fsNone
        TabOrder = 1
        object RzLabel1: TRzLabel
          Left = 155
          Top = 7
          Width = 40
          Height = 13
          Alignment = taRightJustify
          AutoSize = False
          Caption = #20379#24212#21830
        end
        object RzLabel2: TRzLabel
          Left = 133
          Top = 56
          Width = 62
          Height = 13
          Alignment = taRightJustify
          AutoSize = False
          Caption = #21512#21516#32534#21495
        end
        object RzLabel3: TRzLabel
          Left = 133
          Top = 79
          Width = 62
          Height = 13
          Alignment = taRightJustify
          AutoSize = False
          Caption = #21462#20540#31867#22411
        end
        object RzLabel4: TRzLabel
          Left = 379
          Top = 79
          Width = 28
          Height = 13
          Alignment = taRightJustify
          AutoSize = False
          Caption = #37329#39069
        end
        object RzLabel5: TRzLabel
          Left = 561
          Top = 79
          Width = 28
          Height = 13
          Alignment = taRightJustify
          AutoSize = False
          Caption = #27604#20363
        end
        object RzLabelGys: TRzLabel
          Left = 359
          Top = 7
          Width = 457
          Height = 13
          AutoSize = False
          Caption = #20379#24212#21830#21517#31216
        end
        object RzLabel6: TRzLabel
          Left = 348
          Top = 56
          Width = 59
          Height = 13
          Alignment = taRightJustify