[Koushik Halder]

No issue when skins are disabled.

[Koushik Halder]

The Image is stored in sImageList1. The Image Index is = 0. As per your suggestion I have added the following code:

procedure TForm1.sSkinManager1GetMenuExtraLineData(FirstItem: TMenuItem;
  var SkinSection, Caption: string; var Glyph: TBitmap;
  var LineVisible: Boolean);
begin
  if FirstItem = MenuItem1 then
    begin
      LineVisible := True;
      Caption := 'HorizontalMenuItem1';
      sAlphaImageList1.CreateBitmap32(1, 20, 20, 20);
    end;
end;

But no Glyph is shown in ExtraLineData. Please provide one DEMO.

• This reply was modified 3 years ago by Koushik Halder.

[Koushik Halder]

What you have mentioned, already there but not working. It will be better if you provide a DEMO.

[Koushik Halder]

Hi! I have found another BUG as follows:
If you use the following code :

procedure TForm1.FormCreate(Sender: TObject);
begin
  sTitleBar1.Items[0].AutoSize := false;
  sTitleBar1.Items[0].Caption := 'TacTitleBar1';
  sTitleBar1.Items[0].FontData.Font.Color := clYellow;
  sTitleBar1.Items[0].FontData.Font.Size := 10;
  sTitleBar1.Items[0].FontData.Font.Style := [fsBold];
  sTitleBar1.Items[0].FontData.UseSysColor := false;
  sTitleBar1.Items[0].FontData.UseSysFontName := false;
  sTitleBar1.Items[0].FontData.UseSysSize := false;
  sTitleBar1.Items[0].FontData.UseSysStyle := false;
  sTitleBar1.Items[0].Hint := 'TacTitleBar1';
  sTitleBar1.Items[0].ShowHint := true;
  sTitleBar1.Items[0].Spacing := 10;
  sTitleBar1.Items[0].Width := 150;
end;

Everything will execute but the following

  sTitleBar1.Items[0].FontData.Font.Size := 10;
  sTitleBar1.Items[0].FontData.Font.Style := [fsBold];

will no execute. So to get TitleBar Font Size = 10 and Font Style = fsBold, you have to do in DFM File.

• This reply was modified 3 years ago by Koushik Halder.

[Koushik Halder]

Please find the screenshot of taskbar just after running the application:

After a mouse click to anywhere the taskbar shows properly as follows:

• This reply was modified 3 years ago by Koushik Halder.

Attachments:

You must be logged in to view attached files.

[Koushik Halder]

Is there any code so that MAXIMIZE Button will be Shown as Disabled/Normal Button but application will not be maximized i.e. By Clicking on MAXIMIZE Button on application bar will not do anything?

[Author]

Posts