|
From: Robert M. <mar...@us...> - 2004-12-20 17:13:38
|
Update of /cvsroot/jvcl/dev/JVCL3/run In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv448/JVCL3/run Modified Files: JvErrorIndicator.pas Log Message: create 1:1 relation of component name to BMP file Index: JvErrorIndicator.pas =================================================================== RCS file: /cvsroot/jvcl/dev/JVCL3/run/JvErrorIndicator.pas,v retrieving revision 1.22 retrieving revision 1.23 diff -C2 -d -r1.22 -r1.23 *** JvErrorIndicator.pas 8 Sep 2004 07:21:17 -0000 1.22 --- JvErrorIndicator.pas 20 Dec 2004 17:13:29 -0000 1.23 *************** *** 248,256 **** {$IFDEF VCL} ImageList_AddIcon(FDefaultImage.Handle, ! LoadImage(hInstance, PChar('TJVERRORINDICATORICON'), IMAGE_ICON, 16, 16, 0)); {$ENDIF VCL} {$IFDEF VisualCLX} Bmp := TBitmap.Create; ! Bmp.LoadFromResourceName(hInstance, 'TJVERRORINDICATOR'); FDefaultImage.AddMasked(Bmp, clBlack); Bmp.Free; --- 248,256 ---- {$IFDEF VCL} ImageList_AddIcon(FDefaultImage.Handle, ! LoadImage(hInstance, PChar('JVERRORINDICATORICON'), IMAGE_ICON, 16, 16, 0)); {$ENDIF VCL} {$IFDEF VisualCLX} Bmp := TBitmap.Create; ! Bmp.LoadFromResourceName(hInstance, 'JVERRORINDICATOR'); FDefaultImage.AddMasked(Bmp, clBlack); Bmp.Free; |