Chip 1999 March/Chip_1999-03_cd.bin/zkuste/delphi/INFO/DI9806JP.ZIP/Main.dfm/Main.txt

Text File | 1998-04-08 | 11KB | 465 lines

object frmMain: TfrmMain
  Left = 196
  Top = 113
  Width = 546
  Height = 452
  Caption = 'Tower of Babel - A WinSock 2 demonstration program'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  Position = poScreenCenter
  ShowHint = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 538
    Height = 387
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = 'Protocols'
      object btnGetNPs: TButton
        Left = 64
        Top = 240
        Width = 105
        Height = 17
        Caption = 'Get Name Providers!'
        TabOrder = 0
      end
      object gbProtocols: TGroupBox
        Left = 0
        Top = 0
        Width = 569
        Height = 358
        Caption = 'Protocols'
        TabOrder = 1
        object GroupBox1: TGroupBox
          Left = 8
          Top = 136
          Width = 321
          Height = 153
          Caption = 'Protocol  Structure Name'
          TabOrder = 0
          object lbProtocols: TListBox
            Left = 2
            Top = 15
            Width = 317
            Height = 136
            Align = alClient
            ExtendedSelect = False
            ItemHeight = 13
            Sorted = True
            TabOrder = 0
            OnClick = lbProtocolsClick
          end
        end
        object gbType: TGroupBox
          Left = 8
          Top = 16
          Width = 489
          Height = 121
          Caption = 'Service Flags'
          TabOrder = 1
          object cbConnLess: TCheckBox
            Left = 8
            Top = 16
            Width = 97
            Height = 17
            Caption = 'Connectionless'
            TabOrder = 0
          end
          object cbMsgOriented: TCheckBox
            Left = 8
            Top = 32
            Width = 97
            Height = 17
            Caption = 'Msg Oriented'
            TabOrder = 1
          end
          object cbStrmOriented: TCheckBox
            Left = 8
            Top = 48
            Width = 97
            Height = 17
            Caption = 'Strm Oriented'
            TabOrder = 2
          end
          object cbGuaranteedD: TCheckBox
            Left = 8
            Top = 64
            Width = 121
            Height = 17
            Caption = 'Guaranteed Delivery'
            TabOrder = 3
          end
          object cbGuaranteedO: TCheckBox
            Left = 8
            Top = 80
            Width = 113
            Height = 17
            Caption = 'Guaranteed Order'
            TabOrder = 4
          end
          object cbPsuedoStrm: TCheckBox
            Left = 8
            Top = 96
            Width = 97
            Height = 17
            Caption = 'Psuedo Strm'
            TabOrder = 5
          end
          object cbGracefulClose: TCheckBox
            Left = 136
            Top = 16
            Width = 97
            Height = 17
            Caption = 'Graceful Close'
            TabOrder = 6
          end
          object cbExpedited: TCheckBox
            Left = 136
            Top = 32
            Width = 97
            Height = 17
            Caption = 'Expedited'
            TabOrder = 7
          end
          object cbConnData: TCheckBox
            Left = 136
            Top = 48
            Width = 97
            Height = 17
            Caption = 'Conn. Data'
            TabOrder = 8
          end
          object cbDisConnData: TCheckBox
            Left = 136
            Top = 64
            Width = 97
            Height = 17
            Caption = 'Disconn. Data'
            TabOrder = 9
          end
          object cbBroadcast: TCheckBox
            Left = 248
            Top = 64
            Width = 73
            Height = 17
            Caption = 'Broadcast'
            TabOrder = 10
          end
          object cbMulticast: TCheckBox
            Left = 248
            Top = 80
            Width = 73
            Height = 17
            Caption = 'Multicast'
            TabOrder = 11
          end
          object cbQOS: TCheckBox
            Left = 136
            Top = 80
            Width = 97
            Height = 17
            Caption = 'QOS'
            TabOrder = 12
          end
          object cbUniSend: TCheckBox
            Left = 136
            Top = 96
            Width = 97
            Height = 17
            Caption = 'Uni Send'
            TabOrder = 13
          end
          object cbUniRecv: TCheckBox
            Left = 248
            Top = 16
            Width = 81
            Height = 17
            Caption = 'Uni Recv'
            TabOrder = 14
          end
          object cbIFS: TCheckBox
            Left = 248
            Top = 32
            Width = 57
            Height = 17
            Caption = 'IFS'
            TabOrder = 15
          end
          object cbPartialMsg: TCheckBox
            Left = 248
            Top = 48
            Width = 73
            Height = 17
            Caption = 'Partial Msg'
            TabOrder = 16
          end
          object gbMultipoint: TGroupBox
            Left = 336
            Top = 16
            Width = 145
            Height = 57
            Caption = 'Multipoint Options'
            TabOrder = 17
            object cbRootCtrlPlane: TCheckBox
              Left = 8
              Top = 16
              Width = 129
              Height = 17
              Caption = 'Rooted Ctrl Plane'
              TabOrder = 0
            end
            object cbRootDataPlane: TCheckBox
              Left = 8
              Top = 32
              Width = 116
              Height = 17
              Caption = 'Rooted Data Plane'
              TabOrder = 1
            end
          end
        end
        object gbMiscellaneous: TGroupBox
          Left = 336
          Top = 140
          Width = 185
          Height = 213
          Caption = 'Miscellaneous'
          TabOrder = 2
          object Label1: TLabel
            Left = 8
            Top = 40
            Width = 77
            Height = 13
            Caption = 'Protocol Version'
          end
          object Label2: TLabel
            Left = 8
            Top = 88
            Width = 70
            Height = 13
            Caption = 'Address Family'
          end
          object Label3: TLabel
            Left = 8
            Top = 112
            Width = 61
            Height = 13
            Caption = 'Socket Type'
          end
          object Label4: TLabel
            Left = 8
            Top = 64
            Width = 39
            Height = 13
            Caption = 'Protocol'
          end
          object Label5: TLabel
            Left = 8
            Top = 136
            Width = 69
            Height = 13
            Caption = 'Network Order'
          end
          object Label6: TLabel
            Left = 8
            Top = 160
            Width = 50
            Height = 13
            Caption = 'Catalog ID'
          end
          object Label7: TLabel
            Left = 8
            Top = 16
            Width = 64
            Height = 13
            Caption = 'No. Protocols'
          end
          object edProtoVersion: TEdit
            Left = 88
            Top = 43
            Width = 49
            Height = 21
            TabOrder = 0
          end
          object edAddrFamily: TEdit
            Left = 88
            Top = 91
            Width = 89
            Height = 21
            TabOrder = 1
          end
          object edSocketType: TEdit
            Left = 88
            Top = 115
            Width = 89
            Height = 21
            TabOrder = 2
          end
          object edProtocol: TEdit
            Left = 88
            Top = 67
            Width = 81
            Height = 21
            TabOrder = 3
          end
          object edNetworkOrder: TEdit
            Left = 88
            Top = 139
            Width = 73
            Height = 21
            TabOrder = 4
          end
          object edCatalogEID: TEdit
            Left = 88
            Top = 163
            Width = 89
            Height = 21
            TabOrder = 5
          end
          object edNoProtocols: TEdit
            Left = 88
            Top = 19
            Width = 81
            Height = 21
            TabOrder = 6
          end
        end
        object gbProtocolGuid: TGroupBox
          Left = 8
          Top = 296
          Width = 321
          Height = 41
          Caption = 'GUID'
          TabOrder = 3
          object edProtocolGuid: TEdit
            Left = 8
            Top = 15
            Width = 305
            Height = 21
            TabOrder = 0
          end
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'NameSpaces'
      object gbNameSpaces: TGroupBox
        Left = 16
        Top = 32
        Width = 185
        Height = 297
        Caption = 'Name Space Providers'
        TabOrder = 0
        object lbNameSpaceProviders: TListBox
          Left = 2
          Top = 15
          Width = 181
          Height = 280
          Align = alClient
          ItemHeight = 13
          Sorted = True
          TabOrder = 0
          OnClick = lbNameSpaceProvidersClick
        end
      end
      object gbMiscNSP: TGroupBox
        Left = 216
        Top = 40
        Width = 305
        Height = 289
        Caption = 'Miscellaneous'
        TabOrder = 1
        object ckbActive: TCheckBox
          Left = 16
          Top = 24
          Width = 65
          Height = 17
          Caption = 'Active'
          TabOrder = 0
        end
        object gbVersion: TGroupBox
          Left = 16
          Top = 48
          Width = 145
          Height = 49
          Caption = 'Version'
          TabOrder = 1
          object edVersion: TEdit
            Left = 8
            Top = 16
            Width = 129
            Height = 21
            TabOrder = 0
          end
        end
        object gbIdentifier: TGroupBox
          Left = 16
          Top = 104
          Width = 280
          Height = 49
          Caption = 'Identity'
          TabOrder = 2
          object edIdentifier: TEdit
            Left = 8
            Top = 16
            Width = 265
            Height = 21
            TabOrder = 0
          end
        end
        object GroupBox2: TGroupBox
          Left = 16
          Top = 168
          Width = 281
          Height = 65
          Caption = 'Provider GUID'
          TabOrder = 3
          object edNSPGuid: TEdit
            Left = 12
            Top = 22
            Width = 257
            Height = 21
            TabOrder = 0
          end
        end
      end
    end
  end
  object sbStatusMsg: TStatusBar
    Left = 0
    Top = 387
    Width = 538
    Height = 19
    Panels = <>
    SimplePanel = False
  end
  object MainMenu1: TMainMenu
    Left = 228
    Top = 16
    object File1: TMenuItem
      Caption = '&File'
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = Exit1Click
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object About1: TMenuItem
        Caption = '&About...'
        OnClick = About1Click
      end
    end
  end
end