[Obi-Wan Cannabis]

What will you learn?

In this tutorial i'm gonna show you three methods of using custom themes on your applications! 😉

Method 1 - DotNetBar
Method 2 - Custom Themes (Aeonhack themes)
Method 3 - Create your own theme on photoshop and use it on you application.

Method 1

Step 1) Download and install DotNetBar here.

Step 2) Patch the program (so the trial will become full).

Step 3) On your toolbox are now new controls for your applications. ✌

Method 2

Step 1) Go here and here (Fusion - New Theme).

Step 2) Download the themes from there.

Step 3) Install them on your app.

Step 4) Enjoy your new themes. ✌

Method 3

Step 1) Create an image on Photoshop (GUI).

[img]http://img827.imageshack.us/img827/2315/semtt2ulo.png[/img]

Step 2) Put the image in the background of the form.

Step 3) Add a timer to your form and make sure its enabled=false and interval=1 or 2.

Step 4) Create a Private Sub called Theme and write this on:

Code

AppLocation = Me.Location
CurLocation = Cursor.Position

Step 4) Add the folowing code to your app now:

Code

Dim AppLocation, CurLocation As New Point(0, 0)
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
  Me.Location = AppLocation - CurLocation + Cursor.Position
    End Sub
    Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown
  Timer1.Enabled = True
  Timer1.Start()
  Theme()
    End Sub
    Private Sub Form1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
  Timer1.Stop()
  Theme()
    End Sub

Step 5) Add now three labels (nameofapp, X and - / to close and minimize the form)

Step 6) Add this code to form1_load:

Code

Label1.Parent = PictureBox1
Label2.Parent = PictureBox1
Label3.Parent = PictureBox1

And add this code:

Code

Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
  Me.Close()
    End Sub

    Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
  Me.WindowState = FormWindowState.Minimized
    End Sub

Step 7) Test your application.

[IMG]http://img444.imageshack.us/img444/7346/93923668.png[/IMG]

And you just created a theme! Congratulations! ✌

---

Sorry for posting before finish!
It was an accident! :(

But now the thread is updated! =D

[zyvox]

In method 3, the code for move form around is very complicated. It's an alott easier code (just one function or something) that can do it.

Umm and yeah... Maybe add it to a picture box or anything at the top of the form.

Else, good tut.

[Obi-Wan Cannabis]

In method 3, the code for move form around is very complicated. It's an alott easier code (just one function or something) that can do it.

Umm and yeah... Maybe add it to a picture box or anything at the top of the form.

Else, good tut.

Thanks for your comment.

But the code is not that hard to understand. 🙂

[woodo]

Why do you have a timer in method 3?

Code

Dim Point As New System.Drawing.Point()
Dim X, Y As Intege

Private Sub Form1_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
  If e.Button = MouseButtons.Left Then
    Point = Control.MousePosition
    Point.X = Point.X - (X)
    Point.Y = Point.Y - (Y)
    Me.Location = Point
  End If
    End Sub

    Private Sub Form1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown
  X = Control.MousePosition.X - Me.Location.X
  Y = Control.MousePosition.Y - Me.Location.Y
    End Sub

[zyvox]

^Yeah there it is that code lol.

And I wasn't pointing at the code wass hard to understand, but its so long and needs a private sub, mouse up, mouse down and stuff :p
Easier with that one woodo posted.

[Obi-Wan Cannabis]

Probably it wouldn't need the timer... xD

But that's the code I use on my apps!

[Obi-Wan Cannabis]

Keeping this alive! ^^)

LOL

[-na.Talish]

This has been made 100 times before, I know your just trying to contribute and help out but try using the search before posting.

[S!rk0]

Nice post but you need to update with new theme (Custom Theme) and with a pack with a lot of PSD and their Fonts ...

[Obi-Wan Cannabis]

This has been made 100 times before, I know your just trying to contribute and help out but try using the search before posting.

sorry about that...🤦‍♂🤦‍♂🤦‍♂

---

Nice post but you need to update with new theme (Custom Theme) and with a pack with a lot of PSD and their Fonts ...

thanks for your comment! 😁

[-na.Talish]

sorry about that...🤦‍♂🤦‍♂🤦‍♂

Heh, no need to be sorry bro. I mean, your contributing I'm just saying maybe it could have saved you a bit of time making this tut lol. Most people here wanna see nice unique tuts.

But kudos for you for spending your time on this.

[Krex Productions™]

This is great, thank you so much for sharing this Tutorial Dude.

[Fake.]

sorry about that...🤦‍♂🤦‍♂🤦‍♂

---

Nice post but you need to update with new theme (Custom Theme) and with a pack with a lot of PSD and their Fonts ...

thanks for your comment! 😁

Everyone hates timers, there are so many better options, i.e. threads. That's why a few are like ew timers, plus the fact you can use the mouse events :D

[Obi-Wan Cannabis]

Can you explain me why people hates timers??

[Charny]

Can you explain me why people hates timers??

Because timers are shit...