home *** CD-ROM | disk | FTP | other *** search
- inherited frmScreenInfo: TfrmScreenInfo
- Left = 274
- Top = 283
- HelpContext = 1
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsToolWindow
- ClientHeight = 141
- ClientWidth = 276
- Color = clBtnShadow
- FormStyle = fsStayOnTop
- OnCloseQuery = FormCloseQuery
- OnKeyDown = FormKeyDown
- PixelsPerInch = 96
- TextHeight = 13
- object ImageWin: TImage
- Left = 48
- Top = 104
- Width = 32
- Height = 32
- Center = True
- Picture.Data = {<image000.ico>}
- Transparent = True
- Visible = False
- end
- object ShapeCursor: TShape
- Left = 186
- Top = 2
- Width = 80
- Height = 79
- Brush.Color = clWindow
- Pen.Style = psClear
- Shape = stRoundRect
- end
- object ChLabelWI: TChLabel
- Tag = 531
- Left = 8
- Top = 1
- Width = 80
- Height = 20
- Cursor = crHandPoint
- Alignment = taCenter
- AutoSize = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBtnShadow
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- Layout = tlCenter
- OnMouseDown = ChLabelWIMouseDown
- OnMouseEnter = ChLabelWIMouseEnter
- OnMouseLeave = ChLabelWIMouseLeave
- end
- object ChLabel1: TChLabel
- Tag = 532
- Left = 88
- Top = 1
- Width = 80
- Height = 20
- Cursor = crHandPoint
- Alignment = taCenter
- AutoSize = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBtnShadow
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- Layout = tlCenter
- OnMouseDown = ChLabelWIMouseDown
- OnMouseEnter = ChLabelWIMouseEnter
- OnMouseLeave = ChLabelWIMouseLeave
- end
- object ChLabel2: TChLabel
- Tag = 533
- Left = 168
- Top = 1
- Width = 80
- Height = 20
- Cursor = crHandPoint
- Alignment = taCenter
- AutoSize = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBtnShadow
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- Layout = tlCenter
- OnMouseDown = ChLabelWIMouseDown
- OnMouseEnter = ChLabelWIMouseEnter
- OnMouseLeave = ChLabelWIMouseLeave
- end
- object PanelWI: TPanel
- Tag = 531
- Left = 0
- Top = 20
- Width = 280
- Height = 60
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 0
- object LabelWinCaptionText: TLabel
- Tag = 521
- Left = 56
- Top = 8
- Width = 6
- Height = 13
- Caption = '*'
- end
- object LabelWinClassText: TLabel
- Tag = 522
- Left = 56
- Top = 24
- Width = 6
- Height = 13
- Caption = '*'
- end
- object ImageWinIcon: TImage
- Left = 8
- Top = 8
- Width = 32
- Height = 32
- Center = True
- Transparent = True
- end
- object LabelHandle: TLabel
- Tag = 525
- Left = 56
- Top = 40
- Width = 6
- Height = 13
- Caption = '*'
- end
- object EditWinCaption: TEdit
- Left = 72
- Top = 8
- Width = 31
- Height = 13
- BorderStyle = bsNone
- ReadOnly = True
- TabOrder = 0
- Text = '*'
- OnChange = EditWinCaptionChange
- end
- object EditWinClass: TEdit
- Left = 72
- Top = 24
- Width = 39
- Height = 13
- BorderStyle = bsNone
- ReadOnly = True
- TabOrder = 1
- Text = '*'
- OnChange = EditWinCaptionChange
- end
- object EditHandle: TEdit
- Left = 72
- Top = 40
- Width = 201
- Height = 13
- BorderStyle = bsNone
- ReadOnly = True
- TabOrder = 2
- Text = '*'
- OnChange = EditWinCaptionChange
- end
- end
- object PanelColors: TPanel
- Tag = 532
- Left = 0
- Top = 20
- Width = 280
- Height = 60
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 1
- object PaintBoxLupe: TPaintBox
- Left = 8
- Top = 8
- Width = 33
- Height = 33
- end
- object Shape1: TShape
- Left = 7
- Top = 7
- Width = 35
- Height = 35
- Brush.Style = bsClear
- Pen.Color = clAppWorkSpace
- end
- object LabelColor: TLabel
- Tag = 520
- Left = 74
- Top = 7
- Width = 6
- Height = 13
- Caption = '*'
- end
- object Label2: TLabel
- Left = 234
- Top = 7
- Width = 11
- Height = 13
- Alignment = taRightJustify
- Caption = 'R:'
- end
- object LabelGrayscale: TLabel
- Tag = 523
- Left = 74
- Top = 24
- Width = 6
- Height = 13
- Caption = '*'
- end
- object Label1: TLabel
- Left = 234
- Top = 24
- Width = 11
- Height = 13
- Alignment = taRightJustify
- Caption = 'G:'
- end
- object Label3: TLabel
- Left = 235
- Top = 41
- Width = 10
- Height = 13
- Alignment = taRightJustify
- Caption = 'B:'
- end
- object ShapeRGB: TShape
- Left = 56
- Top = 7
- Width = 13
- Height = 13
- Pen.Color = clBtnShadow
- end
- object ShapeGray: TShape
- Left = 56
- Top = 24
- Width = 13
- Height = 13
- Pen.Color = clBtnShadow
- end
- object ShapeR: TShape
- Left = 216
- Top = 7
- Width = 13
- Height = 13
- Pen.Style = psClear
- end
- object ShapeG: TShape
- Left = 216
- Top = 24
- Width = 13
- Height = 13
- Pen.Style = psClear
- end
- object ShapeB: TShape
- Left = 216
- Top = 41
- Width = 13
- Height = 13
- Pen.Style = psClear
- end
- object LabelFactor: TLabel
- Left = 74
- Top = 40
- Width = 6
- Height = 13
- Caption = '*'
- end
- object ShapeLF: TShape
- Left = 56
- Top = 41
- Width = 13
- Height = 13
- Brush.Color = clWindow
- Pen.Color = clBtnShadow
- end
- object UpDownLupe: TUpDown
- Left = 12
- Top = 43
- Width = 25
- Height = 12
- Min = 1
- Max = 3
- Orientation = udHorizontal
- Position = 1
- TabOrder = 0
- Wrap = False
- OnChangingEx = UpDownLupeChangingEx
- end
- object EditColor: TEdit
- Left = 90
- Top = 7
- Width = 49
- Height = 13
- BorderStyle = bsNone
- ReadOnly = True
- TabOrder = 1
- Text = '*'
- OnChange = EditWinCaptionChange
- end
- object EditR: TEdit
- Left = 248
- Top = 7
- Width = 20
- Height = 13
- BorderStyle = bsNone
- ReadOnly = True
- TabOrder = 3
- Text = '*'
- OnChange = EditWinCaptionChange
- end
- object EditGrayScale: TEdit
- Left = 90
- Top = 24
- Width = 20
- Height = 13
- BorderStyle = bsNone
- ReadOnly = True
- TabOrder = 2
- Text = '*'
- OnChange = EditWinCaptionChange
- end
- object EditG: TEdit
- Left = 248
- Top = 24
- Width = 20
- Height = 13
- BorderStyle = bsNone
- ReadOnly = True
- TabOrder = 4
- Text = '*'
- OnChange = EditWinCaptionChange
- end
- object EditB: TEdit
- Left = 248
- Top = 41
- Width = 20
- Height = 13
- BorderStyle = bsNone
- ReadOnly = True
- TabOrder = 5
- Text = '*'
- OnChange = EditWinCaptionChange
- end
- end
- object PanelDispix: TPanel
- Tag = 533
- Left = 0
- Top = 20
- Width = 280
- Height = 60
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 2
- object LabelPos: TLabel
- Tag = 524
- Left = 56
- Top = 8
- Width = 6
- Height = 13
- Caption = '*'
- end
- object ImageDispix: TImage
- Left = 8
- Top = 8
- Width = 32
- Height = 32
- Center = True
- Picture.Data = {<image001.ico>}
- Transparent = True
- end
- object EditPosition: TEdit
- Left = 74
- Top = 8
- Width = 31
- Height = 13
- BorderStyle = bsNone
- ReadOnly = True
- TabOrder = 0
- Text = '*'
- OnChange = EditWinCaptionChange
- end
- object ButtonCopy: TButton
- Tag = 527
- Left = 208
- Top = 4
- Width = 65
- Height = 21
- TabOrder = 1
- OnClick = ButtonCopyClick
- end
- object CBBorder: TCheckBox
- Tag = 529
- Left = 152
- Top = 34
- Width = 81
- Height = 17
- AllowGrayed = True
- State = cbGrayed
- TabOrder = 3
- OnClick = ButtonCopyClick
- end
- object CBInvert: TCheckBox
- Tag = 534
- Left = 56
- Top = 34
- Width = 65
- Height = 17
- TabOrder = 2
- OnClick = ButtonCopyClick
- end
- end
- object Timer1: TTimer
- Interval = 1
- OnTimer = Timer1Timer
- Left = 8
- Top = 104
- end
- end
-