Ignore:
Timestamp:
Jun 21, 2024, 12:44:53 PM (2 weeks ago)
Author:
chronos
Message:
  • Modified: Remove U prefix from unit names.
  • Modified: Use TFormEx for all forms for code simplification.
File:
1 moved

Legend:

Unmodified
Added
Removed

  • trunk/Forms/FormServer.lfm

    r316 r317  
    11object FormServer: TFormServer
    2   Left = 691
     2  Left = 1078
    33  Height = 210
    4   Top = 389
     4  Top = 615
    55  Width = 403
    66  Caption = 'Server'
    77  ClientHeight = 210
    88  ClientWidth = 403
    9   DesignTimePPI = 120
    10   OnShow = FormShow
    11   LCLVersion = '2.0.0.4'
     9  DesignTimePPI = 144
     10  LCLVersion = '3.4.0.0'
    1211  object Label1: TLabel
    13     Left = 10
    14     Height = 20
    15     Top = 20
    16     Width = 43
     12    Left = 12
     13    Height = 26
     14    Top = 24
     15    Width = 56
    1716    Caption = 'Name:'
    1817    ParentColor = False
    … …  
    2019  end
    2120  object EditName: TEdit
    22     Left = 136
    23     Height = 28
    24     Top = 14
    25     Width = 234
     21    Left = 163
     22    Height = 43
     23    Top = 17
     24    Width = 281
    2625    ParentFont = False
    2726    TabOrder = 0
    2827  end
    2928  object Label2: TLabel
    30     Left = 10
    31     Height = 20
    32     Top = 60
    33     Width = 56
     29    Left = 12
     30    Height = 26
     31    Top = 72
     32    Width = 74
    3433    Caption = 'Address:'
    3534    ParentColor = False
    … …  
    3736  end
    3837  object EditAddress: TEdit
    39     Left = 136
    40     Height = 28
    41     Top = 53
    42     Width = 236
     38    Left = 163
     39    Height = 43
     40    Top = 64
     41    Width = 283
    4342    ParentFont = False
    4443    TabOrder = 1
    4544  end
    4645  object Label3: TLabel
    47     Left = 10
    48     Height = 20
    49     Top = 100
    50     Width = 30
     46    Left = 12
     47    Height = 26
     48    Top = 120
     49    Width = 40
    5150    Caption = 'Port:'
    5251    ParentColor = False
    … …  
    5453  end
    5554  object SpinEdit1: TSpinEdit
    56     Left = 136
    57     Height = 28
    58     Top = 93
    59     Width = 97
     55    Left = 163
     56    Height = 43
     57    Top = 112
     58    Width = 116
    6059    MaxValue = 65535
    6160    ParentFont = False
    … …  
    6362  end
    6463  object ButtonCancel: TButton
    65     Left = 240
    66     Height = 31
    67     Top = 155
    68     Width = 94
     64    Left = 288
     65    Height = 37
     66    Top = 186
     67    Width = 113
    6968    Caption = 'Cancel'
    7069    ModalResult = 2
    … …  
    7372  end
    7473  object ButtonOk: TButton
    75     Left = 80
    76     Height = 31
    77     Top = 155
    78     Width = 94
     74    Left = 96
     75    Height = 37
     76    Top = 186
     77    Width = 113
    7978    Caption = 'OK'
    8079    ModalResult = 1
    81     OnClick = ButtonOkClick
    8280    ParentFont = False
    8381    TabOrder = 4
     82    OnClick = ButtonOkClick
    8483  end
    8584end
Note: See TracChangeset for help on using the changeset viewer.