firemonkey 点击任务栏图标不能最小化

1、新建firemonkey 窗体

2、设置窗体的FormStyle属性为popup

 

或者直接写代码

procedure TForm1.FormCreate(Sender: TObject);
begin
  Self.FormStyle :=TFormStyle.Popup;
end;

 

posted @ 2017-06-16 00:01  Lovemit  阅读(300)  评论(0编辑  收藏  举报