IDE: conditional compiler options: started editor

git-svn-id: trunk@17884 -
2025-08-27 10:20:19 +02:00 · 2008-12-22 16:52:15 +00:00 · 2008-12-22 16:52:15 +00:00 · 5297b18c25
commit 5297b18c25
parent 014229dcec
5 changed files with 159 additions and 1 deletions
--- a/.gitattributes
+++ b/.gitattributes
@ -2551,6 +2551,9 @@ ide/frames/options_codetools_space.pas svneol=native#text/pascal
 ide/frames/options_codetools_wordpolicy.lfm svneol=native#text/plain
 ide/frames/options_codetools_wordpolicy.lrs svneol=native#text/pascal
 ide/frames/options_codetools_wordpolicy.pas svneol=native#text/pascal
+ide/frames/options_compiler_conditionals.lfm svneol=native#text/plain
+ide/frames/options_compiler_conditionals.lrs svneol=native#text/plain
+ide/frames/options_compiler_conditionals.pas svneol=native#text/plain
 ide/frames/options_desktop.lfm svneol=native#text/plain
 ide/frames/options_desktop.lrs svneol=native#text/pascal
 ide/frames/options_desktop.pas svneol=native#text/pascal
--- a/ide/frames/options_backup.pas
+++ b/ide/frames/options_backup.pas
@ -18,7 +18,7 @@
 *                                                                         *
 ***************************************************************************
 }
-unit options_backup;
+unit Options_Backup;

 {$mode objfpc}{$H+}

--- a/ide/frames/options_compiler_conditionals.lfm
+++ b/ide/frames/options_compiler_conditionals.lfm
@ -0,0 +1,73 @@
+object CompOptsConditionalsFrame: TCompOptsConditionalsFrame
+  Left = 0
+  Height = 170
+  Top = 0
+  Width = 385
+  ClientHeight = 166
+  ClientWidth = 381
+  Ctl3D = False
+  TabOrder = 0
+  Visible = False
+  DesignLeft = 429
+  DesignTop = 305
+  object COCTreeView: TTreeView
+    Left = 0
+    Height = 166
+    Top = 0
+    Width = 381
+    Align = alClient
+    Ctl3D = False
+    DefaultItemHeight = 19
+    PopupMenu = COCPopupMenu
+    TabOrder = 0
+  end
+  object COCPopupMenu: TPopupMenu
+    left = 48
+    top = 48
+    object InsertAboveMenuItem: TMenuItem
+      Caption = 'InsertAboveMenuItem'
+      RightJustify = False
+      ShowAlwaysCheckable = False
+    end
+    object InsertBelowMenuItem: TMenuItem
+      Caption = 'InsertBelowMenuItem'
+      RightJustify = False
+      ShowAlwaysCheckable = False
+    end
+    object InsertChildMenuItem: TMenuItem
+      Caption = 'InsertChildMenuItem'
+      RightJustify = False
+      ShowAlwaysCheckable = False
+    end
+    object DeleteMenuItem: TMenuItem
+      Caption = 'DeleteMenuItem'
+      RightJustify = False
+      ShowAlwaysCheckable = False
+    end
+    object MoveUpMenuItem: TMenuItem
+      Caption = 'MoveUpMenuItem'
+      RightJustify = False
+      ShowAlwaysCheckable = False
+    end
+    object MoveDownMenuItem: TMenuItem
+      Caption = 'MoveDownMenuItem'
+      RightJustify = False
+      ShowAlwaysCheckable = False
+    end
+    object MoveLvlUpMenuItem: TMenuItem
+      Caption = 'MoveLvlUpMenuItem'
+      RightJustify = False
+      ShowAlwaysCheckable = False
+    end
+    object MoveLvlDownMenuItem: TMenuItem
+      Caption = 'MoveLvlDownMenuItem'
+      RightJustify = False
+      ShowAlwaysCheckable = False
+    end
+    object PropertiesMenuItem: TMenuItem
+      Caption = 'PropertiesMenuItem'
+      RightJustify = False
+      ShowAlwaysCheckable = False
+    end
+  end
+end
--- a/ide/frames/options_compiler_conditionals.lrs
+++ b/ide/frames/options_compiler_conditionals.lrs
@ -0,0 +1,26 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TCompOptsConditionalsFrame','FORMDATA',[
+  'TPF0'#26'TCompOptsConditionalsFrame'#25'CompOptsConditionalsFrame'#4'Left'#2
+  +#0#6'Height'#3#170#0#3'Top'#2#0#5'Width'#3#129#1#12'ClientHeight'#3#166#0#11
+  +'ClientWidth'#3'}'#1#5'Ctl3D'#8#8'TabOrder'#2#0#7'Visible'#8#10'DesignLeft'#3
+  +#173#1#9'DesignTop'#3'1'#1#0#9'TTreeView'#11'COCTreeView'#4'Left'#2#0#6'Heig'
+  +'ht'#3#166#0#3'Top'#2#0#5'Width'#3'}'#1#5'Align'#7#8'alClient'#5'Ctl3D'#8#17
+  +'DefaultItemHeight'#2#19#9'PopupMenu'#7#12'COCPopupMenu'#8'TabOrder'#2#0#0#0
+  +#10'TPopupMenu'#12'COCPopupMenu'#4'left'#2'0'#3'top'#2'0'#0#9'TMenuItem'#19
+  +'InsertAboveMenuItem'#7'Caption'#6#19'InsertAboveMenuItem'#12'RightJustify'#8
+  +#19'ShowAlwaysCheckable'#8#0#0#9'TMenuItem'#19'InsertBelowMenuItem'#7'Captio'
+  +'n'#6#19'InsertBelowMenuItem'#12'RightJustify'#8#19'ShowAlwaysCheckable'#8#0
+  +#0#9'TMenuItem'#19'InsertChildMenuItem'#7'Caption'#6#19'InsertChildMenuItem'
+  +#12'RightJustify'#8#19'ShowAlwaysCheckable'#8#0#0#9'TMenuItem'#14'DeleteMenu'
+  +'Item'#7'Caption'#6#14'DeleteMenuItem'#12'RightJustify'#8#19'ShowAlwaysCheck'
+  +'able'#8#0#0#9'TMenuItem'#14'MoveUpMenuItem'#7'Caption'#6#14'MoveUpMenuItem'
+  +#12'RightJustify'#8#19'ShowAlwaysCheckable'#8#0#0#9'TMenuItem'#16'MoveDownMe'
+  +'nuItem'#7'Caption'#6#16'MoveDownMenuItem'#12'RightJustify'#8#19'ShowAlwaysC'
+  +'heckable'#8#0#0#9'TMenuItem'#17'MoveLvlUpMenuItem'#7'Caption'#6#17'MoveLvlU'
+  +'pMenuItem'#12'RightJustify'#8#19'ShowAlwaysCheckable'#8#0#0#9'TMenuItem'#19
+  +'MoveLvlDownMenuItem'#7'Caption'#6#19'MoveLvlDownMenuItem'#12'RightJustify'#8
+  +#19'ShowAlwaysCheckable'#8#0#0#9'TMenuItem'#18'PropertiesMenuItem'#7'Caption'
+  +#6#18'PropertiesMenuItem'#12'RightJustify'#8#19'ShowAlwaysCheckable'#8#0#0#0
+  +#0
+]);
--- a/ide/frames/options_compiler_conditionals.pas
+++ b/ide/frames/options_compiler_conditionals.pas
@ -0,0 +1,56 @@
+{***************************************************************************
+ *                                                                         *
+ *   This source is free software; you can redistribute it and/or modify   *
+ *   it under the terms of the GNU General Public License as published by  *
+ *   the Free Software Foundation; either version 2 of the License, or     *
+ *   (at your option) any later version.                                   *
+ *                                                                         *
+ *   This code is distributed in the hope that it will be useful, but      *
+ *   WITHOUT ANY WARRANTY; without even the implied warranty of            *
+ *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU     *
+ *   General Public License for more details.                              *
+ *                                                                         *
+ *   A copy of the GNU General Public License is available on the World    *
+ *   Wide Web at <http://www.gnu.org/copyleft/gpl.html>. You can also      *
+ *   obtain it by writing to the Free Software Foundation,                 *
+ *   Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.        *
+ *                                                                         *
+ ***************************************************************************
+}
+unit Options_Compiler_Conditionals;
+
+{$mode objfpc}{$H+}
+
+interface
+
+uses
+  Classes, SysUtils, FileUtil, LResources, Forms, ComCtrls, Menus,
+  compop;
+
+type
+
+  { TCompOptsConditionalsFrame }
+
+  TCompOptsConditionalsFrame = class(TFrame)
+    COCTreeView: TTreeView;
+    COCPopupMenu: TPopupMenu;
+    InsertAboveMenuItem: TMenuItem;
+    InsertBelowMenuItem: TMenuItem;
+    InsertChildMenuItem: TMenuItem;
+    DeleteMenuItem: TMenuItem;
+    PropertiesMenuItem: TMenuItem;
+    MoveLvlDownMenuItem: TMenuItem;
+    MoveLvlUpMenuItem: TMenuItem;
+    MoveDownMenuItem: TMenuItem;
+    MoveUpMenuItem: TMenuItem;
+  private
+  public
+  end;
+
+implementation
+
+initialization
+  {$I options_compiler_conditionals.lrs}
+
+end.
+