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

load icon from shared icons

This commit is contained in:
Basile Burg 2015-05-13 08:02:14 +02:00
parent d6a18139ce
commit a2551d76ed
2 changed files with 8 additions and 36 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
src/ce_messages.lfm
View File

@ -121,42 +121,6 @@ inherited CEMessagesWidget: TCEMessagesWidget
Height = 24
Top = 2
Width = 27
Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000064000000640000000000000000000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00015F9000002B
550001568600002B5500014C7B00002B550000315C47002D57CC002C56CC002B
5548002C570000335E00003C680001010100014B7900014B7A00015F9000002B
550001568600002B5500014C7B00002B5548002B55CC5494B7FF34679AFF0030
5ACA002D584800335E00003C680001010100014B7900014B7A00015F9000002B
550001568600002B5500014D7C41014B79BB3A719FFF386F9DFF5F9FC0FF4578
ABFF003763C600356046003C680001010100014B7900014B7A00015F9000002B
550001568600002B5548002B55CC4F8DB3FF68ACC8FF4880ACFF5087B3FF6AAA
C8FF5588BBFF00416EC1003E6A4401010100014B7900014B7A00015F9000002B
55000157873F015585B65FA1C0FF3F79A3FF4278A7FF66A6C5FF619DC2FF5E95
C1FF74B4D1FF6598CBFF010101AB0101013C014B7900014B7A00015F9000002B
5548002B55CC336898FF508CB3FF69ABC8FF67A7C6FF4D80B3FF71B1CEFF6EA9
CDFF6CA3CEFF6D6D6DFFAA9999FF010101A5014C7A42014B7A000160913E015E
8FB16AAEC9FF66A8C5FF5692B8FF4B80AFFF5D97BFFF77B9D2FF669DC8FF7BBA
D5FF7E7E7EFFCEC0C0FF797979FF5588BBFF014F7EA6014E7D0001629383126D
9BB82078A2C33385ABD058A2C0E774B9D1FB6EACCCFF669DC8FF83C7DAFF8888
88FFD3CACAFF838383FF60A4C6FF63A7C9FF015382A501528100016395050163
9414016293280161924101619277106C9AAB4B9BBADB79B9D5FC919191FFD9D4
D4FF8D8D8DFF68ACCEFF74B8D4FF015887B40156864001558400016395000163
9400016293000161920001629300016293100162936D00000069DDDCDCFF9494
94FF70B4D6FF80C4DBFF015C8DB2001A63CC0013584800226E00016395000163
94000162930001619200016293000162930001639400000000240000006788CC
DDFF87CBDDFF016091AF003080CC3F72B6FF002774CC00247048016395000163
940001629300016192000162930001629300016394000000000001334C390165
969C0164959C0163943E00398B48003688CC5285C9FF002E7ECC016395000163
940001629300016192000162930001629300016394000000000001334C000165
97000164960001639400003A8C00003E9248003C8FCC00378A48FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
}
TabOrder = 0
end
object ToolButton1: TToolButton

8
src/ce_messages.pas
View File

@ -202,6 +202,7 @@ end;
constructor TCEMessagesWidget.create(aOwner: TComponent);
var
fname: string;
png: TPortableNetworkGraphic;
begin
fMaxMessCnt := 500;
fCtxt := amcAll;
@ -249,6 +250,13 @@ begin
fBtns[amcProj]:= btnSelProj;
//
btnClearCat.OnClick := @actClearCurCatExecute;
png:= TPortableNetworkGraphic.Create;
try
png.LoadFromLazarusResource('clean');
btnClearCat.Glyph.Assign(png);
finally
png.free;
end;
//
fname := getCoeditDocPath + optname;
if fileExists(fname) then