Merge pull request #131 from bgrabitmap/dev-bgracontrols

Dev bgracontrols
bgrabitmap · Aug 6, 2022 · ff5c54f · ff5c54f
2 parents 4dcdb9a + 2a7ec42
commit ff5c54f
Show file tree

Hide file tree

Showing 153 changed files with 1,020 additions and 258 deletions.
diff --git a/bccombobox.pas b/bccombobox.pas
@@ -6,7 +6,7 @@
 interface
 
 uses
-  Classes, SysUtils, LResources, Forms, Controls, ExtCtrls, Graphics, Dialogs, BCButton,
+  {$ifdef WINDOWS}Windows,{$endif} Classes, SysUtils, LResources, Forms, Controls, ExtCtrls, Graphics, Dialogs, BCButton,
   StdCtrls, BCTypes, BCBaseCtrls, BGRABitmap, BGRABitmapTypes, LMessages, LCLType;
 
 type
@@ -59,7 +59,7 @@   TBCComboBox = class(TBCStyleCustomControl)
     function GetStateHover: TBCButtonState;
     function GetStateNormal: TBCButtonState;
     function GetStaticButton: boolean;
-    procedure ListBoxKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState
+    procedure ListBoxKeyDown(Sender: TObject; var Key: Word; {%H-}Shift: TShiftState
       );
     procedure ListBoxMouseUp({%H-}Sender: TObject; {%H-}Button: TMouseButton;
                           {%H-}Shift: TShiftState; {%H-}X, {%H-}Y: Integer);
@@ -89,10 +89,10 @@   TBCComboBox = class(TBCStyleCustomControl)
     procedure SetStaticButton(AValue: boolean);
   protected
     function GetStyleExtension: String; override;
-    procedure WMSetFocus(var Message: {$IFDEF FPC}TLMSetFocus{$ELSE}TWMSetFocus{$ENDIF}); message {$IFDEF FPC}LM_SETFOCUS{$ELSE}WM_SETFOCUS{$ENDIF};
+    procedure WMSetFocus(var {%H-}Message: {$IFDEF FPC}TLMSetFocus{$ELSE}TWMSetFocus{$ENDIF}); message {$IFDEF FPC}LM_SETFOCUS{$ELSE}WM_SETFOCUS{$ENDIF};
     procedure WMKillFocus(var Message: {$IFDEF FPC}TLMKillFocus{$ELSE}TWMKillFocus{$ENDIF}); message {$IFDEF FPC}LM_KILLFOCUS{$ELSE}WM_KILLFOCUS{$ENDIF};
     procedure UpdateFocus(AFocused: boolean);
-    procedure KeyDown(var Key: Word; Shift: TShiftState); override;
+    procedure KeyDown(var Key: Word; {%H-}Shift: TShiftState); override;
     procedure UTF8KeyPress(var UTF8Key: TUTF8Char); override;
     procedure CreateForm;
     procedure FreeForm;
@@ -410,9 +410,18 @@ procedure TBCComboBox.OnAfterRenderButton(Sender: TObject;
 end;
 
 procedure TBCComboBox.OnTimerCheckFormHide(Sender: TObject);
+  {$ifdef WINDOWS}
+  function IsDropDownOnTop: boolean;
+  begin
+    result := Assigned(FForm) and (GetForegroundWindow = FForm.Handle);
+  end;
+  {$endif}
+
 begin
   if Assigned(FForm) and FForm.Visible and
-    ({$IFDEF DARWIN}not FForm.Active or {$ENDIF}FQueryFormHide) then
+    ({$IFDEF DARWIN}not FForm.Active or {$ENDIF}
+     {$IFDEF WINDOWS}not IsDropDownOnTop or{$ENDIF}
+     FQueryFormHide) then
   begin
     FForm.Visible := false;
     FQueryFormHide := false;

diff --git a/bcmaterialprogressbarmarquee.pas b/bcmaterialprogressbarmarquee.pas
@@ -22,7 +22,8 @@   TBCMaterialProgressBarMarquee = class(TBGRAGraphicControl)
     procedure SetBarColor(AValue: TColor);
     procedure TimerOnTimer(Sender: TObject);
   protected
-
+    procedure SetEnabled(Value: Boolean); override;
+    procedure SetVisible(Value: Boolean); override;
   public
     procedure DiscardBitmap;
     procedure RedrawBitmapContent; override;
@@ -67,6 +68,20 @@ procedure TBCMaterialProgressBarMarquee.TimerOnTimer(Sender: TObject);
   DiscardBitmap;
 end;
 
+procedure TBCMaterialProgressBarMarquee.SetEnabled(Value: Boolean);
+begin
+  inherited SetEnabled(Value);
+  FTimer.Enabled := Value and Visible;
+  DiscardBitmap;
+end;
+
+procedure TBCMaterialProgressBarMarquee.SetVisible(Value: Boolean);
+begin
+  inherited SetVisible(Value);
+  FTimer.Enabled := Enabled and Value;
+  DiscardBitmap;
+end;
+
 procedure TBCMaterialProgressBarMarquee.SetBarColor(AValue: TColor);
 begin
   if FBarColor = AValue then
@@ -84,9 +99,16 @@ procedure TBCMaterialProgressBarMarquee.DiscardBitmap;
 
 procedure TBCMaterialProgressBarMarquee.RedrawBitmapContent;
 begin
+  if FTimer.Enabled then
+  begin
   Bitmap.Fill(Color);
   Bitmap.Rectangle(Rect(progressbar_x, 0, progressbar_x + progressbar_w, Bitmap.Height),
     BarColor, BarColor);
+  end
+  else
+  begin
+    Bitmap.Fill(BarColor);
+  end;
 end;
 
 constructor TBCMaterialProgressBarMarquee.Create(AOwner: TComponent);

diff --git a/bgracontrols.lpk b/bgracontrols.lpk
@@ -28,7 +28,7 @@
     </CompilerOptions>
     <Description Value="BGRA Controls is a set of graphical UI elements that you can use with Lazarus LCL applications."/>
     <License Value="Modified LGPL"/>
-    <Version Major="7" Minor="5"/>
+    <Version Major="7" Minor="6"/>
     <Files Count="67">
       <Item1>
         <Filename Value="atshapelinebgra.pas"/>

diff --git a/bgracontrolsinfo.pas b/bgracontrolsinfo.pas
@@ -9,7 +9,7 @@ interface
   Classes, SysUtils;
 
 const
-  BGRAControlsVersion = 7050000;
+  BGRAControlsVersion = 7060000;
 
   function BGRAControlsVersionStr: string;
 

diff --git a/bgrapascalscriptcomponent.lpk b/bgrapascalscriptcomponent.lpk
@@ -11,7 +11,7 @@
         <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
       </SearchPaths>
     </CompilerOptions>
-    <Version Major="7" Minor="5"/>
+    <Version Major="7" Minor="6"/>
     <Files Count="3">
       <Item1>
         <Filename Value="bgrapascalscript.pas"/>

diff --git a/bgrasvgimagelistform/bgrasvgimagelistproject.lpi b/bgrasvgimagelistform/bgrasvgimagelistproject.lpi
@@ -1,11 +1,13 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
   <ProjectOptions>
-    <Version Value="11"/>
+    <Version Value="12"/>
     <PathDelim Value="\"/>
     <General>
+      <Flags>
+        <CompatibilityMode Value="True"/>
+      </Flags>
       <SessionStorage Value="InProjectDir"/>
-      <MainUnit Value="0"/>
       <Title Value="bgrasvgimagelistproject"/>
       <Scaled Value="True"/>
       <ResourceType Value="res"/>
@@ -24,7 +26,6 @@
     </PublishOptions>
     <RunParams>
       <FormatVersion Value="2"/>
-      <Modes Count="0"/>
     </RunParams>
     <RequiredPackages Count="2">
       <Item1>
@@ -59,6 +60,9 @@
       <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>
     <Linking>
+      <Debugging>
+        <DebugInfoType Value="dsDwarf2Set"/>
+      </Debugging>
       <Options>
         <Win32>
           <GraphicApplication Value="True"/>

diff --git a/docs/img/analogcontrols.png b/docs/img/analogcontrols.png
diff --git a/docs/img/bcbutton.png b/docs/img/bcbutton.png
diff --git a/docs/img/bcbuttonfocus.png b/docs/img/bcbuttonfocus.png
diff --git a/docs/img/bcimagebutton.png b/docs/img/bcimagebutton.png
diff --git a/docs/img/bctoolbar.png b/docs/img/bctoolbar.png
diff --git a/docs/img/bcxbutton.png b/docs/img/bcxbutton.png
diff --git a/docs/img/bgraribbon.png b/docs/img/bgraribbon.png
diff --git a/docs/img/logo.png b/docs/img/logo.png
diff --git a/docs/img/progressbar.png b/docs/img/progressbar.png
diff --git a/icons/tbcbutton.png b/icons/tbcbutton.png
diff --git a/icons/tbcbuttonfocus.png b/icons/tbcbuttonfocus.png
diff --git a/icons/tbcradialprogressbar.png b/icons/tbcradialprogressbar.png
diff --git a/icons/tbgraflashprogressbar.png b/icons/tbgraflashprogressbar.png
diff --git a/icons/tdtthemedclock.png b/icons/tdtthemedclock.png
diff --git a/images/tbcbutton.png b/images/tbcbutton.png
diff --git a/images/tbcbutton_150.png b/images/tbcbutton_150.png
diff --git a/images/tbcbutton_200.png b/images/tbcbutton_200.png
diff --git a/images/tbcbuttonfocus.png b/images/tbcbuttonfocus.png
diff --git a/images/tbcbuttonfocus_150.png b/images/tbcbuttonfocus_150.png
diff --git a/images/tbcbuttonfocus_200.png b/images/tbcbuttonfocus_200.png
diff --git a/images/tbccombobox.png b/images/tbccombobox.png
diff --git a/images/tbccombobox_150.png b/images/tbccombobox_150.png
diff --git a/images/tbccombobox_200.png b/images/tbccombobox_200.png
diff --git a/images/tbclabel_200.png b/images/tbclabel_200.png
diff --git a/images/tbclistbox.png b/images/tbclistbox.png
diff --git a/images/tbclistbox_150.png b/images/tbclistbox_150.png
diff --git a/images/tbclistbox_200.png b/images/tbclistbox_200.png
diff --git a/images/tbcmaterialdesignbutton.png b/images/tbcmaterialdesignbutton.png
diff --git a/images/tbcmaterialdesignbutton_150.png b/images/tbcmaterialdesignbutton_150.png
diff --git a/images/tbcmaterialdesignbutton_200.png b/images/tbcmaterialdesignbutton_200.png
diff --git a/images/tbcmdbutton.png b/images/tbcmdbutton.png
diff --git a/images/tbcmdbutton_150.png b/images/tbcmdbutton_150.png
diff --git a/images/tbcmdbutton_200.png b/images/tbcmdbutton_200.png
diff --git a/images/tbcmdbuttonfocus.png b/images/tbcmdbuttonfocus.png
diff --git a/images/tbcmdbuttonfocus_150.png b/images/tbcmdbuttonfocus_150.png
diff --git a/images/tbcmdbuttonfocus_200.png b/images/tbcmdbuttonfocus_200.png
diff --git a/images/tbcpanel_150.png b/images/tbcpanel_150.png
diff --git a/images/tbcpanel_200.png b/images/tbcpanel_200.png
diff --git a/images/tbcpaperlistbox.png b/images/tbcpaperlistbox.png
diff --git a/images/tbcpaperlistbox_150.png b/images/tbcpaperlistbox_150.png
diff --git a/images/tbcpaperlistbox_200.png b/images/tbcpaperlistbox_200.png
diff --git a/images/tbcpaperpanel_150.png b/images/tbcpaperpanel_150.png
diff --git a/images/tbcpaperpanel_200.png b/images/tbcpaperpanel_200.png
diff --git a/images/tbcsvgviewer.png b/images/tbcsvgviewer.png
diff --git a/images/tbcsvgviewer_150.png b/images/tbcsvgviewer_150.png
diff --git a/images/tbcsvgviewer_200.png b/images/tbcsvgviewer_200.png
diff --git a/images/tbctoolbar.png b/images/tbctoolbar.png
diff --git a/images/tbctoolbar_150.png b/images/tbctoolbar_150.png
diff --git a/images/tbctoolbar_200.png b/images/tbctoolbar_200.png
diff --git a/images/tbctrackbarupdown.png b/images/tbctrackbarupdown.png
diff --git a/images/tbctrackbarupdown_150.png b/images/tbctrackbarupdown_150.png
diff --git a/images/tbctrackbarupdown_200.png b/images/tbctrackbarupdown_200.png
diff --git a/images/tbcxbutton.png b/images/tbcxbutton.png
diff --git a/images/tbcxbutton_150.png b/images/tbcxbutton_150.png
diff --git a/images/tbcxbutton_200.png b/images/tbcxbutton_200.png
diff --git a/images/tbgracolortheme_150.png b/images/tbgracolortheme_150.png
diff --git a/images/tbgracolortheme_200.png b/images/tbgracolortheme_200.png
diff --git a/images/tbgragraphiccontrol_150.png b/images/tbgragraphiccontrol_150.png
diff --git a/images/tbgragraphiccontrol_200.png b/images/tbgragraphiccontrol_200.png
diff --git a/images/tbgraimagelist.png b/images/tbgraimagelist.png
diff --git a/images/tbgraimagelist_150.png b/images/tbgraimagelist_150.png
diff --git a/images/tbgraimagelist_200.png b/images/tbgraimagelist_200.png
diff --git a/images/tbgraimagetheme_150.png b/images/tbgraimagetheme_150.png
diff --git a/images/tbgraimagetheme_200.png b/images/tbgraimagetheme_200.png
diff --git a/images/tbgraknob.png b/images/tbgraknob.png
diff --git a/images/tbgraknob_150.png b/images/tbgraknob_150.png
diff --git a/images/tbgraknob_200.png b/images/tbgraknob_200.png
diff --git a/images/tbgraresizespeedbutton.png b/images/tbgraresizespeedbutton.png
diff --git a/images/tbgraresizespeedbutton_150.png b/images/tbgraresizespeedbutton_150.png
diff --git a/images/tbgraresizespeedbutton_200.png b/images/tbgraresizespeedbutton_200.png
diff --git a/images/tbgrashape.png b/images/tbgrashape.png
diff --git a/images/tbgrashape_150.png b/images/tbgrashape_150.png
diff --git a/images/tbgrashape_200.png b/images/tbgrashape_200.png
diff --git a/images/tbgraspeedbutton.png b/images/tbgraspeedbutton.png
diff --git a/images/tbgraspeedbutton_150.png b/images/tbgraspeedbutton_150.png
diff --git a/images/tbgraspeedbutton_200.png b/images/tbgraspeedbutton_200.png
diff --git a/images/tbgraspriteanimation.png b/images/tbgraspriteanimation.png
diff --git a/images/tbgraspriteanimation_150.png b/images/tbgraspriteanimation_150.png
diff --git a/images/tbgraspriteanimation_200.png b/images/tbgraspriteanimation_200.png
diff --git a/images/tbgratheme_150.png b/images/tbgratheme_150.png
diff --git a/images/tbgratheme_200.png b/images/tbgratheme_200.png
diff --git a/images/tbgrathemebutton.png b/images/tbgrathemebutton.png
diff --git a/images/tbgrathemebutton_150.png b/images/tbgrathemebutton_150.png
diff --git a/images/tbgrathemebutton_200.png b/images/tbgrathemebutton_200.png
diff --git a/images/tbgrathemeradiobutton.png b/images/tbgrathemeradiobutton.png
diff --git a/images/tbgrathemeradiobutton_150.png b/images/tbgrathemeradiobutton_150.png
diff --git a/images/tbgrathemeradiobutton_200.png b/images/tbgrathemeradiobutton_200.png
diff --git a/images/tbgravirtualscreen_150.png b/images/tbgravirtualscreen_150.png
diff --git a/images/tbgravirtualscreen_200.png b/images/tbgravirtualscreen_200.png
diff --git a/images/tcolorspeedbutton.png b/images/tcolorspeedbutton.png
diff --git a/images/tcolorspeedbutton_150.png b/images/tcolorspeedbutton_150.png
diff --git a/images/tcolorspeedbutton_200.png b/images/tcolorspeedbutton_200.png
diff --git a/images/tdtanalogclock.png b/images/tdtanalogclock.png
diff --git a/images/tdtanalogclock_150.png b/images/tdtanalogclock_150.png
diff --git a/images/tdtanalogclock_200.png b/images/tdtanalogclock_200.png
diff --git a/images/tdtanaloggauge.png b/images/tdtanaloggauge.png
diff --git a/images/tdtanaloggauge_150.png b/images/tdtanaloggauge_150.png
diff --git a/images/tdtanaloggauge_200.png b/images/tdtanaloggauge_200.png
diff --git a/images/tdtthemedclock.png b/images/tdtthemedclock.png
diff --git a/images/tdtthemedclock_150.png b/images/tdtthemedclock_150.png
diff --git a/images/tdtthemedclock_200.png b/images/tdtthemedclock_200.png
diff --git a/images/tdtthemedgauge.png b/images/tdtthemedgauge.png
diff --git a/images/tdtthemedgauge_150.png b/images/tdtthemedgauge_150.png
diff --git a/images/tdtthemedgauge_200.png b/images/tdtthemedgauge_200.png
diff --git a/test/test_bcbutton_macos_style/test_bcbuttonmacos_style.lpi b/test/test_bcbutton_macos_style/test_bcbuttonmacos_style.lpi
@@ -1,11 +1,13 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
   <ProjectOptions>
-    <Version Value="10"/>
+    <Version Value="12"/>
     <PathDelim Value="\"/>
     <General>
+      <Flags>
+        <CompatibilityMode Value="True"/>
+      </Flags>
       <SessionStorage Value="InProjectDir"/>
-      <MainUnit Value="0"/>
       <Title Value="test_bcbuttonmacos_style"/>
       <Scaled Value="True"/>
       <ResourceType Value="res"/>
@@ -22,9 +24,10 @@
       <Version Value="2"/>
     </PublishOptions>
     <RunParams>
-      <local>
-        <FormatVersion Value="1"/>
-      </local>
+      <FormatVersion Value="2"/>
+      <Modes Count="1">
+        <Mode0 Name="default"/>
+      </Modes>
     </RunParams>
     <RequiredPackages Count="2">
       <Item1>
@@ -59,6 +62,9 @@
       <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>
     <Linking>
+      <Debugging>
+        <DebugInfoType Value="dsDwarf2Set"/>
+      </Debugging>
       <Options>
         <Win32>
           <GraphicApplication Value="True"/>

diff --git a/test/test_bccombobox/test_bccombobox.lpi b/test/test_bccombobox/test_bccombobox.lpi
@@ -26,7 +26,6 @@
     </PublishOptions>
     <RunParams>
       <FormatVersion Value="2"/>
-      <Modes Count="0"/>
     </RunParams>
     <RequiredPackages Count="2">
       <Item1>
@@ -61,6 +60,9 @@
       <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>
     <Linking>
+      <Debugging>
+        <DebugInfoType Value="dsDwarf2Set"/>
+      </Debugging>
       <Options>
         <Win32>
           <GraphicApplication Value="True"/>

diff --git a/test/test_bcimagebutton/button.bcimagebutton b/test/test_bcimagebutton/button.bcimagebutton
@@ -0,0 +1,16 @@
+object BCImageButton5: TBCImageButton
+  Left = 32
+  Height = 55
+  Top = 269
+  Width = 275
+  Anchors = [akTop, akLeft, akRight]
+  BitmapFile = 'D:\repositorios\bgracontrols\test\test_bcimagebutton\sample_5.png'
+  BitmapOptions.AutoDetectRepeat = True
+  BitmapOptions.MarginTop = 4
+  BitmapOptions.MarginRight = 4
+  BitmapOptions.MarginBottom = 4
+  BitmapOptions.MarginLeft = 4
+  BitmapOptions.Direction = sdVertical
+  Caption = 'BCImageButton5'
+  ParentFont = False
+end
diff --git a/test/test_bcimagebutton/sample_1.png b/test/test_bcimagebutton/sample_1.png
diff --git a/test/test_bcimagebutton_3dbutton/boton3d.png b/test/test_bcimagebutton_3dbutton/boton3d.png
diff --git a/test/test_bcimagebutton_3dbutton/test_drawing.lpi b/test/test_bcimagebutton_3dbutton/test_drawing.lpi
@@ -1,11 +1,13 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
   <ProjectOptions>
-    <Version Value="10"/>
+    <Version Value="12"/>
     <PathDelim Value="\"/>
     <General>
+      <Flags>
+        <CompatibilityMode Value="True"/>
+      </Flags>
       <SessionStorage Value="InProjectDir"/>
-      <MainUnit Value="0"/>
       <Title Value="test_drawing"/>
       <ResourceType Value="res"/>
       <UseXPManifest Value="True"/>
@@ -23,9 +25,10 @@
       <Version Value="2"/>
     </PublishOptions>
     <RunParams>
-      <local>
-        <FormatVersion Value="1"/>
-      </local>
+      <FormatVersion Value="2"/>
+      <Modes Count="1">
+        <Mode0 Name="default"/>
+      </Modes>
     </RunParams>
     <RequiredPackages Count="2">
       <Item1>
@@ -60,6 +63,9 @@
       <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>
     <Linking>
+      <Debugging>
+        <DebugInfoType Value="dsDwarf2Set"/>
+      </Debugging>
       <Options>
         <Win32>
           <GraphicApplication Value="True"/>

diff --git a/test/test_bcimagebutton_alpha/button.png b/test/test_bcimagebutton_alpha/button.png
diff --git a/test/test_bcimagebutton_alpha/button2.png b/test/test_bcimagebutton_alpha/button2.png
diff --git a/test/test_bcimagebutton_alpha/test.lpi b/test/test_bcimagebutton_alpha/test.lpi
@@ -1,11 +1,13 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
   <ProjectOptions>
-    <Version Value="11"/>
+    <Version Value="12"/>
     <PathDelim Value="\"/>
     <General>
+      <Flags>
+        <CompatibilityMode Value="True"/>
+      </Flags>
       <SessionStorage Value="InProjectDir"/>
-      <MainUnit Value="0"/>
       <Title Value="test"/>
       <Scaled Value="True"/>
       <ResourceType Value="res"/>
@@ -98,7 +100,6 @@
     </PublishOptions>
     <RunParams>
       <FormatVersion Value="2"/>
-      <Modes Count="0"/>
     </RunParams>
     <RequiredPackages Count="2">
       <Item1>
@@ -133,6 +134,9 @@
       <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>
     <Linking>
+      <Debugging>
+        <DebugInfoType Value="dsDwarf2Set"/>
+      </Debugging>
       <Options>
         <Win32>
           <GraphicApplication Value="True"/>

diff --git a/test/test_bcimagebutton_toggle/test.lpi b/test/test_bcimagebutton_toggle/test.lpi
@@ -1,11 +1,13 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
   <ProjectOptions>
-    <Version Value="11"/>
+    <Version Value="12"/>
     <PathDelim Value="\"/>
     <General>
+      <Flags>
+        <CompatibilityMode Value="True"/>
+      </Flags>
       <SessionStorage Value="InProjectDir"/>
-      <MainUnit Value="0"/>
       <Title Value="test"/>
       <Scaled Value="True"/>
       <ResourceType Value="res"/>
@@ -27,7 +29,6 @@
     </PublishOptions>
     <RunParams>
       <FormatVersion Value="2"/>
-      <Modes Count="0"/>
     </RunParams>
     <RequiredPackages Count="2">
       <Item1>
@@ -46,6 +47,7 @@
         <Filename Value="umain.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="Form1"/>
+        <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
       </Unit1>
     </Units>
@@ -61,6 +63,9 @@
       <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>
     <Linking>
+      <Debugging>
+        <DebugInfoType Value="dsDwarf2Set"/>
+      </Debugging>
       <Options>
         <Win32>
           <GraphicApplication Value="True"/>

diff --git a/test/test_bcimagebutton_toggle/toggle.png b/test/test_bcimagebutton_toggle/toggle.png
diff --git a/test/test_bcsvg/test_svg.lpi b/test/test_bcsvg/test_svg.lpi
@@ -1,11 +1,13 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
   <ProjectOptions>
-    <Version Value="10"/>
+    <Version Value="12"/>
     <PathDelim Value="\"/>
     <General>
+      <Flags>
+        <CompatibilityMode Value="True"/>
+      </Flags>
       <SessionStorage Value="InProjectDir"/>
-      <MainUnit Value="0"/>
       <Title Value="test_svg"/>
       <Scaled Value="True"/>
       <ResourceType Value="res"/>
@@ -25,9 +27,10 @@
       <Version Value="2"/>
     </PublishOptions>
     <RunParams>
-      <local>
-        <FormatVersion Value="1"/>
-      </local>
+      <FormatVersion Value="2"/>
+      <Modes Count="1">
+        <Mode0 Name="default"/>
+      </Modes>
     </RunParams>
     <RequiredPackages Count="2">
       <Item1>
@@ -62,6 +65,9 @@
       <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>
     <Linking>
+      <Debugging>
+        <DebugInfoType Value="dsDwarf2Set"/>
+      </Debugging>
       <Options>
         <Win32>
           <GraphicApplication Value="True"/>