From b9a8fee7794d03513a6d8b7bfb3f77df811582da Mon Sep 17 00:00:00 2001
From: graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>
Date: Tue, 4 Mar 2008 13:38:17 +0000
Subject: * More more on the MiG Layout port. * Added new resourcestring
 constants to the translation language files. * Localized all the GUI units.

---
 prototypes/miglayout/gui_mig_lc.pas        | 14 ++++++++++++++
 prototypes/miglayout/gui_mig_unitvalue.pas |  2 ++
 2 files changed, 16 insertions(+)

(limited to 'prototypes')

diff --git a/prototypes/miglayout/gui_mig_lc.pas b/prototypes/miglayout/gui_mig_lc.pas
index 49316592..1b787268 100644
--- a/prototypes/miglayout/gui_mig_lc.pas
+++ b/prototypes/miglayout/gui_mig_lc.pas
@@ -27,9 +27,12 @@ type
     FNoCache: Boolean;
     FAlignX: TUnitValue;
     FAlignY: TUnitValue;
+    FInsets: TUnitValueArray;
     FLeftToRight: Boolean;
     FTopToBottom: Boolean;
+    function GetInsets: TUnitValueArray;
     procedure SetHideMode(const AValue: integer);
+    procedure SetInsets(const AValue: TUnitValueArray);
   public
     constructor Create;
     property    NoCache: Boolean read FNoCache write FNoCache default False;
@@ -42,6 +45,7 @@ type
     property    GridGapX: TBoundSize read FGridGapX write FGridGapX;
     property    GridGapY: TBoundSize read FGridGapY write FGridGapY;
     property    HideMode: integer read FHideMode write SetHideMode;
+    property    Insets: TUnitValueArray read GetInsets write SetInsets;
     property    LeftToRight: Boolean read FLeftToRight write FLeftToRight;
     property    TopToBottom: Boolean read FTopToBottom write FTopToBottom;
   end;
@@ -61,6 +65,16 @@ begin
   FHideMode:=AValue;
 end;
 
+function TLC.GetInsets: TUnitValueArray;
+begin
+
+end;
+
+procedure TLC.SetInsets(const AValue: TUnitValueArray);
+begin
+
+end;
+
 constructor TLC.Create;
 begin
   FNoCache    := False;
diff --git a/prototypes/miglayout/gui_mig_unitvalue.pas b/prototypes/miglayout/gui_mig_unitvalue.pas
index 44925357..ef98936a 100644
--- a/prototypes/miglayout/gui_mig_unitvalue.pas
+++ b/prototypes/miglayout/gui_mig_unitvalue.pas
@@ -15,6 +15,8 @@ type
   public
     property    Pixels: integer read FPixels;
   end;
+  
+  TUnitValueArray = array[0..3] of TUnitValue;
 
 implementation
 
-- 
cgit v1.2.3-70-g09d2