Minimizing form changes titlebar icons

Viewing 3 posts - 1 through 3 (of 3 total)
  • Author
    Posts
  • #34662
    IPSteven
    Participant

    Using AlphaControl 7.45 beta

    Delphi 2007 w/ Windows 7 x64, Aero on

    If I'm hiding the form's Maximize titlebar icon and using WMSysCommand()

    when I minimize and restore the form – the Maximize titlebar icon appears!

    In the sample code and attached file – I having included WMSysCommand() but its functionality is bypassed.

    You can recreate by creating a simple application such as:

    Code:
    unit Unit1;

    interface

    uses
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    Dialogs, StdCtrls, sSkinProvider, sSkinManager;

    type
    TForm1 = class(TForm)
    sSkinManager1: TsSkinManager;
    sSkinProvider1: TsSkinProvider;
    private
    { Private declarations }
    procedure WMSysCommand (var Msg: TWMSysCommand) ; message WM_SYSCOMMAND;

    public
    { Public declarations }
    end;

    var
    Form1: TForm1;

    implementation

    {$R *.dfm}

    procedure TForm1.WMSysCommand(var Msg: TWMSysCommand);
    begin
    //in a real app there would be additional code here.
    DefaultHandler(Msg);
    end;

    end.

    and setting the form's Border Icons property to: biMaximum set to False

    The form will exhibit the following behavior.

    On launch:

    [attachment=4977:minimizing_changes_titlebar1.png]

    After minimizing and restoring:

    [attachment=4978:minimizing_changes_titlebar2.png]

    If the form looses focus the form will return to its proper state; i.e. no Maximize titlebar icon.

    Sample project with exe demonstrating issue.

    [attachment=4979:MinimizingChangesTitlebarIcons.zip]

    #46205
    Support
    Keymaster

    Hello

    This issue will be solved in the next release, I think.

    #46262
    IPSteven
    Participant

    Fixed in v7.46 beta, thanks.

Viewing 3 posts - 1 through 3 (of 3 total)
  • You must be logged in to reply to this topic.