gsmctrfr.dfm

来自「boomerang library 5.11 internet ed」· DFM 代码 · 共 1,761 行 · 第 1/5 页

              '61701,"CELLPLUS"'
              '61710,"EMTEL"'
              '61801,"Omega"'
              '62001,"SPACEFON"'
              '62002,"Ghana Telecom Mobile GSM"'
              '62100,"Integrated Mobile Serv."'
              '62300,"TELECEL CENTRAFRIQUE"'
              '62402,"Mobilis"'
              '62501,"CVMOVEL"'
              '62802,"Celtel"'
              '63301,"CELLULAR SERVICES"'
              '63310,"AIRTEL"'
              '63401,"MobiTel"'
              '63510,"Rwandacell"'
              '63601,"ETMTN"'
              '63701,"BARAKAAT"'
              '63902,"SAFARICOM"'
              '63903,"KenCell"'
              '64001,"TRI - TELECOMMUNICATION"'
              '64003,"ZANTEL"'
              '64101,"CelTel Cellular"'
              '64110,"MTN-UGANDA"'
              '64202,"ANTARIS"'
              '64301,"mCel"'
              '64710,"SFR REUNION"'
              '64801,"NET*ONE"'
              '64803,"TELECEL"'
              '64804,"ECONET"'
              '64901,"MTC"'
              '65001,"CALLPOINT 900"'
              '65010,"Celtel"'
              '65101,"VODACOM LESOTHO"'
              '65201,"MASCOM"'
              '65202,"VISTA Cellular Pty (Ltd)"'
              '65310,"Swazi MTN Limited"'
              '65501,"VodaCom"'
              '65510,"MTN"'
              '73401,"INFONET"'
              '73402,"DIGITEL"'
              '74601,"ICMS"')
          end
          object Button2: TButton
            Left = 443
            Top = 89
            Width = 53
            Height = 30
            Caption = 'Load...'
            TabOrder = 5
            OnClick = Button2Click
          end
          object Button3: TButton
            Left = 443
            Top = 128
            Width = 53
            Height = 31
            Caption = 'Save..'
            TabOrder = 6
            OnClick = Button3Click
          end
        end
        object DA: TEdit
          Left = 20
          Top = 39
          Width = 237
          Height = 24
          TabOrder = 0
          Text = '[phone]'
        end
        object Message: TEdit
          Left = 20
          Top = 138
          Width = 405
          Height = 24
          TabOrder = 3
          Text = 'First Test-Message'
        end
        object BitBtn1: TBitBtn
          Left = 394
          Top = 516
          Width = 92
          Height = 30
          Caption = 'Send'
          TabOrder = 10
          OnClick = BitBtn1Click
        end
        object DeliveryNotification: TCheckBox
          Left = 217
          Top = 512
          Width = 149
          Height = 21
          Caption = 'delivery notification'
          TabOrder = 9
        end
        object DCS: TComboBox
          Left = 20
          Top = 512
          Width = 178
          Height = 24
          Style = csDropDownList
          ItemHeight = 16
          TabOrder = 8
          Items.Strings = (
            '0..Display immediately'
            '1..ME'
            '2..SIM'
            '3..TE')
        end
        object SMSKind: TComboBox
          Left = 20
          Top = 89
          Width = 237
          Height = 24
          Style = csDropDownList
          ItemHeight = 16
          TabOrder = 1
          OnChange = SMSKindChange
          Items.Strings = (
            'Text'
            'Smart Message (Nokia)'
            'EMS (Siemens, Sony, Ericsson, ...)'
            'Siemens SEO'
            'WAP Push')
        end
        object SMSKind2: TComboBox
          Left = 266
          Top = 89
          Width = 159
          Height = 24
          Style = csDropDownList
          ItemHeight = 0
          TabOrder = 2
          OnChange = SMSKindChange
        end
        object Blink: TButton
          Left = 433
          Top = 138
          Width = 26
          Height = 27
          Caption = '&Blk'
          TabOrder = 4
          TabStop = False
          OnClick = BlinkClick
        end
        object WapPushGB: TGroupBox
          Left = 16
          Top = 176
          Width = 505
          Height = 305
          Caption = 'Wap Push'
          TabOrder = 12
          object WPSLPanel: TPanel
            Left = 16
            Top = 24
            Width = 473
            Height = 273
            BevelOuter = bvNone
            Caption = ' '
            TabOrder = 1
            object Label22: TLabel
              Left = 8
              Top = 8
              Width = 25
              Height = 16
              Caption = 'Href'
            end
            object Label23: TLabel
              Left = 8
              Top = 56
              Width = 37
              Height = 16
              Caption = 'Action'
            end
            object slHref: TEdit
              Left = 8
              Top = 24
              Width = 465
              Height = 24
              TabOrder = 0
              Text = 'http://'
            end
            object slAction: TComboBox
              Left = 10
              Top = 73
              Width = 255
              Height = 24
              Style = csDropDownList
              ItemHeight = 16
              TabOrder = 1
              OnChange = SMSKindChange
              Items.Strings = (
                'execute-low'
                'execute-high'
                'cache')
            end
          end
          object WPCOPanel: TPanel
            Left = 16
            Top = 24
            Width = 481
            Height = 265
            BevelOuter = bvNone
            Caption = ' '
            TabOrder = 2
            object Label18: TLabel
              Left = 0
              Top = 0
              Width = 105
              Height = 16
              Caption = 'Invalidate objects'
            end
            object Label19: TLabel
              Left = 0
              Top = 112
              Width = 112
              Height = 16
              Caption = 'Invalidate services'
            end
            object coObjects: TMemo
              Left = 0
              Top = 24
              Width = 465
              Height = 81
              TabOrder = 0
            end
            object coServices: TMemo
              Left = 0
              Top = 136
              Width = 465
              Height = 121
              TabOrder = 1
            end
          end
          object WPSIPanel: TPanel
            Left = 16
            Top = 24
            Width = 481
            Height = 273
            BevelOuter = bvNone
            Caption = ' '
            TabOrder = 0
            object Label20: TLabel
              Left = 8
              Top = 8
              Width = 25
              Height = 16
              Caption = 'Href'
            end
            object Label21: TLabel
              Left = 8
              Top = 56
              Width = 37
              Height = 16
              Caption = 'Action'
            end
            object Label17: TLabel
              Left = 8
              Top = 104
              Width = 27
              Height = 16
              Caption = 'Si-id'
            end
            object Label15: TLabel
              Left = 8
              Top = 152
              Width = 60
              Height = 16
              Caption = 'Si-expires'
            end
            object siHref: TEdit
              Left = 8
              Top = 24
              Width = 465
              Height = 24
              TabOrder = 0
              Text = 'http://'
            end
            object siAction: TComboBox
              Left = 10
              Top = 73
              Width = 255
              Height = 24
              Style = csDropDownList
              ItemHeight = 16
              TabOrder = 1
              OnChange = SMSKindChange
              Items.Strings = (
                'signal-none'
                'signal-low'
                'signal-medium'
                'signal-high'
                'delete')
            end
            object siId: TEdit
              Left = 8
              Top = 120
              Width = 257
              Height = 24
              TabOrder = 2
            end
            object siSiExpires: TMaskEdit
              Left = 8
              Top = 168
              Width = 161
              Height = 24
              EditMask = '!99.99.9999 99:99:99;0;_'
              MaxLength = 19
              TabOrder = 3
            end
          end
        end
        object Spec: TComboBox
          Left = 20
          Top = 544
          Width = 178
          Height = 24
          Style = csDropDownList
          ItemHeight = 16
          TabOrder = 13
          Items.Strings = (
            'normal'
            'Unicode'
            'binary'
            'binary + UDHI')
        end
        object SEOGB: TGroupBox
          Left = 20
          Top = 177
          Width = 503
          Height = 326
          Caption = 'Siemens Exchange Object'
          TabOrder = 11
          object Label13: TLabel
            Left = 10
            Top = 20
            Width = 22
            Height = 16
            Caption = 'File'
            FocusControl = SEOFileName
          end
          object Label14: TLabel
            Left = 335
            Top = 20
            Width = 37
            Height = 16
            Caption = 'Name'
            FocusControl = SEOName
          end
          object SEOPicture: TImage
            Left = 10
            Top = 79
            Width = 484
            Height = 237
            Anchors = [akLeft, akTop, akRight, akBottom]