Ignore:
Timestamp:
Jul 17, 2012, 7:25:56 AM (12 years ago)
Author:
chronos
Message:
  • Added: Target celection combobox on main toolbar.
  • Added: Options of available targets allow to change producer and executor path if available.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/IDE/Forms/UFormTargets.lfm

    r42 r60  
    11object FormTargets: TFormTargets
    22  Left = 292
    3   Height = 264
     3  Height = 343
    44  Top = 138
    5   Width = 360
     5  Width = 522
    66  Caption = 'Targets'
    7   ClientHeight = 264
    8   ClientWidth = 360
     7  ClientHeight = 343
     8  ClientWidth = 522
    99  OnShow = FormShow
    10   LCLVersion = '0.9.31'
     10  LCLVersion = '1.1'
    1111  object ListView1: TListView
    1212    Left = 8
    13     Height = 248
     13    Height = 327
    1414    Top = 8
    15     Width = 346
     15    Width = 508
    1616    Anchors = [akTop, akLeft, akRight, akBottom]
    1717    Columns = <   
     
    2121      end   
    2222      item
    23         Caption = 'Execution path'
    24         Width = 247
     23        Caption = 'Compiler path'
     24        Width = 200
     25      end   
     26      item
     27        Caption = 'Executor path'
     28        Width = 200
    2529      end>
    2630    OwnerData = True
     31    PopupMenu = PopupMenu1
    2732    ReadOnly = True
    2833    RowSelect = True
     
    3035    ViewStyle = vsReport
    3136    OnData = ListView1Data
    32     OnDblClick = ListView1DblClick
     37    OnDblClick = ATargetOptionsExecute
     38  end
     39  object PopupMenu1: TPopupMenu
     40    Images = FormMain.ImageList1
     41    left = 124
     42    top = 69
     43  end
     44  object ActionList1: TActionList
     45    left = 200
     46    top = 72
     47    object ATargetOptions: TAction
     48      Caption = 'Options'
     49      Hint = 'Target options'
     50      OnExecute = ATargetOptionsExecute
     51    end
    3352  end
    3453end
Note: See TracChangeset for help on using the changeset viewer.