首先,我已经知道在实现TSpeedButton
时,在为其分配Glyph
时,如果您没有多个字形,则NumGlyphs
应该为1
,并且当禁用,it will automatically use the same image自动生成该字形的禁用版本。
但是,根据我的情况,我正在为此速度按钮分配一个操作。 TActionManager
的Images
和DisabledImages
都指向相同的TImageList
。我还进行了测试,根本没有分配任何DisabledImages
,也没有使用全黑蒙版创建图像的副本,并通过DisabledImages
进行了分配。
启用此字形后,字形显示就很好(基于操作上设置的图像)。但是,当禁用它时,仅纯黑色图像将用于禁用图像。除了纯黑色之外,甚至是稍微呈黑色的任何具有任何颜色的颜色都将被完全忽略,并且在呈现禁用图像时不包括在内。
这里是启用测试的图像和自动生成的禁用图像之间的比较。该图像只是带有一些垂直线的16x16位图。从最右边开始,是一条全黑线,然后是左侧的较浅线。
如您所见,禁用时,它仅考虑纯黑线。下一行仅比全黑稍微浅一点。
我无法自行分配Glyph
属性,因为它将被分配给它的动作所覆盖。我也不能在图像列表上设置两字形宽的图像,因为这些图像已在许多没有多重字形概念的其他地方广泛使用。我也不想对图像使用全黑。
如何为禁用的TSpeedButton
(已禁用TAction
)显示已分配了操作的禁用(灰显)图像?
NOTE:TBitBtn
或其他依赖于Glyph
的控件也会发生同样的情况。
u44169002.pas
unit u44169002;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.Buttons, System.ImageList,
Vcl.ImgList, System.Actions, Vcl.ActnList, Vcl.PlatformDefaultStyleActnCtrls, Vcl.ActnMan, Vcl.StdCtrls;
type
TForm1 = class(TForm)
Actions: TActionManager;
actTest: TAction;
ImageList: TImageList;
SpeedButton1: TSpeedButton;
BitBtn1: TBitBtn;
procedure actTestExecute(Sender: TObject);
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.actTestExecute(Sender: TObject);
begin
Self.actTest.Enabled:= False;
end;
end.
u44169002.dfm
object Form1: TForm1
Left = 0
Top = 0
Caption = 'Form1'
ClientHeight = 231
ClientWidth = 405
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object SpeedButton1: TSpeedButton
Left = 24
Top = 24
Width = 105
Height = 33
Action = actTest
Flat = True
end
object BitBtn1: TBitBtn
Left = 160
Top = 24
Width = 105
Height = 33
Action = actTest
Caption = 'Test Action'
TabOrder = 0
end
object Actions: TActionManager
DisabledImages = ImageList
Images = ImageList
Left = 24
Top = 128
StyleName = 'Platform Default'
object actTest: TAction
Caption = 'Test Action'
Hint = 'This is just a test action'
ImageIndex = 0
OnExecute = actTestExecute
end
end
object ImageList: TImageList
Left = 24
Top = 72
Bitmap = {
494C010101000800440010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
0000000000003600000028000000400000001000000001002000000000000010
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000082828200000000006B6B6B000000
0000555555000000000041414100000000002D2D2D00000000001D1D1D000000
00000C0C0C000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000424D3E000000000000003E000000
2800000040000000100000000100010000000000800000000000000000000000
000000000000000000000000FFFFFF00FFFF0000000000005555000000000000
5555000000000000555500000000000055550000000000005555000000000000
5555000000000000555500000000000055550000000000005555000000000000
5555000000000000555500000000000055550000000000005555000000000000
5555000000000000FFFF00000000000000000000000000000000000000000000
000000000000}
end
end
为了示例,这是我使用的测试位图:
实际上,在Vcl.Buttons
单元中的函数TButtonGlyph.CreateButtonGlyph
中,以下代码似乎只明确考虑了黑色区域:
{ Create a disabled version }
with MonoBmp do
begin
Assign(FOriginal);
HandleType := bmDDB;
Canvas.Brush.Color := clBlack;
Width := IWidth;
if Monochrome then
begin
Canvas.Font.Color := clWhite;
Monochrome := False;
Canvas.Brush.Color := clWhite;
end;
Monochrome := True;
end;
with TmpImage.Canvas do
begin
Brush.Color := clBtnFace;
FillRect(IRect);
Brush.Color := clBtnHighlight;
SetTextColor(Handle, clBlack);
SetBkColor(Handle, clWhite);
BitBlt(Handle, 1, 1, IWidth, IHeight,
MonoBmp.Canvas.Handle, 0, 0, ROP_DSPDxax);
Brush.Color := clBtnShadow;
SetTextColor(Handle, clBlack);
SetBkColor(Handle, clWhite);
BitBlt(Handle, 0, 0, IWidth, IHeight,
MonoBmp.Canvas.Handle, 0, 0, ROP_DSPDxax);
end;
将速度按钮放在一个分组框上并禁用该分组框,您不需要禁用的字形,但仍然只有1张图像图像将在那里,但按钮仍清晰可见