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

load glyph from shared icons 

- possible now because res are available sooner
This commit is contained in:
Basile Burg 2015-05-15 07:27:45 +02:00
parent ff49acb58f
commit 550ab06e3e
2 changed files with 11 additions and 38 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
src/ce_shortcutseditor.lfm
View File

@ -106,42 +106,6 @@ object CEShortcutEditor: TCEShortcutEditor
Width = 23
Align = alRight
BorderSpacing.Around = 2
Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000064000000640000000000000000000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000000000
000000000000000000000000000000000012000000320000002F000000000000
00000000000000000000000000000000000000000000000000005487A800497C
A00040739A00000000060000002E1B41647B1F5182FD1B4D7EEF0000002D1E51
83001E5184001F5284001F5284001F5284001F5284001F5284005487A800497C
A0000000000E152A3B4C2D5E8AE9315980FF659EC8FF4583B4FF194A7BE90000
002D1E5184001F5284001F5284001F5284001F5284001F5284005487A8000000
0006294A646C376993FF4C89B3FF5699C4FF41769EFF64A3CFFF4582B2FF1A4B
7CE80000002D1E5184001E5284001E5184001E5184001F5284005487A8001D32
414941749AFF4B7DA1FF78A5C1FF72B2D7FF5DA0CAFF457AA3FF63A4CFFF4581
B2FF1A4B7CE80000002D184F8400184E84001A4E83001C4F82000000001A4171
93F976A3BEFF7FC0DDFF5FA5C9FF4D82A8FF6FA6C9FF5DA2CBFF5089B2FF62A2
CFFF4482B3FF13497DE800000033887E750037769D003B769A0046718D9C5B95
B5FF5093B5FF5789AAFF7CB1CEFF70B5D5FF5A9AC0FF669CC1FF67A7CFFF5895
C0FF5CA2D1FF448BC2FF7E7873FF0000003333739B00387399007AA3BCFEC8DE
E7FF96C3D8FF75BAD6FF589BBDFF689FBDFF77B5D5FF61A5C9FF619EC3FF64A7
D1FF58A4D4FF7A726CFFBEA39FFF7F7670FF00000033387398005489A8DF5B8C
ACCD7AA2BAFF89AAC0FF80B2CBFF72B7D3FF64A3C5FF72B0D0FF67ADD3FF5EA9
D4FF77706AFFC2A9A6FF79716CFF58A3D8FF347096FF38739800578BAA005F8F
AE007EA5BD005186A61D5C8BAA91729EBAFF75B5D2FF6BB3D3FF6AB5DBFF766E
69FFC7B1AEFF77706AFF5EAAD9FF5A9ECAFF367095FF39739700588BAA006090
AF007FA6BE005488A8005F8FAD005083A5085789ABE06CB6D6FF756D69FFCDBA
B7FF766E69FF67B4DBFF60A5CDFF3D779AFF2D5D786239739500588BAA006090
AF007FA6BE005489A8006090AD005185A700588DB0007A716CFFD5C3C1FF756D
69FF6FBDDFFF67AECFFF427C9CFF345486FF32528BA30000000A588BAA006090
AF007FA6BE005489A8006090AD005286A800588FB2007B757100787270FF75C5
E5FF6FB5D4FF487F9FFF346198FF4F84CCFF2F417AFF26436959588BAA006090
AF007FA6BE005489A8006090AD005286A8005890B3007C7673007C7672004C86
AAFF4A80A1FF477D9D4F5589D1792D5597FF467ABEFF2F417AFF588BAA006090
AF007FA6BE005489A8006090AD005286A8005890B3007D7773007E7773004E89
AC004C83A400477E9D005487CF00568ACF1C2E5797FF4E84C9B3
}
OnClick = btnClearClick
end
end

13
src/ce_shortcutseditor.pas
View File

@ -167,13 +167,22 @@ end;
{$REGION Standard Comp/Object things -------------------------------------------}
constructor TCEShortcutEditor.create(TheOwner: TComponent);
var
png: TPortableNetworkGraphic;
begin
inherited;
fObservers := TCEEditableShortCutSubject.create;
fShortcuts := TShortCutCollection.create(self);
fBackup := TShortCutCollection.create(self);
// note: icon data not yet ready during init of this unit.
// cant be used for btnClear.
//
png := TPortableNetworkGraphic.Create;
try
png.LoadFromLazarusResource('clean');
btnClear.Glyph.Assign(png);
finally
png.free;
end;
//
EntitiesConnector.addObserver(self);
end;