home *** CD-ROM | disk | FTP | other *** search
- object MainForm: TMainForm
- Left = 374
- Top = 214
- BorderIcons = []
- BorderStyle = bsNone
- ClientHeight = 273
- ClientWidth = 427
- Color = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- FormStyle = fsStayOnTop
- Icon.Data = {<image000.ico>}
- KeyPreview = True
- OldCreateOrder = True
- WindowState = wsMaximized
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnHide = FormHide
- OnKeyDown = FormKeyDown
- OnKeyPress = FormKeyPress
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 16
- object pic: TImageEn
- Left = 0
- Top = 0
- Width = 427
- Height = 273
- Background = clBlack
- ParentCtl3D = False
- BorderStyle = bsNone
- Center = True
- AutoFit = True
- Align = alClient
- TabOrder = 0
- OnMouseDown = picMouseDown
- OnMouseUp = picMouseUp
- PreviewFont.Charset = DEFAULT_CHARSET
- PreviewFont.Color = clWindowText
- PreviewFont.Height = -11
- PreviewFont.Name = 'MS Sans Serif'
- PreviewFont.Style = []
- object Label1: TLabel
- Left = 16
- Top = 8
- Width = 36
- Height = 16
- Caption = 'name'
- Color = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Visible = False
- end
- object Label2: TLabel
- Left = 16
- Top = 32
- Width = 59
- Height = 16
- Caption = 'comment'
- Color = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Visible = False
- end
- end
- object UpdateScreen: TTimer
- Enabled = False
- Interval = 10000
- OnTimer = UpdateScreenTimer
- end
- object showlabel: TTimer
- Enabled = False
- Interval = 100
- OnTimer = showlabelTimer
- Left = 8
- Top = 72
- end
- end
-