Ignore:
Timestamp:
Feb 17, 2016, 1:17:21 PM (9 years ago)
Author:
chronos
Message:
  • Added: Form constraintes which are also scaled for High DPI.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Forms/UFormNew.lfm

    r100 r107  
    11object FormNew: TFormNew
    2   Left = 624
    3   Height = 519
    4   Top = 313
    5   Width = 1229
     2  Left = 1176
     3  Height = 501
     4  Top = 331
     5  Width = 677
    66  Caption = 'New game'
    7   ClientHeight = 519
    8   ClientWidth = 1229
     7  ClientHeight = 501
     8  ClientWidth = 677
     9  Constraints.MinHeight = 501
     10  Constraints.MinWidth = 667
    911  OnCreate = FormCreate
    1012  OnDestroy = FormDestroy
    1113  OnShow = FormShow
    1214  Position = poMainFormCenter
    13   LCLVersion = '1.3'
     15  LCLVersion = '1.4.4.0'
    1416  object ButtonCancel: TButton
    15     Left = 1006
     17    Left = 454
    1618    Height = 25
    17     Top = 477
     19    Top = 459
    1820    Width = 75
    1921    Anchors = [akRight, akBottom]
     
    2325  end
    2426  object ButtonOk: TButton
    25     Left = 1110
     27    Left = 558
    2628    Height = 25
    27     Top = 477
     29    Top = 459
    2830    Width = 75
    2931    Anchors = [akRight, akBottom]
     
    3436  object PageControl1: TPageControl
    3537    Left = 4
    36     Height = 457
     38    Height = 439
    3739    Top = 4
    38     Width = 1221
     40    Width = 669
    3941    ActivePage = TabSheet2
    4042    Align = alTop
     
    4547    object TabSheet1: TTabSheet
    4648      Caption = 'Players'
    47       ClientHeight = 417
    48       ClientWidth = 1215
     49      ClientHeight = 398
     50      ClientWidth = 854
    4951      object ListView1: TListView
    5052        Left = 4
    51         Height = 367
     53        Height = 348
    5254        Top = 4
    53         Width = 1207
     55        Width = 846
    5456        Align = alTop
    5557        Anchors = [akTop, akLeft, akRight, akBottom]
     
    8890        Left = 224
    8991        Height = 25
    90         Top = 379
     92        Top = 360
    9193        Width = 83
    9294        Action = APlayerRemove
     
    9799        Left = 16
    98100        Height = 25
    99         Top = 379
     101        Top = 360
    100102        Width = 83
    101103        Action = APlayerAdd
     
    106108        Left = 120
    107109        Height = 25
    108         Top = 379
     110        Top = 360
    109111        Width = 83
    110112        Action = APlayerModify
     
    116118    object TabSheet2: TTabSheet
    117119      Caption = 'Map'
    118       ClientHeight = 417
    119       ClientWidth = 1215
     120      ClientHeight = 401
     121      ClientWidth = 661
    120122      object Label1: TLabel
    121123        Left = 8
    122         Height = 22
     124        Height = 25
    123125        Top = 9
    124         Width = 92
     126        Width = 89
    125127        Caption = 'Map width:'
    126128        ParentColor = False
     
    128130      object Label2: TLabel
    129131        Left = 8
    130         Height = 22
     132        Height = 25
    131133        Top = 57
    132         Width = 99
     134        Width = 95
    133135        Caption = 'Map height:'
    134136        ParentColor = False
     
    136138      object SpinEditMapSizeX: TSpinEdit
    137139        Left = 128
    138         Height = 32
     140        Height = 33
    139141        Top = 4
    140142        Width = 98
     
    146148      object SpinEditMapSizeY: TSpinEdit
    147149        Left = 128
    148         Height = 32
     150        Height = 33
    149151        Top = 55
    150152        Width = 98
     
    158160        Height = 46
    159161        Top = 8
    160         Width = 964
     162        Width = 410
    161163        Max = 100
    162164        Min = 2
     
    171173        Height = 46
    172174        Top = 49
    173         Width = 964
     175        Width = 410
    174176        Max = 100
    175177        Min = 2
     
    182184      object Label5: TLabel
    183185        Left = 8
    184         Height = 22
     186        Height = 25
    185187        Top = 104
    186         Width = 81
     188        Width = 77
    187189        Caption = 'Grid type:'
    188190        ParentColor = False
     
    190192      object ComboBoxGridType: TComboBox
    191193        Left = 146
    192         Height = 30
     194        Height = 33
    193195        Top = 104
    194196        Width = 208
    195         ItemHeight = 0
     197        ItemHeight = 25
    196198        Items.Strings = (
    197199          'Hexagonal'
     
    204206      object ComboBoxMapShape: TComboBox
    205207        Left = 146
    206         Height = 30
     208        Height = 33
    207209        Top = 144
    208210        Width = 208
    209         ItemHeight = 0
     211        ItemHeight = 25
    210212        Items.Strings = (
    211213          'Hexagonal'
     
    219221      object Label8: TLabel
    220222        Left = 8
    221         Height = 22
     223        Height = 25
    222224        Top = 144
    223         Width = 97
     225        Width = 92
    224226        Caption = 'Map shape:'
    225227        ParentColor = False
     
    229231        Height = 27
    230232        Top = 110
    231         Width = 727
     233        Width = 173
    232234        Anchors = [akTop, akLeft, akRight]
    233235        AutoSize = False
     
    237239      object SpinEditVoidPercent: TSpinEdit
    238240        Left = 216
    239         Height = 32
     241        Height = 33
    240242        Top = 224
    241243        Width = 106
     
    246248      object CheckBoxVoid: TCheckBox
    247249        Left = 8
    248         Height = 24
     250        Height = 29
    249251        Top = 232
    250         Width = 183
     252        Width = 177
    251253        Caption = 'Inaccessible places'
    252254        OnChange = CheckBoxVoidChange
     
    255257      object CheckBoxCity: TCheckBox
    256258        Left = 8
    257         Height = 24
     259        Height = 29
    258260        Top = 272
    259         Width = 69
     261        Width = 72
    260262        Caption = 'Cities'
    261263        OnChange = CheckBoxCityChange
     
    264266      object SpinEditCityPercent: TSpinEdit
    265267        Left = 216
    266         Height = 32
     268        Height = 33
    267269        Top = 272
    268270        Width = 106
     
    273275      object Label4: TLabel
    274276        Left = 331
    275         Height = 22
     277        Height = 25
    276278        Top = 272
    277279        Width = 15
     
    281283      object Label3: TLabel
    282284        Left = 331
    283         Height = 22
     285        Height = 25
    284286        Top = 232
    285287        Width = 15
     
    289291      object SpinEditNeutralUnits: TSpinEdit
    290292        Left = 408
    291         Height = 32
     293        Height = 33
    292294        Top = 352
    293295        Width = 98
     
    299301      object Label7: TLabel
    300302        Left = 8
    301         Height = 22
     303        Height = 25
    302304        Top = 352
    303         Width = 221
     305        Width = 207
    304306        Caption = 'Max random neutral units:'
    305307        ParentColor = False
     
    307309      object EditImageFile: TEdit
    308310        Left = 144
    309         Height = 32
     311        Height = 33
    310312        Top = 184
    311         Width = 948
     313        Width = 394
    312314        Anchors = [akTop, akLeft, akRight]
    313315        TabOrder = 12
    314316      end
    315317      object ButtonImageBrowse: TButton
    316         Left = 1100
     318        Left = 546
    317319        Height = 25
    318320        Top = 192
     
    325327      object Label9: TLabel
    326328        Left = 8
    327         Height = 22
     329        Height = 25
    328330        Top = 184
    329         Width = 88
     331        Width = 82
    330332        Caption = 'Image file:'
    331333        ParentColor = False
     
    333335      object CheckBoxBridges: TCheckBox
    334336        Left = 8
    335         Height = 24
     337        Height = 29
    336338        Top = 310
    337         Width = 204
     339        Width = 199
    338340        Caption = 'Bridges between cells'
    339341        TabOrder = 14
     
    342344    object TabSheet3: TTabSheet
    343345      Caption = 'Rules'
    344       ClientHeight = 417
    345       ClientWidth = 1215
     346      ClientHeight = 398
     347      ClientWidth = 854
    346348      object RadioGroupGrowCells: TRadioGroup
    347349        Left = 15
     
    358360        ChildSizing.Layout = cclLeftToRightThenTopToBottom
    359361        ChildSizing.ControlsPerLine = 1
    360         ClientHeight = 81
     362        ClientHeight = 75
    361363        ClientWidth = 308
    362364        Items.Strings = (
     
    369371      object Label6: TLabel
    370372        Left = 8
    371         Height = 22
     373        Height = 25
    372374        Top = 248
    373         Width = 116
     375        Width = 111
    374376        Caption = 'Win objective:'
    375377        ParentColor = False
     
    377379      object ComboBoxWinObjective: TComboBox
    378380        Left = 232
    379         Height = 30
     381        Height = 33
    380382        Top = 240
    381383        Width = 328
    382         ItemHeight = 0
     384        ItemHeight = 25
    383385        Items.Strings = (
    384386          'Defeat all oponents'
     
    404406        ChildSizing.Layout = cclLeftToRightThenTopToBottom
    405407        ChildSizing.ControlsPerLine = 1
    406         ClientHeight = 52
     408        ClientHeight = 46
    407409        ClientWidth = 301
    408410        Items.Strings = (
     
    416418        Height = 27
    417419        Top = 24
    418         Width = 864
     420        Width = 503
    419421        Anchors = [akTop, akLeft, akRight]
    420422        AutoSize = False
Note: See TracChangeset for help on using the changeset viewer.