object MyDebug_Form: TMyDebug_Form Left = 329 Top = 117 AutoScroll = False BorderIcons = [biSystemMenu, biMinimize] Caption = #12487#12496#12483#12464 ClientHeight = 282 ClientWidth = 476 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 Position = poDefaultPosOnly Scaled = False OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnKeyUp = FormKeyUp OnResize = FormResize PixelsPerInch = 96 TextHeight = 12 object pnlCmd: TPanel Left = 0 Top = 252 Width = 476 Height = 30 Align = alBottom BevelOuter = bvNone TabOrder = 0 DesignSize = ( 476 30) object btnClear: TButton Left = 84 Top = 5 Width = 75 Height = 21 Caption = #12463#12522#12450 TabOrder = 0 OnClick = btnClearClick end object btnClose: TButton Left = 397 Top = 5 Width = 75 Height = 21 Anchors = [akTop, akRight] Caption = #38281#12376#12427 TabOrder = 1 OnClick = btnCloseClick end object btnWriteLog: TButton Left = 164 Top = 5 Width = 75 Height = 21 Caption = #26360#12365#20986#12375 TabOrder = 2 OnClick = btnWriteLogClick end object chkPause: TCheckBox Left = 8 Top = 7 Width = 73 Height = 17 Caption = #19968#26178#20572#27490 TabOrder = 3 end object Button_Copy: TButton Left = 244 Top = 5 Width = 75 Height = 21 Caption = #12467#12500#12540 TabOrder = 4 OnClick = Button_CopyClick end end object celInfo: TStringGrid Left = 0 Top = 1 Width = 185 Height = 113 BorderStyle = bsNone Color = clInfoBk ColCount = 1 DefaultRowHeight = 16 DefaultDrawing = False 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 = celInfoDrawCell end object edtMessage: TEdit Left = 192 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 = edtMessageChange end object ActionList_Key: TActionList Left = 8 Top = 120 object actKey_Up: TAction Category = #12461#12540 Caption = 'Up' ShortCut = 38 SecondaryShortCuts.Strings = ( 'Shift+Up' 'Ctrl+Up' 'Shift+Ctrl+Up') OnExecute = actKey_DownExecute end object actKey_Down: TAction Category = #12461#12540 Caption = 'Down' ShortCut = 40 SecondaryShortCuts.Strings = ( 'Shift+Down' 'Ctrl+Down' 'Shift+Ctrl+Down') OnExecute = actKey_DownExecute end object actKey_Left: TAction Category = #12461#12540 Caption = 'Left' ShortCut = 37 SecondaryShortCuts.Strings = ( 'Shift+Left' 'Ctrl+Left' 'Shift+Ctrl+Left') OnExecute = actKey_DownExecute end object actKey_Right: TAction Category = #12461#12540 Caption = 'Right' ShortCut = 39 SecondaryShortCuts.Strings = ( 'Shift+Right' 'Ctrl+Right' 'Shift+Ctrl+Right') OnExecute = actKey_DownExecute end object actKey_PgUp: TAction Category = #12461#12540 Caption = 'PgUp' ShortCut = 33 SecondaryShortCuts.Strings = ( 'Shift+PgUp' 'Ctrl+PgUp' 'Shift+Ctrl+PgUp') OnExecute = actKey_DownExecute end object actKey_PgDn: TAction Category = #12461#12540 Caption = 'PgDn' ShortCut = 34 SecondaryShortCuts.Strings = ( 'Shift+PgDn' 'Ctrl+PgDn' 'Shift+Ctrl+PgDn') OnExecute = actKey_DownExecute end object actKey_BkSp: TAction Category = #12461#12540 Caption = 'BkSp' ShortCut = 8 SecondaryShortCuts.Strings = ( 'Shift+BkSp' 'Ctrl+BkSp' 'Shift+Ctrl+BkSp') OnExecute = actKey_DownExecute end object actKey_Del: TAction Category = #12461#12540 Caption = 'Del' ShortCut = 46 SecondaryShortCuts.Strings = ( 'Shift+Del' 'Ctrl+Del' 'Shift+Ctrl+Del') OnExecute = actKey_DownExecute end object actKey_Home: TAction Category = #12461#12540 Caption = 'Home' ShortCut = 36 SecondaryShortCuts.Strings = ( 'Shift+Home' 'Ctrl+Home' 'Shift+Ctrl+Home') OnExecute = actKey_DownExecute end object actKey_End: TAction Category = #12461#12540 Caption = 'End' ShortCut = 35 SecondaryShortCuts.Strings = ( 'Shift+End' 'Ctrl+End' 'Shift+Ctrl+End') OnExecute = actKey_DownExecute end object actKey_Esc: TAction Category = #12461#12540 Caption = 'Esc' ShortCut = 27 SecondaryShortCuts.Strings = ( 'Shift+Esc' 'Ctrl+Esc' 'Shift+Ctrl+Esc') OnExecute = actKey_DownExecute end object actKey_Space: TAction Category = #12461#12540 Caption = 'Space' ShortCut = 32 SecondaryShortCuts.Strings = ( 'Shift+Space' 'Ctrl+Space' 'Shift+Ctrl+Space') OnExecute = actKey_PressExecute end object actKey_A: TAction Category = #12461#12540 Caption = 'A' ShortCut = 65 SecondaryShortCuts.Strings = ( 'Shift+A') OnExecute = actKey_PressExecute end object actKey_B: TAction Category = #12461#12540 Caption = 'B' ShortCut = 66 SecondaryShortCuts.Strings = ( 'Shift+B' 'Ctrl+B' 'Shift+Ctrl+B') OnExecute = actKey_PressExecute end object actKey_C: TAction Category = #12461#12540 Caption = 'C' ShortCut = 67 SecondaryShortCuts.Strings = ( 'Shift+C' 'Ctrl+C' 'Shift+Ctrl+C') OnExecute = actKey_PressExecute end object actKey_D: TAction Category = #12461#12540 Caption = 'D' ShortCut = 68 SecondaryShortCuts.Strings = ( 'Shift+D' 'Ctrl+D' 'Shift+Ctrl+D') OnExecute = actKey_PressExecute end object actKey_E: TAction Category = #12461#12540 Caption = 'E' ShortCut = 69 SecondaryShortCuts.Strings = ( 'Shift+E' 'Ctrl+E' 'Shift+Ctrl+E') OnExecute = actKey_PressExecute end object actKey_F: TAction Category = #12461#12540 Caption = 'F' ShortCut = 70 SecondaryShortCuts.Strings = ( 'Shift+F' 'Ctrl+F' 'Shift+Ctrl+F') OnExecute = actKey_PressExecute end object actKey_G: TAction Category = #12461#12540 Caption = 'G' ShortCut = 71 SecondaryShortCuts.Strings = ( 'Shift+G' 'Ctrl+G' 'Shift+Ctrl+G') OnExecute = actKey_PressExecute end object actKey_H: TAction Category = #12461#12540 Caption = 'H' ShortCut = 72 SecondaryShortCuts.Strings = ( 'Shift+H' 'Ctrl+H' 'Shift+Ctrl+H') OnExecute = actKey_PressExecute end object actKey_I: TAction Category = #12461#12540 Caption = 'I' ShortCut = 73 SecondaryShortCuts.Strings = ( 'Shift+I' 'Ctrl+I' 'Shift+Ctrl+I') OnExecute = actKey_PressExecute end object actKey_J: TAction Category = #12461#12540 Caption = 'J' ShortCut = 74 SecondaryShortCuts.Strings = ( 'Shift+J' 'Ctrl+J' 'Shift+Ctrl+J') OnExecute = actKey_PressExecute end object actKey_K: TAction Category = #12461#12540 Caption = 'K' ShortCut = 75 SecondaryShortCuts.Strings = ( 'Shift+K' 'Ctrl+K' 'Shift+Ctrl+K') OnExecute = actKey_PressExecute end object actKey_L: TAction Category = #12461#12540 Caption = 'L' ShortCut = 76 SecondaryShortCuts.Strings = ( 'Shift+L' 'Ctrl+L' 'Shift+Ctrl+L') OnExecute = actKey_PressExecute end object actKey_M: TAction Category = #12461#12540 Caption = 'M' ShortCut = 77 SecondaryShortCuts.Strings = ( 'Shift+M' 'Ctrl+M' 'Shift+Ctrl+M') OnExecute = actKey_PressExecute end object actKey_N: TAction Category = #12461#12540 Caption = 'N' ShortCut = 78 SecondaryShortCuts.Strings = ( 'Shift+N' 'Ctrl+N' 'Shift+Ctrl+N') OnExecute = actKey_PressExecute end object actKey_O: TAction Category = #12461#12540 Caption = 'O' ShortCut = 79 SecondaryShortCuts.Strings = ( 'Shift+O' 'Ctrl+O' 'Shift+Ctrl+O') OnExecute = actKey_PressExecute end object actKey_P: TAction Category = #12461#12540 Caption = 'P' ShortCut = 80 SecondaryShortCuts.Strings = ( 'Shift+P' 'Ctrl+P' 'Shift+Ctrl+P') OnExecute = actKey_PressExecute end object actKey_Q: TAction Category = #12461#12540 Caption = 'Q' ShortCut = 81 SecondaryShortCuts.Strings = ( 'Shift+Q') OnExecute = actKey_PressExecute end object actKey_R: TAction Category = #12461#12540 Caption = 'R' ShortCut = 82 SecondaryShortCuts.Strings = ( 'Shift+R' 'Ctrl+R' 'Shift+Ctrl+R') OnExecute = actKey_PressExecute end object actKey_S: TAction Category = #12461#12540 Caption = 'S' ShortCut = 83 SecondaryShortCuts.Strings = ( 'Shift+S' 'Ctrl+S' 'Shift+Ctrl+S') OnExecute = actKey_PressExecute end object actKey_T: TAction Category = #12461#12540 Caption = 'T' ShortCut = 84 SecondaryShortCuts.Strings = ( 'Shift+T' 'Ctrl+T' 'Shift+Ctrl+T') OnExecute = actKey_PressExecute end object actKey_U: TAction Category = #12461#12540 Caption = 'U' ShortCut = 85 SecondaryShortCuts.Strings = ( 'Shift+U' 'Ctrl+U' 'Shift+Ctrl+U') OnExecute = actKey_PressExecute end object actKey_V: TAction Category = #12461#12540 Caption = 'V' ShortCut = 86 SecondaryShortCuts.Strings = ( 'Shift+V' 'Ctrl+V' 'Shift+Ctrl+V') OnExecute = actKey_PressExecute end object actKey_W: TAction Category = #12461#12540 Caption = 'W' ShortCut = 87 SecondaryShortCuts.Strings = ( 'Shift+W' 'Ctrl+W' 'Shift+Ctrl+W') OnExecute = actKey_PressExecute end object actKey_X: TAction Category = #12461#12540 Caption = 'X' ShortCut = 88 SecondaryShortCuts.Strings = ( 'Shift+X' 'Ctrl+X' 'Shift+Ctrl+X') OnExecute = actKey_PressExecute end object actKey_Y: TAction Category = #12461#12540 Caption = 'Y' ShortCut = 89 SecondaryShortCuts.Strings = ( 'Shift+Y' 'Ctrl+Y' 'Shift+Ctrl+Y') OnExecute = actKey_PressExecute end object actKey_Z: TAction Category = #12461#12540 Caption = 'Z' ShortCut = 90 SecondaryShortCuts.Strings = ( 'Shift+Z' 'Ctrl+Z' 'Shift+Ctrl+Z') OnExecute = actKey_PressExecute end end object PopupMenu1: TPopupMenu AutoHotkeys = maManual AutoLineReduction = maManual Left = 40 Top = 120 object mniPList_Copy: TMenuItem Caption = #12467#12500#12540 OnClick = mniPList_CopyClick end end object SaveDialog1: TSaveDialog Filter = #12525#12464#12501#12449#12452#12523' (*.log)|*.log|'#12486#12461#12473#12488#12501#12449#12452#12523' (*.txt)|*.txt|'#12377#12409#12390#12398#12501#12449#12452#12523' (*.*)|*.*' Left = 192 Top = 40 end end