home *** CD-ROM | disk | FTP | other *** search
- object NetMsgForm: TNetMsgForm
- Left = 285
- Top = 137
- BorderStyle = bsDialog
- Caption = 'Net Messages'
- ClientHeight = 235
- ClientWidth = 413
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poOwnerFormCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object Label2: TLabel
- Left = 5
- Top = 3
- Width = 185
- Height = 29
- Caption = 'Did You Know...'
- Font.Charset = ANSI_CHARSET
- Font.Color = clGray
- Font.Height = -24
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label1: TLabel
- Left = 4
- Top = 5
- Width = 185
- Height = 29
- Caption = 'Did You Know...'
- Font.Charset = ANSI_CHARSET
- Font.Color = clRed
- Font.Height = -24
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object GoURLLabel: TURLLabel
- Left = 8
- Top = 124
- Width = 317
- Height = 13
- Cursor = crHandPoint
- Alignment = taCenter
- AutoSize = False
- Caption = 'Go There'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- ColorMoveOver = clRed
- end
- object ProgressLabel: TLabel
- Left = 4
- Top = 124
- Width = 136
- Height = 13
- Caption = 'Updating. Please Wait..'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Visible = False
- end
- object Bevel1: TBevel
- Left = 4
- Top = 36
- Width = 405
- Height = 9
- Shape = bsTopLine
- end
- object TotalLabel: TLabel
- Left = 236
- Top = 12
- Width = 169
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'TotalLabel'
- end
- object ShowCheck: TCheckBox
- Left = 4
- Top = 212
- Width = 265
- Height = 17
- Caption = 'Show Net Messages when the application starts'
- Checked = True
- State = cbChecked
- TabOrder = 5
- end
- object MsgRichEdit: TRichEdit
- Left = 4
- Top = 48
- Width = 317
- Height = 69
- TabStop = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 0
- end
- object GroupBox1: TGroupBox
- Left = 4
- Top = 144
- Width = 401
- Height = 57
- Caption = 'Update from the Internet'
- TabOrder = 4
- object SettingCheck: TCheckBox
- Left = 96
- Top = 24
- Width = 73
- Height = 17
- Hint =
- 'Check this if you connect to the internet through a proxy server' +
- '.'
- Caption = 'Use Proxy'
- TabOrder = 1
- OnClick = SettingCheckClick
- end
- object SettingPanel: TPanel
- Left = 184
- Top = 16
- Width = 201
- Height = 29
- BevelOuter = bvNone
- TabOrder = 2
- object Label4: TLabel
- Left = 4
- Top = 8
- Width = 34
- Height = 13
- Caption = 'Server:'
- end
- object Label3: TLabel
- Left = 140
- Top = 8
- Width = 22
- Height = 13
- Caption = 'Port:'
- end
- object ProxyEdit: TEdit
- Left = 44
- Top = 4
- Width = 83
- Height = 21
- TabOrder = 0
- end
- object ProxyPortEdit: TEdit
- Left = 168
- Top = 4
- Width = 29
- Height = 21
- Hint = 'Enter the proxy port here'
- TabOrder = 1
- end
- end
- object UpdateBtn: TBitBtn
- Left = 8
- Top = 20
- Width = 75
- Height = 25
- Caption = '&Update'
- TabOrder = 0
- OnClick = UpdateBtnClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 04000000000080000000120B0000120B00001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
- DADAADAD7444447DADADDAD444444444DADAAD444DADAD444DADD744DADADAD4
- 47DAA44DADA22DA744ADD44ADA2222DA44DAA44DAD2222AD44ADD44ADAD22ADA
- DADAA447ADADADAD44ADD744DA4ADADADADAAD444D44ADA47DADDAD444444ADA
- DADAADAD74444DADADADDADADA44DADADADAADADAD4DADADADAD}
- end
- end
- object CloseBtn: TBitBtn
- Left = 332
- Top = 108
- Width = 75
- Height = 25
- Caption = '&Close '
- TabOrder = 3
- Kind = bkCancel
- end
- object PreviousBtn: TBitBtn
- Left = 332
- Top = 48
- Width = 75
- Height = 25
- Caption = '&Previous'
- TabOrder = 1
- OnClick = PreviousBtnClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 04000000000080000000CE0E0000D80E00001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 77777777777777777777777770777777777777770077777777777770E0777777
- 7777770EE0000000777770EEEEEEEEE077770EEEEEEEEEE0000070EEEEEEEEE0
- FFF0770EE000000088F07770E070FFFFFFF077770070F88888F077777070FFFF
- FFF0777777744444444477777774444444447777777777777777}
- end
- object NextBtn: TBitBtn
- Left = 332
- Top = 76
- Width = 75
- Height = 25
- Caption = '&Next '
- TabOrder = 2
- OnClick = NextBtnClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 04000000000080000000CE0E0000D80E00001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 777777777777777777777777777777077777777777777700777777777777770E
- 077777770000000EE07777770EEEEEEEEE0700000EEEEEEEEEE00FFF0EEEEEEE
- EE070F880000000EE0770FFFFFFF070E07770F88888F070077770FFFFFFF0707
- 7777444444444777777744444444477777777777777777777777}
- end
- object HTTP: TNMHTTP
- Port = 80
- TimeOut = 30000
- ReportLevel = 0
- Body = 'NetMsg.msg'
- Header = 'NetHdr.msg'
- InputFileMode = False
- OutputFileMode = False
- ProxyPort = 0
- Left = 381
- Top = 204
- end
- end
-