Changeset 16 for trunk/UMainForm.lfm


Ignore:
Timestamp:
Feb 11, 2012, 7:12:30 PM (12 years ago)
Author:
chronos
Message:
  • Added: Function for formating source using text indentation according loop nesting.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/UMainForm.lfm

    r15 r16  
    2828    OnMouseDown = MemoSourceMouseDown
    2929    ParentFont = False
     30    PopupMenu = PopupMenuSource
    3031    ScrollBars = ssAutoBoth
    3132    TabOrder = 0
    … …  
    99100      Action = AOptions
    100101    end
     102    object ToolButton9: TToolButton
     103      Left = 172
     104      Top = 2
     105      Action = ABreakpointToggle
     106    end
    101107  end
    102108  object TabControl1: TTabControl
    … …  
    519525          0000000000000000000000000000000000000000000000000000
    520526        }
     527      end
     528    end
     529    object MenuItem24: TMenuItem
     530      Caption = 'Tools'
     531      object MenuItem25: TMenuItem
     532        Action = AFormatSource
    521533      end
    522534    end
    … …  
    702714      Caption = 'Step out'
    703715    end
    704     object ABreakpointSet: TAction
    705       Caption = 'Breakpoint set'
    706     end
    707     object ABreakpointUnset: TAction
    708       Caption = 'Unset breakpoint'
     716    object ABreakpointToggle: TAction
     717      Caption = 'Toggle breakpoint'
     718      ImageIndex = 12
     719      OnExecute = ABreakpointToggleExecute
    709720    end
    710721    object AOptions: TAction
    … …  
    712723      ImageIndex = 2
    713724      OnExecute = AOptionsExecute
     725    end
     726    object AFormatSource: TAction
     727      Caption = 'Format source'
     728      OnExecute = AFormatSourceExecute
    714729    end
    715730  end
    … …  
    718733    top = 96
    719734    Bitmap = {
    720       4C690C0000001000000010000000000000000000000000000000000000000000
     735      4C690D0000001000000010000000000000000000000000000000000000000000
    721736      0000000000000000000000000000000000000000000000000000000000000000
    722737      000000000000000000000000000000000000000000FF000000FF000000FF0000
    … …  
    11021117      0000000000000000000000000000000000000000000000000000000000000000
    11031118      0000000000000000000000000000000000000000000000000000000000000000
    1104       0000000000000000000000000000
     1119      0000000000000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     1120      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     1121      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     1122      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     1123      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000A4000000A6000000
     1124      A9200000AA7E0000AAB20000AAC80000AAB20000AA7E0000A9200000A6000000
     1125      A400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000A4000000A6410A0A
     1126      AEC13F3FD5E76060EDF86A6AF3FE6060ECF83E3ED4E70A0AADC10000A6410000
     1127      A400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000A3200A0AABC15555
     1128      E3F35A5AE2FF5656DEFF5656DEFF5656DEFF5959E1FF5050DEF30909AAC10000
     1129      A320FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000009E7E3939CCE64A4A
     1130      D2FF4545CDFF4545CDFF4545CDFF4545CDFF4545CDFF4848D0FF3131C3E60000
     1131      9E7EFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000009AB24A4AD4F83737
     1132      BFFF3737BFFF3131BAFF2727B0FF1C1CA6FF1616A0FF12129CFF2323AEF80000
     1133      9AB2FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000095C84848D0FE2E2E
     1134      B8FF1D1DADFF1212A5FF1111A4FF1111A4FF1111A4FF1111A4FF1B1BADFE0000
     1135      95C8FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000008FB23434C3F81414
     1136      B2FF1111B1FF1111B1FF1111B1FF1111B1FF1111B1FF1111B1FF1414B0F80000
     1137      8FB2FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000897E1818AFE61414
     1138      C1FF1111BFFF1111BFFF1111BFFF1111BFFF1111BFFF1111BFFF0A0AA6E60000
     1139      897EFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000008420030389C11515
     1140      BFF31212CDFF1111CCFF1111CCFF1111CCFF1111CCFF0E0EBCF3020288C10000
     1141      8420FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000008100000078410202
     1142      7DC10A0AA8E70F0FCAF81111D5FE0F0FCAF80A0AA8E702027DC1000078410000
     1143      8100FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000008100000075000000
     1144      64200000607E000060B2000060C8000060B20000607E00006420000075000000
     1145      8100FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     1146      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     1147      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     1148      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     1149      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     1150      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     1151      FF00FFFFFF00FFFFFF00FFFFFF00
    11051152    }
    11061153  end
    … …  
    11221169    top = 216
    11231170  end
     1171  object PopupMenuSource: TPopupMenu
     1172    Images = ImageList1
     1173    left = 128
     1174    top = 126
     1175    object MenuItem23: TMenuItem
     1176      Action = ABreakpointToggle
     1177    end
     1178  end
    11241179end
Note: See TracChangeset for help on using the changeset viewer.