Ignore:
Timestamp:
Jan 17, 2025, 10:06:21 PM (4 days ago)
Author:
chronos
Message:
  • Fixed: Use scrollbox in resizable forms.
  • Fixed: Translate all forms.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Forms/FormAcronym.lfm

    r219 r221  
    11object FormAcronym: TFormAcronym
    2   Left = 845
    3   Height = 893
    4   Top = 480
    5   Width = 1030
     2  Left = 476
     3  Height = 853
     4  Top = 277
     5  Width = 810
    66  Caption = 'Acronym'
    7   ClientHeight = 893
    8   ClientWidth = 1030
     7  ClientHeight = 853
     8  ClientWidth = 810
    99  DesignTimePPI = 144
    1010  OnShow = FormShow
    1111  Position = poScreenCenter
    1212  LCLVersion = '3.6.0.0'
    13   object Label1: TLabel
    14     Left = 12
    15     Height = 26
    16     Top = 24
    17     Width = 56
    18     Caption = 'Name:'
    19     ParentColor = False
    20     ParentFont = False
    21   end
    22   object EditAcronym: TEdit
    23     Left = 229
    24     Height = 43
    25     Top = 23
    26     Width = 783
    27     Anchors = [akTop, akLeft, akRight]
    28     ParentFont = False
    29     TabOrder = 0
    30     OnKeyPress = EditMeaningKeyPress
    31   end
    32   object Label2: TLabel
    33     Left = 12
    34     Height = 26
    35     Top = 73
    36     Width = 79
    37     Caption = 'Meaning:'
    38     ParentColor = False
    39     ParentFont = False
    40   end
    41   object EditMeaning: TEdit
    42     Left = 229
    43     Height = 43
    44     Top = 73
    45     Width = 783
    46     Anchors = [akTop, akLeft, akRight]
    47     ParentFont = False
    48     TabOrder = 1
    49     OnKeyPress = EditMeaningKeyPress
    50   end
    5113  object ButtonOk: TButton
    52     Left = 880
     14    Left = 548
    5315    Height = 37
    54     Top = 833
     16    Top = 804
    5517    Width = 113
    5618    Anchors = [akRight, akBottom]
    … …  
    5820    ModalResult = 1
    5921    ParentFont = False
    60     TabOrder = 7
     22    TabOrder = 1
    6123    OnKeyPress = EditMeaningKeyPress
    6224  end
    6325  object ButtonCancel: TButton
    64     Left = 736
     26    Left = 684
    6527    Height = 37
    66     Top = 833
     28    Top = 804
    6729    Width = 113
    6830    Anchors = [akRight, akBottom]
    … …  
    7032    ModalResult = 2
    7133    ParentFont = False
    72     TabOrder = 6
     34    TabOrder = 0
    7335    OnKeyPress = EditMeaningKeyPress
    7436  end
    75   object Label3: TLabel
    76     Left = 12
    77     Height = 26
    78     Top = 132
    79     Width = 102
    80     Caption = 'Description:'
    81     ParentColor = False
    82     ParentFont = False
    83   end
    84   object MemoDescription: TMemo
    85     Left = 229
    86     Height = 170
    87     Top = 132
    88     Width = 783
    89     Anchors = [akTop, akLeft, akRight]
    90     ParentFont = False
    91     ScrollBars = ssAutoBoth
     37  object ScrollBox1: TScrollBox
     38    Left = 8
     39    Height = 781
     40    Top = 8
     41    Width = 787
     42    HorzScrollBar.Page = 540
     43    VertScrollBar.Page = 760
     44    Anchors = [akTop, akLeft, akRight, akBottom]
     45    ClientHeight = 779
     46    ClientWidth = 785
    9247    TabOrder = 2
    93     OnKeyPress = EditMeaningKeyPress
    94   end
    95   object Label4: TLabel
    96     Left = 18
    97     Height = 26
    98     Top = 312
    99     Width = 95
    100     Caption = 'Categories:'
    101     ParentColor = False
    102     ParentFont = False
    103   end
    104   object ListBoxCategories: TListBox
    105     Left = 229
    106     Height = 211
    107     Top = 312
    108     Width = 782
    109     Anchors = [akTop, akLeft, akRight]
    110     ItemHeight = 0
    111     MultiSelect = True
    112     ParentFont = False
    113     PopupMenu = PopupMenuCategory
    114     ScrollWidth = 518
    115     TabOrder = 3
    116     TopIndex = -1
    117     OnKeyPress = EditMeaningKeyPress
    118     OnSelectionChange = ListBoxCategoriesSelectionChange
    119   end
    120   object Button1: TButton
    121     Left = 229
    122     Height = 37
    123     Top = 540
    124     Width = 131
    125     Action = ACategoryAdd
    126     ParentFont = False
    127     TabOrder = 4
    128     OnKeyPress = EditMeaningKeyPress
    129   end
    130   object Button2: TButton
    131     Left = 384
    132     Height = 37
    133     Top = 540
    134     Width = 156
    135     Action = ACategoryRemove
    136     ParentFont = False
    137     TabOrder = 5
    138     OnKeyPress = EditMeaningKeyPress
    139   end
    140   object Label5: TLabel
    141     Left = 12
    142     Height = 26
    143     Top = 588
    144     Width = 130
    145     Caption = 'Imported from:'
    146     ParentColor = False
    147     ParentFont = False
    148   end
    149   object ListBoxImportSources: TListBox
    150     Left = 229
    151     Height = 168
    152     Top = 588
    153     Width = 783
    154     Anchors = [akTop, akLeft, akRight]
    155     ItemHeight = 0
    156     MultiSelect = True
    157     ParentFont = False
    158     ScrollWidth = 519
    159     TabOrder = 8
    160     TopIndex = -1
    161     OnKeyPress = EditMeaningKeyPress
    162     OnSelectionChange = ListBoxCategoriesSelectionChange
     48    object Label1: TLabel
     49      Left = 12
     50      Height = 26
     51      Top = 24
     52      Width = 56
     53      Caption = 'Name:'
     54      ParentColor = False
     55      ParentFont = False
     56    end
     57    object EditAcronym: TEdit
     58      Left = 229
     59      Height = 43
     60      Top = 23
     61      Width = 539
     62      Anchors = [akTop, akLeft, akRight]
     63      ParentFont = False
     64      TabOrder = 0
     65      OnKeyPress = EditMeaningKeyPress
     66    end
     67    object Label2: TLabel
     68      Left = 12
     69      Height = 26
     70      Top = 73
     71      Width = 79
     72      Caption = 'Meaning:'
     73      ParentColor = False
     74      ParentFont = False
     75    end
     76    object EditMeaning: TEdit
     77      Left = 229
     78      Height = 43
     79      Top = 73
     80      Width = 539
     81      Anchors = [akTop, akLeft, akRight]
     82      ParentFont = False
     83      TabOrder = 1
     84      OnKeyPress = EditMeaningKeyPress
     85    end
     86    object Label3: TLabel
     87      Left = 12
     88      Height = 26
     89      Top = 132
     90      Width = 102
     91      Caption = 'Description:'
     92      ParentColor = False
     93      ParentFont = False
     94    end
     95    object MemoDescription: TMemo
     96      Left = 229
     97      Height = 170
     98      Top = 132
     99      Width = 537
     100      Anchors = [akTop, akLeft, akRight]
     101      ParentFont = False
     102      ScrollBars = ssAutoBoth
     103      TabOrder = 2
     104      OnKeyPress = EditMeaningKeyPress
     105    end
     106    object Label4: TLabel
     107      Left = 18
     108      Height = 26
     109      Top = 312
     110      Width = 95
     111      Caption = 'Categories:'
     112      ParentColor = False
     113      ParentFont = False
     114    end
     115    object ListBoxCategories: TListBox
     116      Left = 229
     117      Height = 211
     118      Top = 312
     119      Width = 537
     120      Anchors = [akTop, akLeft, akRight]
     121      ItemHeight = 0
     122      MultiSelect = True
     123      ParentFont = False
     124      PopupMenu = PopupMenuCategory
     125      ScrollWidth = 518
     126      TabOrder = 3
     127      TopIndex = -1
     128      OnKeyPress = EditMeaningKeyPress
     129      OnSelectionChange = ListBoxCategoriesSelectionChange
     130    end
     131    object Button1: TButton
     132      Left = 229
     133      Height = 37
     134      Top = 540
     135      Width = 131
     136      Action = ACategoryAdd
     137      ParentFont = False
     138      TabOrder = 4
     139      OnKeyPress = EditMeaningKeyPress
     140    end
     141    object Button2: TButton
     142      Left = 384
     143      Height = 37
     144      Top = 540
     145      Width = 156
     146      Action = ACategoryRemove
     147      ParentFont = False
     148      TabOrder = 5
     149      OnKeyPress = EditMeaningKeyPress
     150    end
     151    object Label5: TLabel
     152      Left = 12
     153      Height = 26
     154      Top = 588
     155      Width = 130
     156      Caption = 'Imported from:'
     157      ParentColor = False
     158      ParentFont = False
     159    end
     160    object ListBoxImportSources: TListBox
     161      Left = 229
     162      Height = 168
     163      Top = 592
     164      Width = 539
     165      Anchors = [akTop, akLeft, akRight]
     166      ItemHeight = 0
     167      MultiSelect = True
     168      ParentFont = False
     169      ScrollWidth = 519
     170      TabOrder = 6
     171      TopIndex = -1
     172      OnKeyPress = EditMeaningKeyPress
     173      OnSelectionChange = ListBoxCategoriesSelectionChange
     174    end
    163175  end
    164176  object ActionList1: TActionList
    165     Left = 541
    166     Top = 360
     177    Left = 581
     178    Top = 400
    167179    object ACategoryRemove: TAction
    168180      Caption = 'Remove'
    … …  
    177189  end
    178190  object PopupMenuCategory: TPopupMenu
    179     Left = 288
    180     Top = 366
     191    Left = 328
     192    Top = 406
    181193    object MenuItem2: TMenuItem
    182194      Action = ACategoryAdd
Note: See TracChangeset for help on using the changeset viewer.