Find all our projects in development below.
All source code is GNU General Public License (GPL)
Browsing clsEditDialog.vb (725 B)
Option Explicit On
Public Class clsEditDialog
Public thisHost As Object = Nothing
Public InputText As String = ""
Public OutputText As String = ""
Public [ReadOnly] As Boolean = False
Public Aborted As Boolean = False
Public CustomButtonImage As Image = Nothing
Public CustomButtonToolTip As String = ""
Public CustomButtonClicked As Boolean = False
Public Sub New(ByVal thisHost As Object)
Me.thisHost = thisHost
End Sub
Public Sub Show(Optional ByVal caption As String = Nothing)
' instantiate a new edit dialog
With New frmEditDialog(Me, caption)
.ShowDialog(thisHost)
End With
End Sub
End Class