diff --git a/src/ce_shortcutseditor.lfm b/src/ce_shortcutseditor.lfm index 62d687c1..8c28e641 100644 --- a/src/ce_shortcutseditor.lfm +++ b/src/ce_shortcutseditor.lfm @@ -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 diff --git a/src/ce_shortcutseditor.pas b/src/ce_shortcutseditor.pas index af0144c3..14d413b8 100644 --- a/src/ce_shortcutseditor.pas +++ b/src/ce_shortcutseditor.pas @@ -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;