TheEffect fucked around with this message at 20:48 on Jul 23, 2014

TheEffect fucked around with this message at 21:22 on Jul 23, 2014

TheEffect fucked around with this message at 22:24 on Jul 23, 2014

TheEffect fucked around with this message at 23:58 on Mar 19, 2015

    Private Sub trayIcon_MouseDoubleClick(sender As Object, e As MouseEventArgs) Handles trayIcon.Click
        contextMenuNFC.AutoClose = True
        If e.Button = Windows.Forms.MouseButtons.Right Then
            contextMenuNFC.Show()
        End If
    End Sub

    Private Sub ContextMenuNFC_Opening(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles contextMenuNFC.Opening
        contextMenuNFC.Show(Cursor.Position)
        contextMenuNFC.Left = contextMenuNFC.Left + 1
        contextMenuNFC.Top = contextMenuNFC.Top + 1
    End Sub

    Private Sub ContextMenuNFC_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles contextMenuNFC.MouseLeave
        contextMenuNFC.Close()
    End Sub

    Private Sub ToolStripMenuItemHelp_MouseUp(sender As Object, e As MouseEventArgs) Handles ToolStripMenuItemHelp.MouseUp
        Process.Start("notepad.exe", resourcesDir + "\Documentation\" & "ReadMe.txt")
    End Sub

    Private Sub ToolStripMenuItemQuit_MouseUp(sender As Object, e As MouseEventArgs) Handles ToolStripMenuItemQuit.MouseUp
        Me.Close()
    End Sub

TheEffect fucked around with this message at 07:43 on Mar 23, 2015

If (((pushFileSelectCheckBox1.Enabled = True) & (pushFileSelectCheckBox2.Enabled = True) & 
(pushFileSelectCheckBox3.Enabled = True) & (pushFileSelectCheckBox4.Enabled = True)) = True) Then

    Private Sub exitBTN_Click(sender As Object, e As EventArgs) Handles exitBTN.Click
        LogOutput(DateStamp() + " " + TimeStamp() + ": - Terminating Application.")
        trayIcon.Dispose()
        Me.Close()
    End Sub

TheEffect fucked around with this message at 16:38 on Mar 25, 2015

TheEffect fucked around with this message at 00:49 on Mar 26, 2015

Public Interface IMarkupConverter
    Function ConvertXamlToHtml(xamlText As String) As String
    Function ConvertHtmlToXaml(htmlText As String) As String
    Function ConvertRtfToHtml(rtfText As String) As String
End Interface

Public Class MarkupConverter
    Implements IMarkupConverter

    Public Function ConvertXamlToHtml(xamlText As String) As String Implements IMarkupConverter.ConvertXamlToHtml
        Return ConvertXamlToHtml(xamlText)
    End Function
    Public Function ConvertHtmlToXaml(htmlText As String) As String Implements IMarkupConverter.ConvertHtmlToXaml
        Return ConvertHtmlToXaml(htmlText)
    End Function
    Public Function ConvertRtfToHtml(rtfText As String) As String Implements IMarkupConverter.ConvertRtfToHtml
        Return ConvertRtfToHtml(rtfText)
    End Function
End Class

Public Class Converter
    Public Shared Function ConvertRtfToHtml(rtfText As String) As String
        Dim thread = New Thread(AddressOf ConvertRtfInSTAThread)
        Dim threadData = New ConvertRtfThreadData With {.RtfText = rtfText}
        thread.SetApartmentState(ApartmentState.STA)
        thread.Start(threadData)
        thread.Join()
        Return threadData.HtmlText
    End Function

    Public Shared Sub ConvertRtfInSTAThread(rtf As Object)
        Dim threadData = TryCast(rtf, ConvertRtfThreadData)
        threadData.HtmlText = ConvertRtfToHtml(threadData.RtfText)
    End Sub

    Private Class ConvertRtfThreadData
        Public Property RtfText() As String
            Get
                Return m_RtfText
            End Get
            Set(value As String)
                m_RtfText = value
            End Set
        End Property
        Private m_RtfText As String
        Public Property HtmlText() As String
            Get
                Return m_HtmlText
            End Get
            Set(value As String)
                m_HtmlText = value
            End Set
        End Property
        Private m_HtmlText As String
    End Class
End Class

NetworkFileController.Converter.ConvertRtfToHtml(NetworkFileController.mainForm.appInfoBox.Text)

TheEffect fucked around with this message at 23:56 on Apr 11, 2015