Breadcrumbs

[Axel]

Here you can finish my little project i dont wanna finish it :P
its a little messy

Code: Select all

    Public Enum StyleCol
        RightToLeft
        Normal
        YesNo
        YesNoCancel
    End Enum
    Public Function Msg(ByVal text As String, Optional ByVal Title As String = "", Optional ByVal icon As Boolean = True, Optional ByVal style As StyleCol = StyleCol.Normal) As Form
        Dim formx As New Form
        Dim lbl As New Label
        Dim buttonyes As New Button
        Dim buttonno As New Button
        Dim buttoncancel As New Button
        Dim buttonok As New Button
        buttonok.Text = "&Ok"
        buttonno.Text = "&No"
        buttoncancel.Text = "&Cancel"
        buttonyes.Text = "&Yes"
        formx.Text = Title
        lbl.Text = text
        formx.Controls.Add(lbl)
        formx.Size = New Size(240, 110)
        If icon Then
            formx.ShowIcon = True
        Else
            formx.ShowIcon = False
        End If
        formx.ShowInTaskbar = False
        formx.TopMost = True
        formx.MinimizeBox = False
        formx.MaximizeBox = False
        lbl.Location = New Point(10, 20)
        formx.Icon = Me.Icon
        Select Case style
            Case StyleCol.Normal
                formx.Controls.Add(buttonok)
                buttonok.Location = New Point(73, 35)
            Case StyleCol.RightToLeft
                formx.RightToLeftLayout = True
                formx.Controls.Add(buttonok)
                buttonok.Location = New Point(73, 35)
            Case StyleCol.YesNo

            Case StyleCol.YesNoCancel

        End Select
        formx.Show()
    End Function

you can extend whatever you want this is the basic thing written by me
please donate !

Thank you ! xd.zip

<< contains just the debug folder , no useful information ( if you want useful information , go to agust1337 )

[zachman61]

this is a real nice source
also if we save the project will this class be saved as a dll?

[Lewis]

Very good Also zach you need to build it

[zachman61]

i know to use but like when we build to publish do we need to get the exe along with the dll in the debug folder?

[Axel]

i know to use but like when we build to publish do we need to get the exe along with the dll in the debug folder?

no dll's :P just place the code on top of your code , under your Class form1 or something then you can call it :P (Msg("LOL","Mytitle , style.normal ) and such :P you can make alot of styles ) :P

[zachman61]

ok so it will save into the project auto?

[Axel]

ok so it will save into the project auto?

yes but no dll's needed just the code on top

[NecroPhis]

nice source cooll;

[tought5]

cool dude ty

[Usman55]

Thanks YourSocksRoxx, but I prefer using the original one, it's much accurate. Nice work!