Function button design of Delphi StyleControls

RAD Studio 10.3 test √

Control : scGPGlyphButton

Control properties :

[OnClick event under close and minimized]

procedure TForm2.scGPGlyphButton1Click(Sender: TObject);
begin
  Application.Terminate;         //关闭
end;

procedure TForm2.scGPGlyphButton2Click(Sender: TObject);
begin
  Application.Minimize;          //最小化
end;

A little bit of notes recorded during study, so that you can read it later.