mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-11 18:59:19 +02:00
ide: add empty project resources options frame (disabled by ifdef atm)
git-svn-id: trunk@43212 -
This commit is contained in:
parent
fbe7c6e932
commit
2ef23fc630
2
.gitattributes
vendored
2
.gitattributes
vendored
@ -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_lazdoc_options.pas svneol=native#text/plain
|
||||||
ide/frames/project_misc_options.lfm 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_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.lfm svneol=native#text/plain
|
||||||
ide/frames/project_save_options.pas svneol=native#text/plain
|
ide/frames/project_save_options.pas svneol=native#text/plain
|
||||||
ide/frames/project_versioninfo_options.lfm svneol=native#text/plain
|
ide/frames/project_versioninfo_options.lfm svneol=native#text/plain
|
||||||
|
@ -280,6 +280,7 @@ const
|
|||||||
ProjectOptionsLazDoc = 300;
|
ProjectOptionsLazDoc = 300;
|
||||||
ProjectOptionsSave = 400;
|
ProjectOptionsSave = 400;
|
||||||
ProjectOptionsVersionInfo = 500;
|
ProjectOptionsVersionInfo = 500;
|
||||||
|
ProjectOptionsResources = 550;
|
||||||
ProjectOptionsI18N = 600;
|
ProjectOptionsI18N = 600;
|
||||||
ProjectOptionsMisc = 700;
|
ProjectOptionsMisc = 700;
|
||||||
|
|
||||||
|
9
ide/frames/project_resources_options.lfm
Normal file
9
ide/frames/project_resources_options.lfm
Normal file
@ -0,0 +1,9 @@
|
|||||||
|
object ResourcesOptionsFrame: TResourcesOptionsFrame
|
||||||
|
Left = 0
|
||||||
|
Height = 240
|
||||||
|
Top = 0
|
||||||
|
Width = 320
|
||||||
|
TabOrder = 0
|
||||||
|
DesignLeft = 260
|
||||||
|
DesignTop = 149
|
||||||
|
end
|
59
ide/frames/project_resources_options.pas
Normal file
59
ide/frames/project_resources_options.pas
Normal 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.
|
||||||
|
|
@ -66,7 +66,7 @@
|
|||||||
<PackageName Value="SynEdit"/>
|
<PackageName Value="SynEdit"/>
|
||||||
</Item7>
|
</Item7>
|
||||||
</RequiredPackages>
|
</RequiredPackages>
|
||||||
<Units Count="109">
|
<Units Count="110">
|
||||||
<Unit0>
|
<Unit0>
|
||||||
<Filename Value="lazarus.pp"/>
|
<Filename Value="lazarus.pp"/>
|
||||||
<IsPartOfProject Value="True"/>
|
<IsPartOfProject Value="True"/>
|
||||||
@ -426,6 +426,7 @@
|
|||||||
<Filename Value="frames/project_application_options.pas"/>
|
<Filename Value="frames/project_application_options.pas"/>
|
||||||
<IsPartOfProject Value="True"/>
|
<IsPartOfProject Value="True"/>
|
||||||
<ComponentName Value="ProjectApplicationOptionsFrame"/>
|
<ComponentName Value="ProjectApplicationOptionsFrame"/>
|
||||||
|
<HasResources Value="True"/>
|
||||||
<ResourceBaseClass Value="Frame"/>
|
<ResourceBaseClass Value="Frame"/>
|
||||||
<UnitName Value="project_application_options"/>
|
<UnitName Value="project_application_options"/>
|
||||||
</Unit51>
|
</Unit51>
|
||||||
@ -820,6 +821,13 @@
|
|||||||
<ResourceBaseClass Value="Form"/>
|
<ResourceBaseClass Value="Form"/>
|
||||||
<UnitName Value="etMessagesWnd"/>
|
<UnitName Value="etMessagesWnd"/>
|
||||||
</Unit108>
|
</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>
|
</Units>
|
||||||
</ProjectOptions>
|
</ProjectOptions>
|
||||||
<CompilerOptions>
|
<CompilerOptions>
|
||||||
|
@ -2277,6 +2277,7 @@ resourcestring
|
|||||||
dlgProjectOptionsFor = 'Options for Project: %s';
|
dlgProjectOptionsFor = 'Options for Project: %s';
|
||||||
dlgPOApplication = 'Application';
|
dlgPOApplication = 'Application';
|
||||||
dlgPOFroms = 'Forms';
|
dlgPOFroms = 'Forms';
|
||||||
|
dlgPOResources = 'Resources';
|
||||||
dlgPOMisc = 'Miscellaneous';
|
dlgPOMisc = 'Miscellaneous';
|
||||||
dlgPOI18n = 'i18n';
|
dlgPOI18n = 'i18n';
|
||||||
rsEnableI18n = 'Enable i18n';
|
rsEnableI18n = 'Enable i18n';
|
||||||
|
@ -134,7 +134,7 @@ uses
|
|||||||
// project option frames
|
// project option frames
|
||||||
project_application_options, project_forms_options, project_lazdoc_options,
|
project_application_options, project_forms_options, project_lazdoc_options,
|
||||||
project_save_options, project_versioninfo_options, project_i18n_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
|
// project compiler option frames
|
||||||
compiler_path_options, compiler_config_target, compiler_parsing_options,
|
compiler_path_options, compiler_config_target, compiler_parsing_options,
|
||||||
compiler_codegen_options, compiler_debugging_options, compiler_verbosity_options,
|
compiler_codegen_options, compiler_debugging_options, compiler_verbosity_options,
|
||||||
|
Loading…
Reference in New Issue
Block a user