VB.NET: How To Create Aqua Buttons Pulsing with rounded edges like OS-X

[miCRoSCoPiC^eaRthLinG 0]

Hi all,

I'll be brief about it. The original code was NOT written by me - the author is a certain Mr. Dave Peckham whose article titled AquaButton: A sample custom button control with a Mac OS X look can be found at CodeProject.Com. The original code was written in C# though - and my development platform was VB.NET - so I ported the code to VB.NET and here I am posting it for all of you.

 

If you are unsure what an Aqua Button is - take a look at the following picture:

 

Right - as you can see this will help you change the look of you .NET applications entirely. For C# you can use the code by the original author - and for VB.NET you can use mine. You'll find all the code needed in the attachment with this post - along with three .png picture files titled:

left.png

right.png

fill.png

These make up the left, right and body of the button. Feel free to relpace these with any other color - try experimenting with different kind of edge shapes and fill body. The fourth file in the zip is the main AquaButton.vb class that will draw the aqua button on your forms. You have to include all 4 files in your project and preferrably leave the .png files in the directory from which your application will run. That is necessary for the code to be able to load the pictures that give the button it's custom shape.

 

Only flip side with this is - that the button is not compiled as a User Control and hence not accessible as a Form Designer component. (Maybe, I'll modify it soon to be one). Till then, you have to add the buttons to your project programmatically. A little explanation on that - if you look at the code view of you project (considering a blank form with only one button), inside the "Windows Forms Designer Generated Region", you'll see the standard windows default buttons are added similar to the following format:

Me.Button1 = New System.Windows.Forms.Button...........Me.Button1.BackColor = System.Drawing.Color.LightGrayMe.Button1.Location = New System.Drawing.Point (100, 100)Me.Button1.Name = "Button1"Me.Button1.Size = New System.Drawing.Size (60,24)Me.Button1.TabIndex = 1Me.Button1.Text = "OK"

If you delete your button in the designer - this code will go away. So make sure you note down the Location and Size of your buttons prior to deletion. Since the Aqua Button class inherits the Windows Button Class - all the default button properties are accessible in the Aqua Buttons too.

 

Towards the top of your code, above the windows forms designer generate region add in a statement:

Friend Withevents Button1 As WildGrape.Aqua.Controls.Button

Inside your Form_Load procedure add the following statements:

Button1 = New WildGrape.Aqua.Controls.ButtonMe.Controls.Add (Button1)'The rest is the same as the syntax for the default buttonsMe.Button1.BackColor = System.Drawing.Color.LightGrayMe.Button1.Location = New System.Drawing.Point (100, 100)Me.Button1.Name = "Button1"Me.Button1.Size = New System.Drawing.Size (60,24)Me.Button1.TabIndex = 1Me.Button1.Text = "OK"

Compile your code and have fun

.:: Cheers ::.

 

Download the attachment (Zipped with WinZip 9):

 

 

Download the attachment (Zipped with Windows Zipper):

[Ryan1405241476 0]

Interesting code, bit why would you want an aqua button, that makes no sense to me, that would be like if somone created a ipb skin to look like the defualt skin of another BBS. where is the pride of your os to use its buttons?

[miCRoSCoPiC^eaRthLinG 0]

Don't you get bored by the standard windows buttons ?? That was one of the primary reasons I took the pain to convert this code from C#... But it's not just limited to aqua buttons - if you modify the image files, and a little bit of the code - you can infact put ANY shape/size/color of buttons in your appz. That's the cool part about this code.. I'll try posting a small followup on howto do it. Believe me, it can completely change the look of your app

[vizskywalker 0]

I think it is a great idea, and I can't wait for a follow up. Now if only I had a full version of VB instead of the introductory version. Thanks microscopic^earthling.

[h3lium 0]

interesting idea, i had never thought of this. do you have the c# code or a link to it?

[miCRoSCoPiC^eaRthLinG 0]

interesting idea, i had never thought of this. do you have the c# code or a link to it?

<{POST_SNAPBACK}>

Look right up on top of the first article. The original C# article that is cited as the C# version of this code is itself the link ..

[willytb 0]

Can't seem to unzip the attachment with WINXP unzipper? Do I need a special unzip program?

Notice from miCRoSCoPiC^eaRthLinG:

Please stop quoting a whole post when your feedback is just one line.

Edited February 8, 2006 by miCRoSCoPiC^eaRthLinG (see edit history)

[miCRoSCoPiC^eaRthLinG 0]

I don't know about WinXP unzipper - I never trusted it much. I packed this file using Winzip v9 - which you can download from http://www.winzip.de/ Infact it's in version 10 now - but that wouldn't be a problem. I downloaded the file and tested it again - no problem with Winzip or WinRAR (http://winrarindia.in/)

[warbird1405241485 0]

I tried to unzip it with WinRar but it gives errors all the time:

Unknown method in right.pngUnknown method in fill.png
Unknown method in left.png
Unknown method in AquaButton.vb
No files to extract

Where did you zipped it with? Could you reupload it? plzzzzz *begging* or do you want me to download winzip?

-=jeroen=-

[miCRoSCoPiC^eaRthLinG 0]

Cool - I've added another ZIP with the same files, this time zipped using Windows default zipper in Normal compression mode. The file is called Aqb.zip - you'll find it attached to the first post.

[iGuest 3]

creating button in vb.net

VB.NET: How To Create Aqua Buttons

 

How can I create a button (its background ,image etc) in the window form

 

Kindly give me the responce

 

-NIRAV

[iGuest 3]

vb.net animated button creation

VB.NET: How To Create Aqua Buttons

 

How to create animated button in vb.Net.

 

-question by guna