Saludos, Necsito ayuda con el componente dbnavigator.
Heredé del componente y le cargué nuevas imágenes desde un fichero de recursos, pero cuando le paso el ratón por encima a cualquier botón habilitado me le deja una sombra semitransparente azul claro y no me lo repinta nuevamente.
Asi es como cargo las imágenes por si puede servir de ayuda
Código Delphi
[-]procedure TTestDBNavigator.InitButtons;
var
I: TNavigateBtn;
Resname: array [0 .. 40] of char;
begin
if (ParentCtl3d) then
for I := Low(Buttons) to High(Buttons) do
begin
Buttons[i].Glyph := nil;
Buttons[i].Flat := True;
Buttons[i].NumGlyphs := 2;
Buttons[i].Glyph.Handle := LoadBitMap(Hinstance,
StrFmt(Resname, '%s', [BtnTypeName[i]]));
Buttons[i].AlignWithMargins := True;
Buttons[i].Flat := True;
Buttons[i].Transparent := True;
Buttons[i].Height := FButtonHeight;
Buttons[i].Width := FButtonWidth;
end;
end;