home *** CD-ROM | disk | FTP | other *** search
- object frmRuler: TfrmRuler
- Left = 556
- Top = 276
- BorderIcons = []
- BorderStyle = bsNone
- ClientHeight = 220
- ClientWidth = 263
- Color = clSilver
- TransparentColorValue = clSilver
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- FormStyle = fsStayOnTop
- KeyPreview = True
- OldCreateOrder = False
- Scaled = False
- Visible = True
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnKeyDown = FormKeyDown
- OnMouseWheel = FormMouseWheel
- DesignSize = (
- 263
- 220)
- PixelsPerInch = 96
- TextHeight = 13
- object ShapeMain: TShape
- Tag = -1
- Left = 0
- Top = 0
- Width = 263
- Height = 220
- Align = alClient
- Brush.Style = bsClear
- ParentShowHint = False
- Pen.Style = psDot
- ShowHint = False
- end
- object ImageCenter: TImage
- Left = 120
- Top = 102
- Width = 13
- Height = 13
- Anchors = []
- Center = True
- ParentShowHint = False
- ShowHint = False
- Transparent = True
- end
- object ShapeLeftTop: TShape
- Left = 0
- Top = 0
- Width = 9
- Height = 9
- end
- object ShapeRightTop: TShape
- Left = 250
- Top = 0
- Width = 9
- Height = 9
- Anchors = [akTop, akRight]
- end
- object ShapeLeftCenter: TShape
- Left = 0
- Top = 92
- Width = 9
- Height = 9
- Anchors = [akLeft]
- end
- object ShapeRightBottom: TShape
- Left = 247
- Top = 206
- Width = 9
- Height = 9
- Anchors = [akRight, akBottom]
- end
- object ShapeTopCenter: TShape
- Left = 128
- Top = 0
- Width = 9
- Height = 9
- Anchors = [akTop]
- end
- object ShapeLeftBottom: TShape
- Left = 0
- Top = 207
- Width = 9
- Height = 9
- Anchors = [akLeft, akBottom]
- end
- object ShapeBottomCenter: TShape
- Left = 128
- Top = 207
- Width = 9
- Height = 9
- Anchors = [akBottom]
- end
- object ShapeRightCenter: TShape
- Left = 247
- Top = 89
- Width = 9
- Height = 9
- Anchors = [akRight]
- end
- object ImageBlack: TImage
- Left = 180
- Top = 139
- Width = 13
- Height = 13
- Anchors = []
- AutoSize = True
- Picture.Data = {<image000.bmp>}
- Transparent = True
- Visible = False
- end
- object ImageWhite: TImage
- Left = 158
- Top = 139
- Width = 13
- Height = 13
- Anchors = []
- AutoSize = True
- Picture.Data = {<image001.bmp>}
- Transparent = True
- Visible = False
- end
- end
-