Changeset 18 for trunk/StudioPackage


Ignore:
Timestamp:
Sep 5, 2012, 8:53:56 PM (12 years ago)
Author:
chronos
Message:
  • Used external packages are now stored in uncompressed form rather in zipped files. This allow better package version synchronisation.
Location:
trunk/StudioPackage/Forms
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/StudioPackage/Forms/UFormMain.lfm

    r15 r18  
    55  Width = 747
    66  Caption = 'LibreDevelop Studio'
    7   ClientHeight = 501
     7  ClientHeight = 495
    88  ClientWidth = 747
    99  Menu = MainMenu
     
    1616  object StatusBar1: TStatusBar
    1717    Left = 0
    18     Height = 20
    19     Top = 481
     18    Height = 21
     19    Top = 474
    2020    Width = 747
    2121    Panels = <>
     
    2727    Width = 747
    2828    Caption = 'ToolBar1'
    29     Images = DataModule1.ImageListMain
    3029    TabOrder = 1
    3130    object ToolButton1: TToolButton
     
    5453  object PageControlRight: TPageControl
    5554    Left = 547
    56     Height = 350
     55    Height = 343
    5756    Top = 26
    5857    Width = 200
     
    6362  object PageControlLeft: TPageControl
    6463    Left = 0
    65     Height = 350
     64    Height = 343
    6665    Top = 26
    6766    Width = 200
     
    7372    Left = 0
    7473    Height = 105
    75     Top = 376
     74    Top = 369
    7675    Width = 747
    7776    Align = alBottom
     
    8079  object Splitter1: TSplitter
    8180    Left = 200
    82     Height = 350
     81    Height = 343
    8382    Top = 26
    8483    Width = 5
     
    8685  object Splitter2: TSplitter
    8786    Left = 542
    88     Height = 350
     87    Height = 343
    8988    Top = 26
    9089    Width = 5
     
    9493  object PageControlCenter: TPageControl
    9594    Left = 205
    96     Height = 350
     95    Height = 343
    9796    Top = 26
    9897    Width = 337
     
    101100  end
    102101  object MainMenu: TMainMenu
    103     Images = DataModule1.ImageListMain
    104102    left = 80
    105103    top = 48
     
    225223  end
    226224  object ActionListMain: TActionList
    227     Images = DataModule1.ImageListMain
    228225    left = 80
    229226    top = 104
     
    394391  end
    395392  object PopupMenuRecentFiles: TPopupMenu
    396     Images = DataModule1.ImageListMain
    397393    left = 259
    398394    top = 69
  • trunk/StudioPackage/Forms/UFormMain.pas

    r16 r18  
    266266procedure TFormMain.LoadFromRegistry(Context: TRegistryContext);
    267267begin
    268   LastOpenedList1.LoadFromRegistry(Context.RootKey, Context.Key + '\RecentFiles');
     268  LastOpenedList1.LoadFromRegistry(RegContext(Context.RootKey, Context.Key + '\RecentFiles'));
    269269end;
    270270
    271271procedure TFormMain.SaveToRegistry(Context: TRegistryContext);
    272272begin
    273   LastOpenedList1.SaveToRegistry(Context.RootKey, Context.Key + '\RecentFiles');
     273  LastOpenedList1.SaveToRegistry(RegContext(Context.RootKey, Context.Key + '\RecentFiles'));
    274274end;
    275275
Note: See TracChangeset for help on using the changeset viewer.