I’m very pleased to introduce a very cool new feature to the VCL Styles Utils project. This is the support for controls in the Non Client Area of the forms through the TNCControls component.

Check the next form with the Auric Vcl Style applied.

Now the same form but with a set of NC Buttons in the title bar.

To use in your forms you only need to add the Vcl.Styles.NC and Vcl.Styles.FormStyleHooks units to your project and create a TNCControls component in each form where do you want use the NC Controls.

Check the next sample code

procedure TForm1.FormCreate(Sender: TObject); begin NCControls:=TNCControls.Create(Self); //Add a NC Button NCControls.List.Add(TNCButton.Create(NCControls)); //Set the style of the button NCControls.List[0].Style := nsSplitButton; //Set the style of the image NCControls.List[0].ImageStyle := isGrayHot; //Set the image list NCControls.List[0].Images := ImageList1; NCControls.List[0].ImageIndex := 3; //Set the bounds NCControls.List[0].BoundsRect := Rect(30,5,100,25); NCControls.List[0].Caption := 'Menu'; //Assign the menu and events. NCControls.List[0].DropDownMenu:= PopupMenu1; NCControls.List[0].OnClick := ButtonNCClick; end;

And this is the result

Screenshots

Exist 4 kind of buttons which you can choose.



Also you can use a custom Vcl Style to draw the controls.



Try the sample application from the project repository.

Also you can download a compiled demo from here.

Remember report any bug o made your suggestions via the issue page of the project.

Share this: Email

Print

Facebook

Reddit

Pocket

Twitter

LinkedIn

Tumblr

Pinterest

Like this: Like Loading... Related