Application using Alpha Skins in Delphi 12 shows two program windows on the task

Viewing 3 posts - 1 through 3 (of 3 total)
  • Author
    Posts
  • #71421
    NormAtHome
    Participant

    Now I’m not saying that Alpha Skins is the culprit here but to be clear I just have no other explanation. I have one application that uses Alpha Skins and I don’t have this issue in this application with Delphi 11.3 and it’s only in Delphi 12 and no other application that I’ve migrated to Delphi 12 has this issue.

    When I run this application in Delphi 11.3 the application shows up on the taskbar as you would expect but when I compile and run in Delphi 12 the application itself works fine but if you hover the mouse over the taskbar it shows two application windows almost as if two instances are running; however clicking on one or the other just takes you to the program window and taskmgr shows only one instance running.

    Has anyone ever seen a problem like this?

    Attachments:
    You must be logged in to view attached files.
    #71424
    Lasse
    Participant

    I have had the same issue with Delphi 11.3 without AlphaSkins. I think I tackled this by overriding CreateParams…

    procedure CreateParams(var Params: TCreateParams); override;
    
    procedure TMainBaseForm.CreateParams(var Params: TCreateParams);
    begin
      inherited CreateParams(Params);
    
      with Params do
      begin
        ExStyle := ExStyle and not WS_EX_APPWINDOW;
        WndParent := Application.Handle;
      end;
    end;
    #71429
    NormAtHome
    Participant

    I had the previous version to 17.10, when I uninstalled that and installed 17.10 the problem disappeared

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