| 1 | object Form1: TForm1 | 
 
 
 
 
 | 2 | Left = 0 | 
 
 
 
 
 | 3 | Top = 0 | 
 
 
 
 
 | 4 | BorderStyle = bsToolWindow | 
 
 
 
 
 | 5 | Caption = 'ONIWindowMover' | 
 
 
 
 
 | 6 | ClientHeight = 217 | 
 
 
 
 
 | 7 | ClientWidth = 121 | 
 
 
 
 
 | 8 | Color = clBtnFace | 
 
 
 
 
 | 9 | Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 | 10 | Font.Color = clWindowText | 
 
 
 
 
 | 11 | Font.Height = -11 | 
 
 
 
 
 | 12 | Font.Name = 'Tahoma' | 
 
 
 
 
 | 13 | Font.Style = [] | 
 
 
 
 
 | 14 | OldCreateOrder = False | 
 
 
 
 
 | 15 | OnCreate = FormCreate | 
 
 
 
 
 | 16 | PixelsPerInch = 96 | 
 
 
 
 
 | 17 | TextHeight = 13 | 
 
 
 
 
 | 18 | object grp_center: TGroupBox | 
 
 
 
 
 | 19 | Left = 0 | 
 
 
 
 
 | 20 | Top = 0 | 
 
 
 
 
 | 21 | Width = 121 | 
 
 
 
 
 | 22 | Height = 57 | 
 
 
 
 
 | 23 | Caption = 'Center ONI' | 
 
 
 
 
 | 24 | TabOrder = 0 | 
 
 
 
 
 | 25 | object btn_center: TButton | 
 
 
 
 
 | 26 | Left = 8 | 
 
 
 
 
 | 27 | Top = 16 | 
 
 
 
 
 | 28 | Width = 105 | 
 
 
 
 
 | 29 | Height = 33 | 
 
 
 
 
 | 30 | Caption = 'Please click me :D' | 
 
 
 
 
 | 31 | TabOrder = 0 | 
 
 
 
 
 | 32 | OnClick = btn_centerClick | 
 
 
 
 
 | 33 | end | 
 
 
 
 
 | 34 | end | 
 
 
 
 
 | 35 | object group_setxy: TGroupBox | 
 
 
 
 
 | 36 | Left = 0 | 
 
 
 
 
 | 37 | Top = 64 | 
 
 
 
 
 | 38 | Width = 121 | 
 
 
 
 
 | 39 | Height = 97 | 
 
 
 
 
 | 40 | Caption = 'Set x/y-position' | 
 
 
 
 
 | 41 | TabOrder = 1 | 
 
 
 
 
 | 42 | object edit_x: TCrossEdit | 
 
 
 
 
 | 43 | Left = 8 | 
 
 
 
 
 | 44 | Top = 16 | 
 
 
 
 
 | 45 | Width = 105 | 
 
 
 
 
 | 46 | Height = 17 | 
 
 
 
 
 | 47 | AutoSize = False | 
 
 
 
 
 | 48 | BorderStyle = bsNone | 
 
 
 
 
 | 49 | Color = clWhite | 
 
 
 
 
 | 50 | Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 | 51 | Font.Color = clWindowText | 
 
 
 
 
 | 52 | Font.Height = -11 | 
 
 
 
 
 | 53 | Font.Name = 'Tahoma' | 
 
 
 
 
 | 54 | Font.Style = [] | 
 
 
 
 
 | 55 | ParentFont = False | 
 
 
 
 
 | 56 | TabOrder = 0 | 
 
 
 
 
 | 57 | Text = '0' | 
 
 
 
 
 | 58 | FocusAlignment = taLeftJustify | 
 
 
 
 
 | 59 | NoFocusAlignment = taRightJustify | 
 
 
 
 
 | 60 | Precision = 15 | 
 
 
 
 
 | 61 | Decimals = 2 | 
 
 
 
 
 | 62 | FocusWidthInc = 0 | 
 
 
 
 
 | 63 | EditType = etInteger | 
 
 
 
 
 | 64 | NextDialogOnEnter = True | 
 
 
 
 
 | 65 | DialogOnCursorKeys = True | 
 
 
 
 
 | 66 | NextPriorStep = 1 | 
 
 
 
 
 | 67 | AutoFocus = False | 
 
 
 
 
 | 68 | LimitCheck = True | 
 
 
 
 
 | 69 | Max = 1024.000000000000000000 | 
 
 
 
 
 | 70 | FocusColor = clWhite | 
 
 
 
 
 | 71 | NoFocusColor = clWhite | 
 
 
 
 
 | 72 | ErrorColor = clRed | 
 
 
 
 
 | 73 | StringCharSet = scFull | 
 
 
 
 
 | 74 | end | 
 
 
 
 
 | 75 | object edit_y: TCrossEdit | 
 
 
 
 
 | 76 | Left = 8 | 
 
 
 
 
 | 77 | Top = 40 | 
 
 
 
 
 | 78 | Width = 105 | 
 
 
 
 
 | 79 | Height = 17 | 
 
 
 
 
 | 80 | AutoSize = False | 
 
 
 
 
 | 81 | BorderStyle = bsNone | 
 
 
 
 
 | 82 | Color = clWhite | 
 
 
 
 
 | 83 | Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 | 84 | Font.Color = clWindowText | 
 
 
 
 
 | 85 | Font.Height = -11 | 
 
 
 
 
 | 86 | Font.Name = 'Tahoma' | 
 
 
 
 
 | 87 | Font.Style = [] | 
 
 
 
 
 | 88 | ParentFont = False | 
 
 
 
 
 | 89 | TabOrder = 1 | 
 
 
 
 
 | 90 | Text = '0' | 
 
 
 
 
 | 91 | FocusAlignment = taLeftJustify | 
 
 
 
 
 | 92 | NoFocusAlignment = taRightJustify | 
 
 
 
 
 | 93 | Precision = 15 | 
 
 
 
 
 | 94 | Decimals = 2 | 
 
 
 
 
 | 95 | FocusWidthInc = 0 | 
 
 
 
 
 | 96 | EditType = etInteger | 
 
 
 
 
 | 97 | NextDialogOnEnter = True | 
 
 
 
 
 | 98 | DialogOnCursorKeys = True | 
 
 
 
 
 | 99 | NextPriorStep = 1 | 
 
 
 
 
 | 100 | AutoFocus = False | 
 
 
 
 
 | 101 | LimitCheck = True | 
 
 
 
 
 | 102 | Max = 768.000000000000000000 | 
 
 
 
 
 | 103 | FocusColor = clWhite | 
 
 
 
 
 | 104 | NoFocusColor = clWhite | 
 
 
 
 
 | 105 | ErrorColor = clRed | 
 
 
 
 
 | 106 | StringCharSet = scFull | 
 
 
 
 
 | 107 | end | 
 
 
 
 
 | 108 | object btn_setxy: TButton | 
 
 
 
 
 | 109 | Left = 8 | 
 
 
 
 
 | 110 | Top = 64 | 
 
 
 
 
 | 111 | Width = 105 | 
 
 
 
 
 | 112 | Height = 25 | 
 
 
 
 
 | 113 | Caption = 'Set x/y' | 
 
 
 
 
 | 114 | TabOrder = 2 | 
 
 
 
 
 | 115 | OnClick = btn_setxyClick | 
 
 
 
 
 | 116 | end | 
 
 
 
 
 | 117 | end | 
 
 
 
 
 | 118 | object group_black: TGroupBox | 
 
 
 
 
 | 119 | Left = 0 | 
 
 
 
 
 | 120 | Top = 168 | 
 
 
 
 
 | 121 | Width = 121 | 
 
 
 
 
 | 122 | Height = 49 | 
 
 
 
 
 | 123 | Caption = 'Open BlackScreen' | 
 
 
 
 
 | 124 | TabOrder = 2 | 
 
 
 
 
 | 125 | object btn_black: TButton | 
 
 
 
 
 | 126 | Left = 8 | 
 
 
 
 
 | 127 | Top = 16 | 
 
 
 
 
 | 128 | Width = 105 | 
 
 
 
 
 | 129 | Height = 25 | 
 
 
 
 
 | 130 | Caption = '...' | 
 
 
 
 
 | 131 | TabOrder = 0 | 
 
 
 
 
 | 132 | OnClick = btn_blackClick | 
 
 
 
 
 | 133 | end | 
 
 
 
 
 | 134 | end | 
 
 
 
 
 | 135 | object timer_check: TTimer | 
 
 
 
 
 | 136 | OnTimer = timer_checkTimer | 
 
 
 
 
 | 137 | Left = 48 | 
 
 
 
 
 | 138 | Top = 104 | 
 
 
 
 
 | 139 | end | 
 
 
 
 
 | 140 | end |