home *** CD-ROM | disk | FTP | other *** search
- object DlgAlert: TDlgAlert
- Left = 236
- Top = 106
- Width = 263
- Height = 225
- BorderWidth = 1
- Caption = 'Alert'
- Color = clBtnFace
- Constraints.MinHeight = 225
- Constraints.MinWidth = 263
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- OnShow = FormShow
- DesignSize = (
- 253
- 189)
- PixelsPerInch = 96
- TextHeight = 13
- object Image2: TImage
- Left = 0
- Top = 0
- Width = 253
- Height = 189
- Anchors = [akLeft, akTop, akRight, akBottom]
- Picture.Data = {<image000.bmp>}
- Stretch = True
- end
- object httpurl: TLabel
- Left = 2
- Top = 140
- Width = 37
- Height = 13
- Cursor = crHandPoint
- Alignment = taCenter
- Anchors = [akLeft, akRight, akBottom]
- Caption = 'httpurl'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold, fsUnderline]
- ParentFont = False
- Transparent = True
- OnClick = httpurlClick
- end
- object httpurl2: TLabel
- Left = 2
- Top = 162
- Width = 160
- Height = 16
- Cursor = crHandPoint
- Alignment = taCenter
- Anchors = [akLeft, akRight, akBottom]
- Caption = 'http://www.Raketu.com'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clBlue
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold, fsUnderline]
- ParentFont = False
- Transparent = True
- Visible = False
- OnClick = httpurlClick
- end
- object Title: TLabel
- Left = 6
- Top = 5
- Width = 110
- Height = 24
- Caption = 'Title of alert'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clMaroon
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Image1: TImage
- Left = 193
- Top = 145
- Width = 62
- Height = 28
- Cursor = crHandPoint
- Center = True
- Transparent = True
- Visible = False
- OnClick = httpurlClick
- end
- object Memo1: TMemo
- Left = 1
- Top = 32
- Width = 253
- Height = 105
- Align = alCustom
- Alignment = taCenter
- Anchors = [akLeft, akTop, akRight, akBottom]
- BevelKind = bkSoft
- BevelOuter = bvRaised
- Color = clWhite
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 0
- OnDblClick = DblClick
- end
- object BOK: TButton
- Left = 45
- Top = 162
- Width = 62
- Height = 22
- Anchors = [akBottom]
- Caption = 'OK'
- TabOrder = 1
- OnClick = BOKClick
- end
- object BClear: TButton
- Left = 141
- Top = 162
- Width = 62
- Height = 22
- Anchors = [akBottom]
- Caption = 'Clear'
- TabOrder = 2
- OnClick = BClearClick
- end
- object ApplicationEvents1: TApplicationEvents
- OnActivate = FormActivate
- OnRestore = FormActivate
- Left = 120
- Top = 128
- end
- end
-