我有一个简单的单元，其中有一个窗体和一个OnClick，甚至可以在单击主窗体时创建一个新的窗体。

unit DPS.Main;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, DPS.Materials, System.Generics.Collections, Vcl.ExtCtrls, DPS.ChildForm;

type
  TForm6 = class( TForm )
    procedure FormClick( Sender : TObject );

    private
      { Private declarations }

    public
      { Public declarations }

    end;

var
  Form6: TForm6;

implementation

{$R *.dfm}

procedure TForm6.FormClick( Sender : TObject );
  var
    Form1 : TForm;

  begin
    Form1 := TForm.Create( Self );

    //Form1.Parent := Self;

    Form1.Show();
  end;

end.

如果我没有为创建的窗体分配父级，我将获得默认的Windows 11样式。

如果我取消注解掉该行

//Form1.Parent := Self;

我得到了性感的Windows 7舔油漆。

这似乎是一个默认的VCL样式皮肤，因为，令人惊讶的是，如果我改变外观的内置VCL样式之一，如碳这不是一个问题。
有什么想法吗？