ide: add empty project resources options frame (disabled by ifdef atm)

git-svn-id: trunk@43212 -
This commit is contained in:
paul 2013-10-12 04:51:53 +00:00
parent fbe7c6e932
commit 2ef23fc630
7 changed files with 82 additions and 2 deletions

2
.gitattributes vendored
View File

@ -5129,6 +5129,8 @@ ide/frames/project_lazdoc_options.lfm svneol=native#text/plain
ide/frames/project_lazdoc_options.pas svneol=native#text/plain
ide/frames/project_misc_options.lfm svneol=native#text/plain
ide/frames/project_misc_options.pas svneol=native#text/plain
ide/frames/project_resources_options.lfm svneol=native#text/plain
ide/frames/project_resources_options.pas svneol=native#text/pascal
ide/frames/project_save_options.lfm svneol=native#text/plain
ide/frames/project_save_options.pas svneol=native#text/plain
ide/frames/project_versioninfo_options.lfm svneol=native#text/plain

View File

@ -280,6 +280,7 @@ const
ProjectOptionsLazDoc = 300;
ProjectOptionsSave = 400;
ProjectOptionsVersionInfo = 500;
ProjectOptionsResources = 550;
ProjectOptionsI18N = 600;
ProjectOptionsMisc = 700;

View File

@ -0,0 +1,9 @@
object ResourcesOptionsFrame: TResourcesOptionsFrame
Left = 0
Height = 240
Top = 0
Width = 320
TabOrder = 0
DesignLeft = 260
DesignTop = 149
end

View File

@ -0,0 +1,59 @@
unit project_resources_options;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls,
IDEOptionsIntf, Project, LazarusIDEStrConsts;
type
{ TResourcesOptionsFrame }
TResourcesOptionsFrame = class(TAbstractIDEOptionsEditor)
public
function GetTitle: string; override;
procedure Setup(ADialog: TAbstractOptionsEditorDialog); override;
procedure ReadSettings(AOptions: TAbstractIDEOptions); override;
procedure WriteSettings(AOptions: TAbstractIDEOptions); override;
class function SupportedOptionsClass: TAbstractIDEOptionsClass; override;
end;
implementation
{$R *.lfm}
{ TResourcesOptionsFrame }
function TResourcesOptionsFrame.GetTitle: string;
begin
Result := dlgPOResources;
end;
procedure TResourcesOptionsFrame.Setup(ADialog: TAbstractOptionsEditorDialog);
begin
end;
procedure TResourcesOptionsFrame.ReadSettings(AOptions: TAbstractIDEOptions);
begin
end;
procedure TResourcesOptionsFrame.WriteSettings(AOptions: TAbstractIDEOptions);
begin
end;
class function TResourcesOptionsFrame.SupportedOptionsClass: TAbstractIDEOptionsClass;
begin
Result := TProject;
end;
initialization
RegisterIDEOptionsEditor(GroupProject, TResourcesOptionsFrame, ProjectOptionsResources);
end.

View File

@ -66,7 +66,7 @@
<PackageName Value="SynEdit"/>
</Item7>
</RequiredPackages>
<Units Count="109">
<Units Count="110">
<Unit0>
<Filename Value="lazarus.pp"/>
<IsPartOfProject Value="True"/>
@ -426,6 +426,7 @@
<Filename Value="frames/project_application_options.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="ProjectApplicationOptionsFrame"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Frame"/>
<UnitName Value="project_application_options"/>
</Unit51>
@ -820,6 +821,13 @@
<ResourceBaseClass Value="Form"/>
<UnitName Value="etMessagesWnd"/>
</Unit108>
<Unit109>
<Filename Value="frames/project_resources_options.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="ResourcesOptionsFrame"/>
<ResourceBaseClass Value="Frame"/>
<UnitName Value="project_resources_options"/>
</Unit109>
</Units>
</ProjectOptions>
<CompilerOptions>

View File

@ -2277,6 +2277,7 @@ resourcestring
dlgProjectOptionsFor = 'Options for Project: %s';
dlgPOApplication = 'Application';
dlgPOFroms = 'Forms';
dlgPOResources = 'Resources';
dlgPOMisc = 'Miscellaneous';
dlgPOI18n = 'i18n';
rsEnableI18n = 'Enable i18n';

View File

@ -134,7 +134,7 @@ uses
// project option frames
project_application_options, project_forms_options, project_lazdoc_options,
project_save_options, project_versioninfo_options, project_i18n_options,
project_misc_options,
project_misc_options, {$ifdef UseProjectResourcesFrame} project_resources_options, {$endif}
// project compiler option frames
compiler_path_options, compiler_config_target, compiler_parsing_options,
compiler_codegen_options, compiler_debugging_options, compiler_verbosity_options,