paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-27 13:57:25 +01:00
Code Issues Packages Projects Releases Wiki Activity

IDE: clean up

Browse Source 
git-svn-id: trunk@52214 -
This commit is contained in:
mattias 2016-04-18 17:10:01 +00:00
parent 41b629f3d0
commit f8623847f3
2 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
designer/menueditor.pp
View File

@ -194,7 +194,7 @@ type
procedure DeleteChildlessShadowAndItem(anExistingSI: TShadowItem); procedure DeleteChildlessShadowAndItem(anExistingSI: TShadowItem);
procedure DeleteShadowAndItemAndChildren(anExistingSI: TShadowItem); procedure DeleteShadowAndItemAndChildren(anExistingSI: TShadowItem);
procedure InPlaceEditKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); procedure InPlaceEditKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
procedure OnDesignerModified(Sender: TObject; PropName: ShortString); procedure OnDesignerModified(Sender: TObject; {%H-}PropName: ShortString);
procedure OnObjectPropertyChanged(Sender: TObject; NewObject: TPersistent); procedure OnObjectPropertyChanged(Sender: TObject; NewObject: TPersistent);
procedure OnDesignerRefreshPropertyValues; procedure OnDesignerRefreshPropertyValues;
procedure RecursiveCreateShadows(aParentBox: TShadowBox; aMI: TMenuItem); procedure RecursiveCreateShadows(aParentBox: TShadowBox; aMI: TMenuItem);

2
ide/frames/editor_markup_options.pas
View File

@ -326,8 +326,6 @@ begin
end; end;
procedure TEditorMarkupOptionsFrame.ReadSettings(AOptions: TAbstractIDEOptions); procedure TEditorMarkupOptionsFrame.ReadSettings(AOptions: TAbstractIDEOptions);
var
i, j, idx: Integer;
begin begin
with AOptions as TEditorOptions do with AOptions as TEditorOptions do
begin begin