object MyDebug_Form: TMyDebug_Form Left = 520 Top = 328 BorderIcons = [biSystemMenu, biMinimize] Caption = #12487#12496#12483#12464 ClientHeight = 230 ClientWidth = 364 Color = clBtnFace Font.Charset = SHIFTJIS_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #65325#65331' '#65328#12468#12471#12483#12463 Font.Style = [] OldCreateOrder = False Scaled = False OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnKeyUp = FormKeyUp OnResize = FormResize PixelsPerInch = 96 TextHeight = 12 object Panel_Cmd: TPanel Left = 0 Top = 200 Width = 364 Height = 30 Align = alBottom BevelOuter = bvNone TabOrder = 0 DesignSize = ( 364 30) object Button_Clear: TButton Left = 84 Top = 5 Width = 75 Height = 21 Caption = #12463#12522#12450 TabOrder = 0 OnClick = Button_ClearClick end object Button_Close: TButton Left = 277 Top = 5 Width = 75 Height = 21 Anchors = [akTop, akRight] Caption = #38281#12376#12427 TabOrder = 1 OnClick = Button_CloseClick end object CheckBox_Pause: TCheckBox Left = 8 Top = 7 Width = 73 Height = 17 Caption = #19968#26178#20572#27490 TabOrder = 2 end end object StringGrid_Info: TStringGrid Left = 0 Top = 0 Width = 185 Height = 113 BorderStyle = bsNone ColCount = 1 DefaultRowHeight = 16 DefaultDrawing = False DrawingStyle = gdsClassic FixedCols = 0 RowCount = 1 FixedRows = 0 Font.Charset = SHIFTJIS_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #65325#65331' '#12468#12471#12483#12463 Font.Style = [] Options = [goFixedVertLine, goFixedHorzLine, goRowSelect, goThumbTracking] ParentFont = False PopupMenu = PopupMenu1 ScrollBars = ssVertical TabOrder = 1 OnDrawCell = StringGrid_InfoDrawCell ColWidths = ( 64) RowHeights = ( 16) end object Edit_Message: TEdit Left = 191 Top = 8 Width = 105 Height = 20 AutoSelect = False AutoSize = False BevelInner = bvNone BevelOuter = bvNone BorderStyle = bsNone TabOrder = 2 Text = ' 14 0 0 EC+AF8-PAUSED +MN0w/DC6iYFsQjBMW4xOhj' + 'BXMF8wAg-' Visible = False OnChange = Edit_MessageChange end object ActionList_Key: TActionList Left = 8 Top = 120 object actKey_Up: TAction Category = #12461#12540 Caption = 'Up' SecondaryShortCuts.Strings = ( 'Shift+Up' 'Ctrl+Up' 'Shift+Ctrl+Up') ShortCut = 38 OnExecute = actKey_DownExecute end object actKey_Down: TAction Category = #12461#12540 Caption = 'Down' SecondaryShortCuts.Strings = ( 'Shift+Down' 'Ctrl+Down' 'Shift+Ctrl+Down') ShortCut = 40 OnExecute = actKey_DownExecute end object actKey_Left: TAction Category = #12461#12540 Caption = 'Left' SecondaryShortCuts.Strings = ( 'Shift+Left' 'Ctrl+Left' 'Shift+Ctrl+Left') ShortCut = 37 OnExecute = actKey_DownExecute end object actKey_Right: TAction Category = #12461#12540 Caption = 'Right' SecondaryShortCuts.Strings = ( 'Shift+Right' 'Ctrl+Right' 'Shift+Ctrl+Right') ShortCut = 39 OnExecute = actKey_DownExecute end object actKey_PgUp: TAction Category = #12461#12540 Caption = 'PgUp' SecondaryShortCuts.Strings = ( 'Shift+PgUp' 'Ctrl+PgUp' 'Shift+Ctrl+PgUp') ShortCut = 33 OnExecute = actKey_DownExecute end object actKey_PgDn: TAction Category = #12461#12540 Caption = 'PgDn' SecondaryShortCuts.Strings = ( 'Shift+PgDn' 'Ctrl+PgDn' 'Shift+Ctrl+PgDn') ShortCut = 34 OnExecute = actKey_DownExecute end object actKey_BkSp: TAction Category = #12461#12540 Caption = 'BkSp' SecondaryShortCuts.Strings = ( 'Shift+BkSp' 'Ctrl+BkSp' 'Shift+Ctrl+BkSp') ShortCut = 8 OnExecute = actKey_DownExecute end object actKey_Del: TAction Category = #12461#12540 Caption = 'Del' SecondaryShortCuts.Strings = ( 'Shift+Del' 'Ctrl+Del' 'Shift+Ctrl+Del') ShortCut = 46 OnExecute = actKey_DownExecute end object actKey_Home: TAction Category = #12461#12540 Caption = 'Home' SecondaryShortCuts.Strings = ( 'Shift+Home' 'Ctrl+Home' 'Shift+Ctrl+Home') ShortCut = 36 OnExecute = actKey_DownExecute end object actKey_End: TAction Category = #12461#12540 Caption = 'End' SecondaryShortCuts.Strings = ( 'Shift+End' 'Ctrl+End' 'Shift+Ctrl+End') ShortCut = 35 OnExecute = actKey_DownExecute end object actKey_Esc: TAction Category = #12461#12540 Caption = 'Esc' SecondaryShortCuts.Strings = ( 'Shift+Esc' 'Ctrl+Esc' 'Shift+Ctrl+Esc') ShortCut = 27 OnExecute = actKey_DownExecute end object actKey_Space: TAction Category = #12461#12540 Caption = 'Space' SecondaryShortCuts.Strings = ( 'Shift+Space' 'Ctrl+Space' 'Shift+Ctrl+Space') ShortCut = 32 OnExecute = actKey_PressExecute end object actKey_A: TAction Category = #12461#12540 Caption = 'A' SecondaryShortCuts.Strings = ( 'Shift+A') ShortCut = 65 OnExecute = actKey_PressExecute end object actKey_B: TAction Category = #12461#12540 Caption = 'B' SecondaryShortCuts.Strings = ( 'Shift+B' 'Ctrl+B' 'Shift+Ctrl+B') ShortCut = 66 OnExecute = actKey_PressExecute end object actKey_C: TAction Category = #12461#12540 Caption = 'C' SecondaryShortCuts.Strings = ( 'Shift+C' 'Ctrl+C' 'Shift+Ctrl+C') ShortCut = 67 OnExecute = actKey_PressExecute end object actKey_D: TAction Category = #12461#12540 Caption = 'D' SecondaryShortCuts.Strings = ( 'Shift+D' 'Ctrl+D' 'Shift+Ctrl+D') ShortCut = 68 OnExecute = actKey_PressExecute end object actKey_E: TAction Category = #12461#12540 Caption = 'E' SecondaryShortCuts.Strings = ( 'Shift+E' 'Ctrl+E' 'Shift+Ctrl+E') ShortCut = 69 OnExecute = actKey_PressExecute end object actKey_F: TAction Category = #12461#12540 Caption = 'F' SecondaryShortCuts.Strings = ( 'Shift+F' 'Ctrl+F' 'Shift+Ctrl+F') ShortCut = 70 OnExecute = actKey_PressExecute end object actKey_G: TAction Category = #12461#12540 Caption = 'G' SecondaryShortCuts.Strings = ( 'Shift+G' 'Ctrl+G' 'Shift+Ctrl+G') ShortCut = 71 OnExecute = actKey_PressExecute end object actKey_H: TAction Category = #12461#12540 Caption = 'H' SecondaryShortCuts.Strings = ( 'Shift+H' 'Ctrl+H' 'Shift+Ctrl+H') ShortCut = 72 OnExecute = actKey_PressExecute end object actKey_I: TAction Category = #12461#12540 Caption = 'I' SecondaryShortCuts.Strings = ( 'Shift+I' 'Ctrl+I' 'Shift+Ctrl+I') ShortCut = 73 OnExecute = actKey_PressExecute end object actKey_J: TAction Category = #12461#12540 Caption = 'J' SecondaryShortCuts.Strings = ( 'Shift+J' 'Ctrl+J' 'Shift+Ctrl+J') ShortCut = 74 OnExecute = actKey_PressExecute end object actKey_K: TAction Category = #12461#12540 Caption = 'K' SecondaryShortCuts.Strings = ( 'Shift+K' 'Ctrl+K' 'Shift+Ctrl+K') ShortCut = 75 OnExecute = actKey_PressExecute end object actKey_L: TAction Category = #12461#12540 Caption = 'L' SecondaryShortCuts.Strings = ( 'Shift+L' 'Ctrl+L' 'Shift+Ctrl+L') ShortCut = 76 OnExecute = actKey_PressExecute end object actKey_M: TAction Category = #12461#12540 Caption = 'M' SecondaryShortCuts.Strings = ( 'Shift+M' 'Ctrl+M' 'Shift+Ctrl+M') ShortCut = 77 OnExecute = actKey_PressExecute end object actKey_N: TAction Category = #12461#12540 Caption = 'N' SecondaryShortCuts.Strings = ( 'Shift+N' 'Ctrl+N' 'Shift+Ctrl+N') ShortCut = 78 OnExecute = actKey_PressExecute end object actKey_O: TAction Category = #12461#12540 Caption = 'O' SecondaryShortCuts.Strings = ( 'Shift+O' 'Ctrl+O' 'Shift+Ctrl+O') ShortCut = 79 OnExecute = actKey_PressExecute end object actKey_P: TAction Category = #12461#12540 Caption = 'P' SecondaryShortCuts.Strings = ( 'Shift+P' 'Ctrl+P' 'Shift+Ctrl+P') ShortCut = 80 OnExecute = actKey_PressExecute end object actKey_Q: TAction Category = #12461#12540 Caption = 'Q' SecondaryShortCuts.Strings = ( 'Shift+Q') ShortCut = 81 OnExecute = actKey_PressExecute end object actKey_R: TAction Category = #12461#12540 Caption = 'R' SecondaryShortCuts.Strings = ( 'Shift+R' 'Ctrl+R' 'Shift+Ctrl+R') ShortCut = 82 OnExecute = actKey_PressExecute end object actKey_S: TAction Category = #12461#12540 Caption = 'S' SecondaryShortCuts.Strings = ( 'Shift+S' 'Ctrl+S' 'Shift+Ctrl+S') ShortCut = 83 OnExecute = actKey_PressExecute end object actKey_T: TAction Category = #12461#12540 Caption = 'T' SecondaryShortCuts.Strings = ( 'Shift+T' 'Ctrl+T' 'Shift+Ctrl+T') ShortCut = 84 OnExecute = actKey_PressExecute end object actKey_U: TAction Category = #12461#12540 Caption = 'U' SecondaryShortCuts.Strings = ( 'Shift+U' 'Ctrl+U' 'Shift+Ctrl+U') ShortCut = 85 OnExecute = actKey_PressExecute end object actKey_V: TAction Category = #12461#12540 Caption = 'V' SecondaryShortCuts.Strings = ( 'Shift+V' 'Ctrl+V' 'Shift+Ctrl+V') ShortCut = 86 OnExecute = actKey_PressExecute end object actKey_W: TAction Category = #12461#12540 Caption = 'W' SecondaryShortCuts.Strings = ( 'Shift+W' 'Ctrl+W' 'Shift+Ctrl+W') ShortCut = 87 OnExecute = actKey_PressExecute end object actKey_X: TAction Category = #12461#12540 Caption = 'X' SecondaryShortCuts.Strings = ( 'Shift+X' 'Ctrl+X' 'Shift+Ctrl+X') ShortCut = 88 OnExecute = actKey_PressExecute end object actKey_Y: TAction Category = #12461#12540 Caption = 'Y' SecondaryShortCuts.Strings = ( 'Shift+Y' 'Ctrl+Y' 'Shift+Ctrl+Y') ShortCut = 89 OnExecute = actKey_PressExecute end object actKey_Z: TAction Category = #12461#12540 Caption = 'Z' SecondaryShortCuts.Strings = ( 'Shift+Z' 'Ctrl+Z' 'Shift+Ctrl+Z') ShortCut = 90 OnExecute = actKey_PressExecute end end object PopupMenu1: TPopupMenu AutoHotkeys = maManual AutoLineReduction = maManual Left = 40 Top = 120 object MenuItem_PList_Copy: TMenuItem Caption = #12467#12500#12540 OnClick = MenuItem_PList_CopyClick end end end