forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

use helper to assign bmp

This commit is contained in:
Basile Burg 2015-09-27 02:16:24 +02:00
parent 7d0b295a76
commit 4d4bc26538
1 changed files with 9 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
src/ce_editor.pas
View File

@ -8,7 +8,8 @@ uses
Classes, SysUtils, FileUtil, ExtendedNotebook, Forms, Controls, lcltype, Classes, SysUtils, FileUtil, ExtendedNotebook, Forms, Controls, lcltype,
Graphics, SynEditKeyCmds, ComCtrls, SynEditHighlighter, ExtCtrls, Menus, Graphics, SynEditKeyCmds, ComCtrls, SynEditHighlighter, ExtCtrls, Menus,
SynMacroRecorder, SynPluginSyncroEdit, SynEdit, SynHighlighterMulti, ce_dialogs, SynMacroRecorder, SynPluginSyncroEdit, SynEdit, SynHighlighterMulti, ce_dialogs,
ce_widget, ce_interfaces, ce_synmemo, ce_dlang, ce_common, ce_dcd, ce_observer; ce_widget, ce_interfaces, ce_synmemo, ce_dlang, ce_common, ce_dcd, ce_observer,
ce_sharedres;
type type
@ -97,8 +98,6 @@ end;
{$REGION Standard Comp/Obj------------------------------------------------------} {$REGION Standard Comp/Obj------------------------------------------------------}
constructor TCEEditorWidget.create(aOwner: TComponent); constructor TCEEditorWidget.create(aOwner: TComponent);
var
png: TPortableNetworkGraphic;
begin begin
inherited; inherited;
// //
@ -108,23 +107,13 @@ begin
PageControl.OnCloseTabClicked := @pageCloseBtnClick; PageControl.OnCloseTabClicked := @pageCloseBtnClick;
{$ENDIF} {$ENDIF}
// //
png := TPortableNetworkGraphic.Create; AssignPng(mnuedCopy.Bitmap, 'copy');
try AssignPng(mnuedCut.Bitmap, 'cut');
png.LoadFromLazarusResource('copy'); AssignPng(mnuedPaste.Bitmap, 'paste');
mnuedCopy.Bitmap.Assign(png); AssignPng(mnuedUndo.Bitmap, 'arrow_undo');
png.LoadFromLazarusResource('cut'); AssignPng(mnuedRedo.Bitmap, 'arrow_redo');
mnuedCut.Bitmap.Assign(png); AssignPng(mnuedJum2Decl.Bitmap, 'arrow_shoe');
png.LoadFromLazarusResource('paste'); AssignPng(mnuedCopy.Bitmap, 'copy');
mnuedPaste.Bitmap.Assign(png);
png.LoadFromLazarusResource('arrow_undo');
mnuedUndo.Bitmap.Assign(png);
png.LoadFromLazarusResource('arrow_redo');
mnuedRedo.Bitmap.Assign(png);
png.LoadFromLazarusResource('arrow_shoe');
mnuedJum2Decl.Bitmap.Assign(png);
finally
png.Free;
end;
// //
EntitiesConnector.addObserver(self); EntitiesConnector.addObserver(self);
EntitiesConnector.addSingleService(self); EntitiesConnector.addSingleService(self);