Notepad - Anyone know what the Status bar does?

you can paste vb code straight in to the editor , then convert to either tagged [vbcode] or
Code:
 or convert to <html> , the reason i do that is for posting on vbforums.com , codeguru's forum and the html is for on a few other forums i'm on which allow html posts. in the vbforum / codeguru forum vb code shows as dark blue , unlike the great method on this forum of using the bright blue ( like in vs projects ) therefore i brighten up my posts on them forums from this >>>> [COLOR=darkblue]Private Sub[/COLOR]  <<<< to this >>>>[COLOR=blue]Private Sub[/COLOR]  <<<<

like i said , ignore the layout , it's not meant to be anything special, only for quick use and for the menu i'm working on.:)
 
dynamic_sysop: Are those ownerdrawn and hooked menus (hooked to get the flat border), or are they totally custom from-scratch menus? They look good. :)
 
thanks voltface , i have created them from scratch and i'm very proud of them ( even if it's no match for a lot of menus that may be about ).
i basically add a handler at start up , like this...
Visual Basic:
    Private WithEvents mnuItems As MenuItem

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim x As Integer
        For x = 0 To ContextMenu1.MenuItems.Count - 1
            ContextMenu1.MenuItems.Item(x).OwnerDraw = True
            AddHandler ContextMenu1.MenuItems.Item(x).MeasureItem, AddressOf mnuItems_MeasureItem
            AddHandler ContextMenu1.MenuItems.Item(x).DrawItem, AddressOf mnuItems_DrawItem
        Next
    End Sub

then just draw the menus with the draw event and measure event. :)
 
Oh I see... the border is flat because the XP style flattens them. If you go into classic windows mode, the menus will have a thick border.

Still looks good though. :)

You could look at my custom menu component here: http://www.xtremedotnettalk.com/t69043.html and expand on the code to make the menus XP style rather than Office 2000 style if you like. That way the ownerdrawing process is totally automated.

Divil also made an XP style menu based on my component, available at his site, but his source is not available.
 
cheers i have already tested them both and think they are both great :) , having said that, i'm on a self-teaching session with graphics. i've basically had no starting pointers with graphics, just jumped in at the deep end and started piecing it together ( and surprisingly i'm figuring it out quite well seeing as i've never worked with graphics in vb before :-\ )
i have also made a listview with icons on subitems , but there's no onpaint event ( well you can add one, but it doesnt work ) so i'm having to do that a really long way. re-drawing the listview on all events , such as click , mouse up/down etc...
if you know of a way to make onpaint work on a listview that'd be greatly appreciated:)
 
What I want to know is where did you get that XP style? I kinda like it, it's not too flashy like some of the others I've seen.
 
well , i run vs2002 enterprise and thats how my menu's within projects also appear ( same layout colours )
so i grabbed the colours ( using frontpage xp's custom colour grabber dropper tool :rolleyes: ) , then to add the colours / text this is part of it...
Visual Basic:
With e.Graphics
    .FillRectangle(New SolidBrush(col.FromHtml("#FFFBFF")), e.Bounds.X + 20, e.Bounds.Y, e.Bounds.Width, e.Bounds.Height)
    .DrawString(sender.text, MyBase.Font, New SolidBrush(Color.Black), 22, e.Bounds.Y + 3)
    .FillRectangle(New SolidBrush(col.FromHtml("#DEDFEF")), e.Bounds.X, e.Bounds.Y, 20, e.Bounds.Height)
    .DrawImage(ImageList1.Images.Item(x), e.Bounds.X + 1, e.Bounds.Y + 1)
End With
 
He meants the XP style that you are using (the purple title bar).

I think that's the one that comes with StyleXP, if I'm not mistaken.
 
Back
Top