Ignore:
Timestamp:
May 29, 2023, 8:23:09 PM (18 months ago)
Author:
chronos
Message:
  • Modified: Removed U prefix from all Common package units.
Location:
Common/Demo/PersistentForm
Files:
4 edited

Legend:

Unmodified
Added
Removed

  • Common/Demo/PersistentForm/PersistentFormDemo.lpi

    r487 r563  
    22<CONFIG>
    33  <ProjectOptions>
    4     <Version Value="9"/>
     4    <Version Value="12"/>
    55    <General>
     6      <Flags>
     7        <CompatibilityMode Value="True"/>
     8      </Flags>
    69      <SessionStorage Value="InProjectDir"/>
    7       <MainUnit Value="0"/>
    810      <Title Value="PersistentFormDemo"/>
    911      <ResourceType Value="res"/>
    … …  
    1416      <EnableI18N LFM="False"/>
    1517    </i18n>
    16     <VersionInfo>
    17       <StringTable ProductVersion=""/>
    18     </VersionInfo>
    1918    <BuildModes Count="1">
    2019      <Item1 Name="Default" Default="True"/>
    … …  
    2423    </PublishOptions>
    2524    <RunParams>
    26       <local>
    27         <FormatVersion Value="1"/>
    28       </local>
     25      <FormatVersion Value="2"/>
     26      <Modes Count="1">
     27        <Mode0 Name="default"/>
     28      </Modes>
    2929    </RunParams>
    3030    <RequiredPackages Count="3">
    … …  
    5151        <HasResources Value="True"/>
    5252        <ResourceBaseClass Value="Form"/>
    53         <UnitName Value="Unit1"/>
    5453      </Unit1>
    5554    </Units>

  • Common/Demo/PersistentForm/Unit1.lfm

    r487 r563  
    11object Form1: TForm1
    22  Left = 952
    3   Height = 622
    4   Top = 489
    5   Width = 698
     3  Height = 933
     4  Top = 449
     5  Width = 1047
    66  Caption = 'PersistentForm demo'
    7   ClientHeight = 622
    8   ClientWidth = 698
     7  ClientHeight = 933
     8  ClientWidth = 1047
     9  DesignTimePPI = 144
    910  OnClose = FormClose
    1011  OnResize = FormResize
    1112  OnShow = FormShow
    12   LCLVersion = '1.5'
     13  LCLVersion = '2.2.6.0'
    1314  object ListView1: TListView
    1415    Left = 0
    15     Height = 622
     16    Height = 933
    1617    Top = 0
    17     Width = 698
     18    Width = 1047
    1819    Align = alClient
    1920    Columns = <   
    2021      item
    2122        Caption = 'Property'
    22         Width = 300
     23        Width = 450
    2324      end   
    2425      item
    2526        Caption = 'Value'
    26         Width = 381
     27        Width = 582
    2728      end>
    2829    TabOrder = 0
    … …  
    3233    MinVisiblePart = 50
    3334    EntireVisible = False
    34     left = 112
    35     top = 72
     35    Left = 168
     36    Top = 108
    3637  end
    3738  object Timer1: TTimer
    3839    OnTimer = Timer1Timer
    39     left = 391
    40     top = 314
     40    Left = 587
     41    Top = 471
    4142  end
    4243  object XMLConfig1: TXMLConfig
    4344    StartEmpty = False
    4445    RootName = 'CONFIG'
    45     left = 240
    46     top = 217
     46    ReadOnly = False
     47    Left = 360
     48    Top = 326
    4749  end
    4850end

  • Common/Demo/PersistentForm/Unit1.pas

    r487 r563  
    77uses
    88  Classes, SysUtils, XMLConf, FileUtil, Forms, Controls, Graphics, Dialogs,
    9   Buttons, StdCtrls, ExtCtrls, ComCtrls, Menus, XMLPropStorage, UPersistentForm;
     9  Buttons, StdCtrls, ExtCtrls, ComCtrls, Menus, XMLPropStorage, PersistentForm;
    1010
    1111type
Note: See TracChangeset for help on using the changeset viewer.