unit1.~dfm

明小子旁注Domain3.0和Domain2.2两个版本源码

            000000008080808080008080808080008080800000FFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFF800000FFFFFF800000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000080
            8080008080808080008080808080800000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            800000800000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000080808080
            8000808080808000808080000080000080000080000080000080000080000000
            0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000808080008080808080
            008080808080008080808080008080808080008080808080008080000000FFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000808080808000000000000000
            0000000000000000000000000000000000808080808080000000FFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFF000000808080808080000000FFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFF000000808080008080000000FFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFF00000000808080808000808000000000FFFF000000000000
            00FFFF000000808080008080808080000000FFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFF00000000000000000000000000000000FFFF00FFFF00000000
            0000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000FFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFF}
          OnClick = BtPasteClick
        end
        object EdUpfilesPath: TEdit
          Left = 80
          Top = 24
          Width = 289
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 0
          Text = 'http://www.***.com/bbs/upfile.asp'
        end
        object R1_Defautl: TRadioButton
          Left = 16
          Top = 52
          Width = 97
          Height = 17
          Caption = #40664#35748#32593#39029#26408#39532
          Checked = True
          Ctl3D = True
          ParentCtl3D = False
          TabOrder = 1
          TabStop = True
          OnClick = R1_DefautlClick
        end
        object R2_Auto: TRadioButton
          Left = 120
          Top = 52
          Width = 89
          Height = 17
          Caption = #33258#36873#32593#39029#26408#39532
          TabOrder = 2
          OnClick = R2_AutoClick
        end
        object ASPFileName: TEdit
          Left = 80
          Top = 74
          Width = 361
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 3
          Text = 'DIY.asp'
          OnChange = ASPFileNameChange
          OnKeyPress = ASPFileNameKeyPress
        end
        object PortET: TEdit
          Left = 408
          Top = 24
          Width = 33
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 4
          Text = '80'
          OnChange = PortETChange
        end
        object CookiesData: TEdit
          Left = 80
          Top = 100
          Width = 361
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 5
          Text = 'iscookies=0; ASPSESSIONIDACRQTBCS=OGALDEBDBBIGMLOHFKMOJFKO'
        end
      end
      object EdWebShell: TEdit
        Left = 88
        Top = 348
        Width = 353
        Height = 18
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 2
        OnChange = EdWebShellChange
      end
    end
    object TabSheet4: TTabSheet
      Caption = 'ACCESS'#25968#25454#24211#27983#35272
      ImageIndex = 3
      object suiURLLabel1: TsuiURLLabel
        Left = 96
        Top = 320
        Width = 132
        Height = 12
        Cursor = crHandPoint
        Caption = 'http://www.hackdiy.com'
        AutoSize = False
        URL = 'http://www.hackdiy.com'
        FontHoverColor = clRed
        FontLinkColor = clBlue
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsUnderline]
      end
      object suiURLLabel2: TsuiURLLabel
        Left = 96
        Top = 272
        Width = 130
        Height = 13
        Cursor = crHandPoint
        Caption = 'http://www.hack58.com'
        AutoSize = False
        URL = 'http://www.hack58.com'
        FontHoverColor = clRed
        FontLinkColor = clBlue
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsUnderline]
      end
      object suiURLLabel3: TsuiURLLabel
        Left = 96
        Top = 296
        Width = 130
        Height = 12
        Cursor = crHandPoint
        Caption = 'http://www.socut.com'
        AutoSize = False
        URL = 'http://www.socut.com'
        FontHoverColor = clRed
        FontLinkColor = clBlue
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsUnderline]
      end
      object Label7: TLabel
        Left = 24
        Top = 273
        Width = 65
        Height = 13
        AutoSize = False
        Caption = #40657#23458#21160#30011#21543
      end
      object Label8: TLabel
        Left = 24
        Top = 297
        Width = 48
        Height = 12
        Caption = #28865#31354#35774#35745
      end
      object Label9: TLabel
        Left = 24
        Top = 321
        Width = 48
        Height = 12
        Caption = #40657#23458#22320#24102
      end
      object Bevel2: TBevel
        Left = 8
        Top = 264
        Width = 233
        Height = 5
        Shape = bsTopLine
      end
      object Bevel3: TBevel
        Left = 8
        Top = 338
        Width = 233
        Height = 5
        Shape = bsTopLine
      end
      object DBGrid1: TDBGrid
        Left = 129
        Top = 38
        Width = 407
        Height = 318
        Hint = #21491#20987#32534#36753#21644#20445#23384
        Align = alClient
        Ctl3D = True
        DataSource = DataSource1
        ParentCtl3D = False
        ParentShowHint = False
        PopupMenu = PopupMenu3
        ShowHint = True
        TabOrder = 3
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        OnMouseMove = DBGrid1MouseMove
      end
      object TabSet1: TTabSet
        Left = 0
        Top = 356
        Width = 536
        Height = 21
        Align = alBottom
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Tabs.Strings = (
          ' '#25968#25454#24211#27983#35272' '
          ' '#21152#23494#35299#23494)
        TabIndex = 0
        OnChange = TabSet1Change
      end
      object FlatPanel2: TFlatPanel
        Left = 0
        Top = 0
        Width = 536
        Height = 38
        ParentColor = True
        ColorShadow = cl3DLight
        Align = alTop
        TabOrder = 0
        object Label11: TLabel
          Left = 16
          Top = 13
          Width = 66
          Height = 12
          Caption = #25968#25454#24211#36335#24452':'
        end
        object OpenAccess: TSpeedButton
          Left = 464
          Top = 7
          Width = 70
          Height = 22
          Caption = #25171#24320#25968#25454#24211
          Flat = True
          OnClick = OpenAccessClick
        end
        object Label12: TLabel
          Left = 344
          Top = 13
          Width = 30
          Height = 12
          Caption = #23494#30721':'
        end
        object DataPath: TEdit
          Left = 88
          Top = 8
          Width = 249
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 0
        end
        object RzEdit1: TEdit
          Left = 378
          Top = 8
          Width = 81
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 1
        end
      end
      object suiSideChannel1: TsuiSideChannel
        Left = 0
        Top = 38
        Width = 129
        Height = 318
        UIStyle = MacOS
        BorderColor = 8355711
        CaptionFontColor = clWindowText
        ShowButton = True
        SideBarColor = 15198183
        Caption = #25968#25454#24211#34920#21517
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Align = suiLeft
        StayOn = False
        Color = clWhite
        ParentFont = False
        PopupMode = suiMouseOn
        QuickMove = True
        SideBarWidth = 10
        object TableName: TsuiListBox
          Left = 13
          Top = 24