Changeset 4 for trunk/UOptions.lfm


Ignore:
Timestamp:
Feb 3, 2011, 8:01:00 AM (13 years ago)
Author:
chronos
Message:
  • Fixed: Add and edit operations.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/UOptions.lfm

    r3 r4  
    11object OptionsForm: TOptionsForm
    2   Left = 338
    3   Height = 410
    4   Top = 161
     2  Left = 274
     3  Height = 424
     4  Top = 106
    55  Width = 573
    66  Caption = 'Options'
    7   ClientHeight = 410
     7  ClientHeight = 424
    88  ClientWidth = 573
     9  OnCreate = FormCreate
     10  OnDestroy = FormDestroy
     11  OnShow = FormShow
    912  LCLVersion = '0.9.31'
    10   object Label1: TLabel
    11     Left = 9
    12     Height = 14
    13     Top = 8
    14     Width = 112
    15     Caption = 'Available FPC variants:'
    16     ParentColor = False
    17   end
    18   object ListView1: TListView
    19     Left = 7
    20     Height = 173
    21     Top = 27
    22     Width = 561
    23     Anchors = [akTop, akLeft, akRight]
    24     Columns = <   
    25       item
    26         Caption = 'Name'
    27         Width = 70
    28       end   
    29       item
    30         Caption = 'Version'
    31       end   
    32       item
    33         Caption = 'Revision'
    34       end   
    35       item
    36         Caption = 'Date'
    37         Width = 60
    38       end   
    39       item
    40         Caption = 'Source URL'
    41         Width = 300
    42       end>
    43     OwnerData = True
    44     ReadOnly = True
    45     RowSelect = True
    46     TabOrder = 0
    47     ViewStyle = vsReport
    48   end
    49   object Label2: TLabel
    50     Left = 9
    51     Height = 14
    52     Top = 208
    53     Width = 110
    54     Caption = 'Available IDE variants:'
    55     ParentColor = False
    56   end
    57   object ListView2: TListView
    58     Left = 9
    59     Height = 150
    60     Top = 226
    61     Width = 559
    62     Anchors = [akTop, akLeft, akRight]
    63     Columns = <   
    64       item
    65         Caption = 'Name'
    66         Width = 70
    67       end   
    68       item
    69         Caption = 'Version'
    70       end   
    71       item
    72         Caption = 'Revision'
    73       end   
    74       item
    75         Caption = 'Date'
    76         Width = 60
    77       end   
    78       item
    79         Caption = 'Source URL'
    80         Width = 300
    81       end>
    82     OwnerData = True
    83     ReadOnly = True
    84     RowSelect = True
    85     TabOrder = 1
    86     ViewStyle = vsReport
    87   end
    8813  object ButtonCancel: TButton
    8914    Left = 408
    9015    Height = 25
    91     Top = 380
     16    Top = 394
    9217    Width = 75
     18    Anchors = [akRight, akBottom]
    9319    Caption = 'Cancel'
    94     TabOrder = 2
     20    ModalResult = 2
     21    OnClick = ButtonCancelClick
     22    TabOrder = 0
    9523  end
    9624  object ButtonOk: TButton
    9725    Left = 493
    9826    Height = 25
    99     Top = 380
     27    Top = 394
    10028    Width = 75
     29    Anchors = [akRight, akBottom]
    10130    Caption = 'Ok'
    102     TabOrder = 3
     31    ModalResult = 1
     32    OnClick = ButtonOkClick
     33    TabOrder = 1
    10334  end
    10435  object ButtonUpdateSource: TButton
    10536    Left = 10
    10637    Height = 25
    107     Top = 381
     38    Top = 395
    10839    Width = 75
     40    Anchors = [akLeft, akBottom]
    10941    Caption = 'Update list'
    11042    OnClick = ButtonUpdateSourceClick
     43    TabOrder = 2
     44  end
     45  object Panel1: TPanel
     46    Left = 0
     47    Height = 26
     48    Top = 0
     49    Width = 573
     50    Align = alTop
     51    BevelOuter = bvNone
     52    ClientHeight = 26
     53    ClientWidth = 573
     54    TabOrder = 3
     55    object Edit1: TEdit
     56      Left = 56
     57      Height = 21
     58      Top = 3
     59      Width = 512
     60      Anchors = [akTop, akLeft, akRight]
     61      TabOrder = 0
     62    end
     63    object Label3: TLabel
     64      Left = 7
     65      Height = 14
     66      Top = 5
     67      Width = 32
     68      Caption = 'Name:'
     69      ParentColor = False
     70    end
     71  end
     72  object Panel2: TPanel
     73    Left = 0
     74    Height = 178
     75    Top = 26
     76    Width = 573
     77    Align = alTop
     78    BevelOuter = bvNone
     79    ClientHeight = 178
     80    ClientWidth = 573
    11181    TabOrder = 4
     82    object ListView1: TListView
     83      Left = 7
     84      Height = 156
     85      Top = 22
     86      Width = 561
     87      Anchors = [akTop, akLeft, akRight, akBottom]
     88      Columns = <     
     89        item
     90          Caption = 'Name'
     91          Width = 70
     92        end     
     93        item
     94          Caption = 'Type'
     95          Width = 80
     96        end     
     97        item
     98          Caption = 'Version'
     99          Width = 60
     100        end     
     101        item
     102          Caption = 'Revision'
     103        end     
     104        item
     105          Caption = 'Date'
     106          Width = 60
     107        end     
     108        item
     109          Caption = 'Source URL'
     110          Width = 300
     111        end>
     112      OwnerData = True
     113      ReadOnly = True
     114      RowSelect = True
     115      TabOrder = 0
     116      ViewStyle = vsReport
     117      OnData = ListView1Data
     118    end
     119    object Label1: TLabel
     120      Left = 9
     121      Height = 14
     122      Top = 8
     123      Width = 69
     124      Caption = 'FPC selection:'
     125      ParentColor = False
     126    end
     127  end
     128  object Panel3: TPanel
     129    Left = 0
     130    Height = 186
     131    Top = 204
     132    Width = 573
     133    Align = alTop
     134    Anchors = [akTop, akLeft, akRight, akBottom]
     135    BevelOuter = bvNone
     136    ClientHeight = 186
     137    ClientWidth = 573
     138    TabOrder = 5
     139    object Label2: TLabel
     140      Left = 11
     141      Height = 14
     142      Top = 12
     143      Width = 67
     144      Caption = 'IDE selection:'
     145      ParentColor = False
     146    end
     147    object ListView2: TListView
     148      Left = 9
     149      Height = 158
     150      Top = 28
     151      Width = 559
     152      Anchors = [akTop, akLeft, akRight, akBottom]
     153      Columns = <     
     154        item
     155          Caption = 'Name'
     156          Width = 70
     157        end     
     158        item
     159          Caption = 'Type'
     160          Width = 80
     161        end     
     162        item
     163          Caption = 'Version'
     164          Width = 60
     165        end     
     166        item
     167          Caption = 'Revision'
     168        end     
     169        item
     170          Caption = 'Date'
     171          Width = 60
     172        end     
     173        item
     174          Caption = 'Source URL'
     175          Width = 300
     176        end>
     177      OwnerData = True
     178      ReadOnly = True
     179      RowSelect = True
     180      TabOrder = 0
     181      ViewStyle = vsReport
     182      OnData = ListView2Data
     183    end
    112184  end
    113185end
Note: See TracChangeset for help on using the changeset viewer.