Ignore:
Timestamp:
May 29, 2023, 8:23:09 PM (18 months ago)
Author:
chronos
Message:
  • Modified: Removed U prefix from all Common package units.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • Common/Demo/JobProgressView/UFormMain.lfm

    r513 r563  
    11object FormMain: TFormMain
    22  Left = 501
    3   Height = 480
     3  Height = 576
    44  Top = 296
    5   Width = 743
     5  Width = 892
    66  Caption = 'JobProgressView demo'
    7   ClientHeight = 480
    8   ClientWidth = 743
    9   DesignTimePPI = 120
    10   LCLVersion = '1.8.2.0'
     7  ClientHeight = 576
     8  ClientWidth = 892
     9  DesignTimePPI = 144
     10  LCLVersion = '2.2.6.0'
    1111  object ButtonTest: TButton
    12     Left = 40
    13     Height = 31
    14     Top = 192
    15     Width = 94
     12    Left = 48
     13    Height = 37
     14    Top = 230
     15    Width = 113
    1616    Caption = 'Test'
    1717    OnClick = ButtonTestClick
    … …  
    1919  end
    2020  object SpinEditJobCount: TSpinEdit
    21     Left = 122
    22     Height = 28
    23     Top = 16
    24     Width = 102
     21    Left = 146
     22    Height = 43
     23    Top = 19
     24    Width = 122
    2525    TabOrder = 1
    2626    Value = 5
    2727  end
    2828  object Label1: TLabel
    29     Left = 16
    30     Height = 20
    31     Top = 16
    32     Width = 67
     29    Left = 19
     30    Height = 26
     31    Top = 19
     32    Width = 85
    3333    Caption = 'Job count:'
    3434    ParentColor = False
    3535  end
    3636  object Label2: TLabel
    37     Left = 16
    38     Height = 20
    39     Top = 48
    40     Width = 79
     37    Left = 19
     38    Height = 26
     39    Top = 58
     40    Width = 101
    4141    Caption = 'Show delay:'
    4242    ParentColor = False
    4343  end
    4444  object SpinEditShowDelay: TSpinEdit
    45     Left = 122
    46     Height = 28
    47     Top = 48
    48     Width = 102
     45    Left = 146
     46    Height = 43
     47    Top = 58
     48    Width = 122
    4949    MaxValue = 1000000
    5050    TabOrder = 2
    … …  
    5252  end
    5353  object Label3: TLabel
    54     Left = 232
    55     Height = 20
    56     Top = 48
    57     Width = 19
     54    Left = 278
     55    Height = 26
     56    Top = 58
     57    Width = 26
    5858    Caption = 'ms'
    5959    ParentColor = False
    6060  end
    6161  object CheckBoxAutoClose: TCheckBox
    62     Left = 15
    63     Height = 24
    64     Top = 84
    65     Width = 195
     62    Left = 18
     63    Height = 30
     64    Top = 101
     65    Width = 243
    6666    Caption = 'Auto close on completion'
    6767    Checked = True
    … …  
    7070  end
    7171  object CheckBoxTextProgress: TCheckBox
    72     Left = 16
    73     Height = 24
    74     Top = 112
    75     Width = 259
     72    Left = 19
     73    Height = 30
     74    Top = 134
     75    Width = 329
    7676    Caption = 'Show individual items text progress'
    7777    TabOrder = 4
    7878  end
    7979  object CheckBoxErrors: TCheckBox
    80     Left = 15
    81     Height = 24
    82     Top = 144
    83     Width = 239
     80    Left = 18
     81    Height = 30
     82    Top = 173
     83    Width = 304
    8484    Caption = 'Simulate errors during execution'
    8585    TabOrder = 5
    … …  
    8989    ShowDelay = 0
    9090    AutoClose = False
    91     left = 480
    92     top = 120
     91    Left = 576
     92    Top = 144
    9393  end
    9494end
Note: See TracChangeset for help on using the changeset viewer.