mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-05 23:58:06 +02:00
IDE: removed obsolete custom components
git-svn-id: trunk@56783 -
This commit is contained in:
parent
ecaababe22
commit
20638d46c7
@ -3287,7 +3287,6 @@ begin
|
||||
ecViewProjectUnits: DoViewUnitsAndForms(false);
|
||||
ecViewProjectForms: DoViewUnitsAndForms(true);
|
||||
ecProjectInspector: DoShowProjectInspector;
|
||||
ecConfigCustomComps: PkgBoss.ShowConfigureCustomComponents;
|
||||
ecExtToolFirst..ecExtToolLast: DoRunExternalTool(Command-ecExtToolFirst,false);
|
||||
ecSyntaxCheck: DoCheckSyntax;
|
||||
ecGuessUnclosedBlock: DoJumpToGuessedUnclosedBlock(true);
|
||||
|
@ -134,7 +134,6 @@ type
|
||||
// package installation
|
||||
procedure LoadInstalledPackages; virtual; abstract;
|
||||
function DoShowLoadedPkgDlg: TModalResult; virtual; abstract;
|
||||
function ShowConfigureCustomComponents: TModalResult; virtual; abstract;
|
||||
function DoCompileAutoInstallPackages(Flags: TPkgCompileFlags;
|
||||
OnlyBase: boolean): TModalResult; virtual; abstract;
|
||||
function DoSaveAutoInstallConfig: TModalResult; virtual; abstract;
|
||||
|
@ -62,7 +62,7 @@ uses
|
||||
// IDE
|
||||
PkgRegisterBase, IDECmdLine, LazarusIDEStrConsts, IDEProcs, ObjectLists,
|
||||
DialogProcs, IDECommands, IDEOptionDefs, EnvironmentOpts, MiscOptions,
|
||||
InputHistory, Project, OldCustomCompDlg, PackageEditor, AddToPackageDlg,
|
||||
InputHistory, Project, PackageEditor, AddToPackageDlg,
|
||||
PackageDefs, PackageLinks, PackageSystem, OpenInstalledPkgDlg,
|
||||
PkgGraphExplorer, BrokenDependenciesDlg, CompilerOptions,
|
||||
IDETranslations, TransferMacros, BuildLazDialog, NewDialog, FindInFilesDlg,
|
||||
@ -145,7 +145,6 @@ type
|
||||
procedure MainIDEitmPkgAddCurFileToPkgClick(Sender: TObject);
|
||||
procedure MainIDEitmPkgNewComponentClick(Sender: TObject);
|
||||
procedure MainIDEitmPkgOpenPackageOfCurUnitClicked(Sender: TObject);
|
||||
procedure MainIDEitmConfigCustomCompsClicked(Sender: TObject);
|
||||
procedure MainIDEitmOpenRecentPackageClicked(Sender: TObject);
|
||||
procedure MainIDEitmPkgOpenLoadedPackageClicked(Sender: TObject);
|
||||
procedure MainIDEitmPkgNewPackageClick(Sender: TObject);
|
||||
@ -332,7 +331,6 @@ type
|
||||
// package installation
|
||||
procedure LoadInstalledPackages; override;
|
||||
procedure UnloadInstalledPackages;
|
||||
function ShowConfigureCustomComponents: TModalResult; override;
|
||||
function DoInstallPackage(APackage: TLazPackage): TModalResult;
|
||||
function DoUninstallPackage(APackage: TLazPackage;
|
||||
Flags: TPkgUninstallFlags; ShowAbort: boolean): TModalResult;
|
||||
@ -1036,11 +1034,6 @@ begin
|
||||
Result:=DoUninstallPackage(APackage,[],false);
|
||||
end;
|
||||
|
||||
procedure TPkgManager.MainIDEitmConfigCustomCompsClicked(Sender: TObject);
|
||||
begin
|
||||
ShowConfigureCustomComponents;
|
||||
end;
|
||||
|
||||
procedure TPkgManager.MainIDEitmPkgNewPackageClick(Sender: TObject);
|
||||
begin
|
||||
DoNewPackage;
|
||||
@ -3509,11 +3502,6 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
function TPkgManager.ShowConfigureCustomComponents: TModalResult;
|
||||
begin
|
||||
Result:=ShowConfigureCustomComponentDlg(EnvironmentOptions.GetParsedLazarusDirectory);
|
||||
end;
|
||||
|
||||
function TPkgManager.DoNewPackage: TModalResult;
|
||||
var
|
||||
NewPackage: TLazPackage;
|
||||
|
Loading…
Reference in New Issue
Block a user