ucontection.dfm

西门子Prodave6.0 的Delphi 版本, 需要安装 Prodave60软件,支持以太网通讯

object FrmContection: TFrmContection
  Left = 402
  Top = 272
  BorderStyle = bsDialog
  Caption = #24314#31435#36830#25509
  ClientHeight = 313
  ClientWidth = 669
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 7
    Top = 16
    Width = 193
    Height = 97
    Caption = #36830#25509#26041#24335#36873#25321
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 24
      Width = 49
      Height = 13
      AutoSize = False
      Caption = #36830#25509#21495':'
    end
    object Label2: TLabel
      Left = 8
      Top = 56
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #36830#25509#26041#24335':'
    end
    object ComboBoxCon: TComboBox
      Left = 79
      Top = 21
      Width = 73
      Height = 21
      ItemHeight = 13
      TabOrder = 0
    end
    object SelConType: TComboBox
      Left = 79
      Top = 53
      Width = 90
      Height = 21
      ItemHeight = 13
      TabOrder = 1
      OnChange = SelConTypeChange
    end
  end
  object GroupBox2: TGroupBox
    Left = 7
    Top = 120
    Width = 193
    Height = 129
    Caption = #22320#22336#21442#25968
    TabOrder = 1
    object Label3: TLabel
      Left = 8
      Top = 32
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #36830#25509#22320#22336':'
    end
    object Label4: TLabel
      Left = 8
      Top = 64
      Width = 65
      Height = 13
      AutoSize = False
      Caption = 'CPU '#25554#27133':'
    end
    object Label5: TLabel
      Left = 8
      Top = 96
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #26426#26550#22320#22336':'
    end
    object EDITAddr: TEdit
      Left = 82
      Top = 29
      Width = 81
      Height = 21
      TabOrder = 0
      Text = '192.168.0.21'
    end
    object EditSlot: TEdit
      Left = 82
      Top = 61
      Width = 33
      Height = 21
      TabOrder = 1
      Text = '2'
    end
    object EditRack: TEdit
      Left = 82
      Top = 93
      Width = 33
      Height = 21
      TabOrder = 2
      Text = '0'
    end
  end
  object ButtonCon: TButton
    Left = 517
    Top = 261
    Width = 75
    Height = 25
    Caption = #36830#25509
    TabOrder = 2
    OnClick = ButtonConClick
  end
  object Button1: TButton
    Left = 381
    Top = 261
    Width = 75
    Height = 25
    Caption = #21462#28040
    TabOrder = 3
    OnClick = Button1Click
  end
  object RzListView1: TRzListView
    Left = 208
    Top = 24
    Width = 449
    Height = 225
    Hint = #21452#20987#28608#27963#36873#23450#36830#25509'.'#25110#25353#21491#38190#24377#20986#28608#27963#38142#25509#33756#21333'.'
    AlphaSortAll = True
    Columns = <
      item
        Caption = #36830#25509#21495
      end
      item
        AutoSize = True
        Caption = #36830#25509
      end
      item
        Caption = #22320#22336
        Width = 80
      end
      item
        Caption = #26426#26550#21495
      end
      item
        Caption = #25554#27133#21495
      end
      item
        Caption = 'CPU '#22411#21495
        Width = 13
      end>
    HotTrack = True
    ParentShowHint = False
    PopupMenu = PopupMenu1
    ReadOnly = True
    RowSelect = True
    ShowHint = True
    SortType = stBoth
    TabOrder = 4
    ViewStyle = vsReport
    OnDblClick = N1Click
  end
  object LoadConStatusBar: TRzStatusBar
    Left = 0
    Top = 294
    Width = 669
    Height = 19
    BorderInner = fsNone
    BorderOuter = fsNone
    BorderSides = [sdLeft, sdTop, sdRight, sdBottom]
    BorderWidth = 0
    TabOrder = 5
    object LoadConBar: TRzProgressBar
      Left = 0
      Top = 0
      Width = 241
      Height = 19
      Align = alLeft
      BackColor = clBtnFace
      BarStyle = bsLED
      BorderInner = fsFlat
      BorderOuter = fsNone
      BorderWidth = 1
      InteriorOffset = 1
      NumSegments = 50
      PartsComplete = 0
      Percent = 0
      ShowPercent = False
      TotalParts = 0
    end
  end
  object XPMenu1: TXPMenu
    DimLevel = 30
    GrayLevel = 10
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clMenuText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Color = clBtnFace
    DrawMenuBar = False
    IconBackColor = clBtnFace
    MenuBarColor = clBtnFace
    SelectColor = clHighlight
    SelectBorderColor = clHighlight
    SelectFontColor = clMenuText
    DisabledColor = clInactiveCaption
    SeparatorColor = clBtnFace
    CheckedColor = clRed
    IconWidth = 24
    DrawSelect = True
    UseSystemColors = True
    UseDimColor = False
    OverrideOwnerDraw = False
    Gradient = True
    FlatMenu = False
    AutoDetect = True
    Active = True
    Left = 144
    Top = 104
  end
  object LoadConTimer: TTimer
    Enabled = False
    Interval = 100
    OnTimer = LoadConTimerTimer
    Left = 40
    Top = 256
  end
  object PopupMenu1: TPopupMenu
    Left = 88
    Top = 256
    object N1: TMenuItem
      Caption = #28608#27963#36830#25509
      OnClick = N1Click
    end
  end
end