Steven Johnson
Posts: 7
Joined: 2004-08-24
|
I'm using the following code to change the icon of a explorer menu item.
procedure TAddInModule.SysExplorerBarControls4Click(Sender: TObject);
begin
with TadxCommandBarButton(Sender) do begin
if SysDefaults.SecurityDisabled then begin
Glyph.LoadFromResourceName(HInstance,'LOCKOFF');
Caption := 'Warning Off';
end else begin
Glyph.LoadFromResourceName(HInstance,'LOCKON');
Caption := 'Warning On';
end; {if}
end; {with}
end;
The caption changes but the glyph does not. There is no error either. I verified that the bitmaps stored in the resource file are different. |
|
Dmitry Kostochko
Add-in Express team
Posts: 2880
Joined: 2004-04-05
|
|