{"id":652,"date":"2025-11-05T14:41:34","date_gmt":"2025-11-05T13:41:34","guid":{"rendered":"https:\/\/www.silverice.it\/IpercubeTechWP1\/?page_id=652"},"modified":"2025-11-05T15:15:50","modified_gmt":"2025-11-05T14:15:50","slug":"showfilecontent","status":"publish","type":"page","link":"https:\/\/www.silverice.it\/IpercubeTechWP1\/ipercube-utilities\/utility-forms\/showfilecontent\/","title":{"rendered":"Show File Content"},"content":{"rendered":"\n<p class=\"wp-block-paragraph\">Displays the contents of multiple files in a custom form, with associated captions.<\/p>\n\n\n\n<ul class=\"wp-block-list\">\n<li>Instantiates a new&nbsp;<strong>FormViewContentEx<\/strong>&nbsp;using the provided file paths and captions.<\/li>\n\n\n\n<li>Applies the optional form title and icon if provided.<\/li>\n\n\n\n<li>Displays the form in non-modal mode using&nbsp;<strong>Show()<\/strong>.<\/li>\n<\/ul>\n\n\n\n<p class=\"wp-block-paragraph\">Notes:<\/p>\n\n\n\n<ul class=\"wp-block-list\">\n<li>If the content is recognized as HTML, it&#8217;s shown in a <em>WebBrowser<\/em> object<\/li>\n\n\n\n<li>The number of items in&nbsp;<strong>fileList<\/strong>&nbsp;and&nbsp;<strong>captionList<\/strong>&nbsp;should match to ensure proper display.<\/li>\n\n\n\n<li>Each file in&nbsp;<strong>fileList<\/strong>&nbsp;should exist and be readable; otherwise, the form may show an error or fallback message.<\/li>\n<\/ul>\n\n\n\n<p class=\"wp-block-paragraph\">The wrapper (below the form):<\/p>\n\n\n\n<div class=\"wp-block-group\"><div class=\"wp-block-group__inner-container is-layout-constrained wp-block-group-is-layout-constrained\">\n<div class=\"wp-block-columns is-layout-flex wp-container-core-columns-is-layout-8f761849 wp-block-columns-is-layout-flex\">\n<div class=\"wp-block-column is-layout-flow wp-block-column-is-layout-flow\" style=\"flex-basis:75%\">\n<div class=\"wp-block-columns is-layout-flex wp-container-core-columns-is-layout-8f761849 wp-block-columns-is-layout-flex\">\n<div class=\"wp-block-column page-snippet is-layout-flow wp-block-column-is-layout-flow\" style=\"flex-basis:100%\">\n<div class=\"wp-block-kevinbatdorf-code-block-pro cbp-has-line-numbers\" data-code-block-pro-font-family=\"Code-Pro-Geist-Mono\" style=\"font-size:.875rem;font-family:Code-Pro-Geist-Mono,ui-monospace,SFMono-Regular,Menlo,Monaco,Consolas,monospace;--cbp-line-number-color:#D4D4D4;--cbp-line-number-width:calc(2 * 0.6 * .875rem);line-height:1.25rem;--cbp-tab-width:2;tab-size:var(--cbp-tab-width, 2)\"><span style=\"display:flex;align-items:center;padding:10px 0px 10px 16px;margin-bottom:-2px;width:100%;text-align:left;background-color:#2b2b2b;color:#c7c7c7\">VB<\/span><span role=\"button\" tabindex=\"0\" style=\"color:#D4D4D4;display:none\" aria-label=\"Copy\" class=\"code-block-pro-copy-button\"><pre class=\"code-block-pro-copy-button-pre\" aria-hidden=\"true\"><textarea class=\"code-block-pro-copy-button-textarea\" tabindex=\"-1\" aria-hidden=\"true\" readonly>    Public Sub ShowFileContent(fileList As List(Of String), \n                               captionList As List(Of String),\n                               Optional formTitle As String = \"\", \n                               Optional formIcon As Icon = Nothing, \n                               Optional layoutKey As String = \"\")\n\n        Dim frm As New FormViewContentEx(fileList, captionList, formTitle, formIcon, layoutKey)\n        frm.Show()\n\n    End Sub<\/textarea><\/pre><svg xmlns=\"http:\/\/www.w3.org\/2000\/svg\" style=\"width:24px;height:24px\" fill=\"none\" viewBox=\"0 0 24 24\" stroke=\"currentColor\" stroke-width=\"2\"><path class=\"with-check\" stroke-linecap=\"round\" stroke-linejoin=\"round\" d=\"M4.5 12.75l6 6 9-13.5\"><\/path><path class=\"without-check\" stroke-linecap=\"round\" stroke-linejoin=\"round\" d=\"M16.5 8.25V6a2.25 2.25 0 00-2.25-2.25H6A2.25 2.25 0 003.75 6v8.25A2.25 2.25 0 006 16.5h2.25m8.25-8.25H18a2.25 2.25 0 012.25 2.25V18A2.25 2.25 0 0118 20.25h-7.5A2.25 2.25 0 018.25 18v-1.5m8.25-8.25h-6a2.25 2.25 0 00-2.25 2.25v6\"><\/path><\/svg><\/span><pre class=\"shiki dark-plus\" style=\"background-color: #1E1E1E\" tabindex=\"0\"><code><span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Public Sub <\/span><span style=\"color: #DCDCAA\">ShowFileContent<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">fileList<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">List<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Of<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">), <\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                               captionList As <\/span><span style=\"color: #4EC9B0\">List<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Of<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">),<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                               Optional formTitle As <\/span><span style=\"color: #4EC9B0\">String<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #CE9178\">&quot;&quot;<\/span><span style=\"color: #D4D4D4\">, <\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                               Optional formIcon As <\/span><span style=\"color: #4EC9B0\">Icon<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> Nothing<\/span><span style=\"color: #D4D4D4\">, <\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                               Optional layoutKey As <\/span><span style=\"color: #4EC9B0\">String<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #CE9178\">&quot;&quot;<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> frm <\/span><span style=\"color: #D4D4D4\">As<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">FormViewContentEx<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">fileList<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> captionList<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> formTitle<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> formIcon<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> layoutKey<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        frm.<\/span><span style=\"color: #DCDCAA\">Show<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span><\/code><\/pre><\/div>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n<\/div><\/div>\n\n\n\n<p class=\"wp-block-paragraph\">The form <strong>FormViewContentEx<\/strong>:<\/p>\n\n\n\n<div class=\"wp-block-kevinbatdorf-code-block-pro cbp-has-line-numbers\" data-code-block-pro-font-family=\"Code-Pro-Geist-Mono\" style=\"font-size:.875rem;font-family:Code-Pro-Geist-Mono,ui-monospace,SFMono-Regular,Menlo,Monaco,Consolas,monospace;--cbp-line-number-color:#D4D4D4;--cbp-line-number-width:calc(3 * 0.6 * .875rem);line-height:1.25rem;--cbp-tab-width:2;tab-size:var(--cbp-tab-width, 2)\"><span style=\"display:flex;align-items:center;padding:10px 0px 10px 16px;margin-bottom:-2px;width:100%;text-align:left;background-color:#2b2b2b;color:#c7c7c7\">VB<\/span><span role=\"button\" tabindex=\"0\" style=\"color:#D4D4D4;display:none\" aria-label=\"Copy\" class=\"code-block-pro-copy-button\"><pre class=\"code-block-pro-copy-button-pre\" aria-hidden=\"true\"><textarea class=\"code-block-pro-copy-button-textarea\" tabindex=\"-1\" aria-hidden=\"true\" readonly>Imports System.Drawing\nImports System.IO\nImports System.Reflection\nImports System.Windows.Forms\n\nPublic Class FormViewContentEx\n    Public Property LayoutKey As String = \"\"\n\n    Private ReadOnly MinWidth As Integer = 500\n    Private ReadOnly MinHeight As Integer = 300\n\n    Private WithEvents TabControlContent As New TabControl()\n    Private WithEvents RichTextBox As New RichTextBox()\n    Private WithEvents WebBrowser As New WebBrowser()\n\n    Private pFileList As New List(Of String)\n    Private pCaptionList As New List(Of String)\n    Private pFormTitle As String = \"\"\n    Private pFormIcon As System.Drawing.Icon = Nothing\n\n    Private TabHeight As Integer = 33\n\n    Public Sub New(fileList As List(Of String),\n                   captionList As List(Of String),\n                   Optional formTitle As String = \"\",\n                   Optional formIcon As Drawing.Icon = Nothing,\n                   Optional szLayoutKey As String = \"\")\n\n        Me.DoubleBuffered = True\n\n        LayoutKey = szLayoutKey\n        pFileList = fileList\n        pCaptionList = captionList\n        pFormTitle = formTitle\n        pFormIcon = formIcon\n\n        ' This call is required by the designer.\n        InitializeComponent()\n\n        If formIcon IsNot Nothing Then\n            Me.Icon = formIcon\n        Else\n            Me.Icon = iuCommonResources.GetIcon(\"SilverIceLogo\")\n        End If\n\n        If Not String.IsNullOrWhiteSpace(formTitle) Then\n            Me.Text = formTitle\n        Else\n            Dim callingAssembly = Assembly.GetCallingAssembly()\n            If callingAssembly IsNot Nothing Then\n                Dim attr = CType(callingAssembly.GetCustomAttribute(GetType(AssemblyProductAttribute)), AssemblyProductAttribute)\n                Me.Text = attr?.Product\n            End If\n        End If\n\n        InitializeUI()\n\n    End Sub\n\n    Private Sub FormViewContentEx_Load(sender As Object, e As EventArgs) Handles MyBase.Load\n\n        If pFileList.Count = 0 Then\n            MessageBox.Show(\"Specify at least one content to show!\", \"Warning\", MessageBoxButtons.OK, MessageBoxIcon.Warning)\n            Me.Close()\n            Return\n        End If\n\n        RestoreLayout(Me)\n        ShowContent(pFileList(0))\n    End Sub\n\n    Private Sub FormViewContentEx_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing\n        SaveLayout(Me)\n    End Sub\n\n    Private Sub InitializeUI()\n\n        ' TabControl setup\n        TabControlContent.Dock = DockStyle.Top\n        TabControlContent.Height = TabHeight\n        TabControlContent.Padding = New Point(15, 7)\n        TabControlContent.Margin = New Padding(4, 3, 4, 3)\n        TabControlContent.Appearance = TabAppearance.Normal\n        TabControlContent.SizeMode = TabSizeMode.Normal\n        TabControlContent.DrawMode = TabDrawMode.OwnerDrawFixed\n        'TabControlContent.Font = New System.Drawing.Font(\"Consolas\", 10.0F, Drawing.FontStyle.Regular, Drawing.GraphicsUnit.Point, CByte(0))\n        TabControlContent.Font = New Font(\"Microsoft Sans Serif\", 9.0F, FontStyle.Regular, GraphicsUnit.Point, CByte(0))\n        AddHandler TabControlContent.DrawItem, AddressOf TabControlContent_DrawItem\n        Me.Controls.Add(TabControlContent)\n\n        ' Viewer shared (below tabs)\n        'RichTextBox.Dock = DockStyle.Fill\n        RichTextBox.Visible = False\n        RichTextBox.Font = New System.Drawing.Font(\"Consolas\", 11.0F, Drawing.FontStyle.Regular, Drawing.GraphicsUnit.Point, CByte(0))\n        RichTextBox.BackColor = Drawing.Color.Black\n        RichTextBox.ForeColor = Drawing.Color.Silver\n        RichTextBox.ReadOnly = True\n        Me.Controls.Add(RichTextBox)\n\n        'WebBrowser.Dock = DockStyle.Fill\n        WebBrowser.Visible = False\n        WebBrowser.ScriptErrorsSuppressed = True\n        Me.Controls.Add(WebBrowser)\n\n        ' Add tabs\n        For i = 0 To pFileList.Count - 1\n            Dim caption = If(pCaptionList.Count > i, pCaptionList(i), $\"File {i + 1}\")\n            Dim tp As New TabPage(caption) With {\n                .Tag = pFileList(i),\n                .Font = New Font(TabControlContent.Font, FontStyle.Regular)\n            }\n            TabControlContent.TabPages.Add(tp)\n        Next\n\n        AddHandler TabControlContent.SelectedIndexChanged, AddressOf TabControlContent_SelectedIndexChanged\n    End Sub\n\n    Private Sub TabControlContent_SelectedIndexChanged(sender As Object, e As EventArgs)\n        Dim tab = TabControlContent.SelectedTab\n        If tab IsNot Nothing AndAlso tab.Tag IsNot Nothing Then\n            ShowContent(tab.Tag.ToString())\n        End If\n    End Sub\n\n    Private Sub ShowContent(path As String)\n        If String.IsNullOrWhiteSpace(path) Then Exit Sub\n\n        Try\n            If path.Contains(\":\/\/\") Then\n                WebBrowser.Url = New Uri(path)\n                WebBrowser.Visible = True\n                RichTextBox.Visible = False\n            ElseIf File.Exists(path) Then\n                Dim textContent As String = File.ReadAllText(path)\n                If IsHtmlContent(textContent) Then\n                    WebBrowser.Url = New Uri(\"file:\/\/\/\" &amp; path.Replace(\"\\\", \"\/\"))\n                    WebBrowser.Visible = True\n                    RichTextBox.Visible = False\n                Else\n                    RichTextBox.Text = textContent\n                    RichTextBox.Visible = True\n                    WebBrowser.Visible = False\n                End If\n            Else\n                MessageBox.Show($\"File not found: {path}\", \"Error\", MessageBoxButtons.OK, MessageBoxIcon.Error)\n            End If\n        Catch ex As Exception\n            MessageBox.Show($\"Error loading content: {ex.Message}\", \"Error\", MessageBoxButtons.OK, MessageBoxIcon.Error)\n        End Try\n    End Sub\n\n    Private Sub FormViewContentEx_Resize(sender As Object, e As EventArgs) Handles MyBase.Resize\n        If Me.Width &lt; MinWidth Then Me.Width = MinWidth\n        If Me.Height &lt; MinHeight Then Me.Height = MinHeight\n        ResizeViewer()\n    End Sub\n\n    Private Sub ResizeViewer()\n\n        Dim h As Integer\n        Dim w As Integer\n\n        w = Me.Width\n        h = Me.Height - TabHeight\n\n        RichTextBox.Width = w\n        RichTextBox.Height = h\n        RichTextBox.Top = TabHeight\n\n        WebBrowser.Width = w\n        WebBrowser.Height = h\n        WebBrowser.Top = TabHeight\n    End Sub\n\n    Private Sub TabControlContent_DrawItem(sender As Object, e As DrawItemEventArgs)\n        Dim g As Graphics = e.Graphics\n        Dim tabPage = TabControlContent.TabPages(e.Index)\n        Dim tabBounds = TabControlContent.GetTabRect(e.Index)\n\n        ' Check if tab is selected\n        Dim isSelected As Boolean = (e.Index = TabControlContent.SelectedIndex)\n\n        ' Custom colors\n        Dim backColor As Color = If(isSelected, Color.FromArgb(255, 255, 192), SystemColors.Control)\n        Dim textColor As Color = If(isSelected, Color.DarkRed, Color.Black)\n        Dim fontToUse As Font = If(isSelected, New Font(TabControlContent.Font, FontStyle.Bold), TabControlContent.Font)\n\n        ' Background\n        Using b As New SolidBrush(backColor)\n            g.FillRectangle(b, tabBounds)\n        End Using\n\n        ' Use TextRenderer for native-looking text (GDI)\n        TextRenderer.DrawText(g, tabPage.Text, fontToUse, tabBounds, textColor,\n                          TextFormatFlags.HorizontalCenter Or TextFormatFlags.VerticalCenter)\n\n        ' Optional border\n        ControlPaint.DrawBorder(g, tabBounds, SystemColors.ControlDark, ButtonBorderStyle.Solid)\n    End Sub\n\nEnd Class\n<\/textarea><\/pre><svg xmlns=\"http:\/\/www.w3.org\/2000\/svg\" style=\"width:24px;height:24px\" fill=\"none\" viewBox=\"0 0 24 24\" stroke=\"currentColor\" stroke-width=\"2\"><path class=\"with-check\" stroke-linecap=\"round\" stroke-linejoin=\"round\" d=\"M4.5 12.75l6 6 9-13.5\"><\/path><path class=\"without-check\" stroke-linecap=\"round\" stroke-linejoin=\"round\" d=\"M16.5 8.25V6a2.25 2.25 0 00-2.25-2.25H6A2.25 2.25 0 003.75 6v8.25A2.25 2.25 0 006 16.5h2.25m8.25-8.25H18a2.25 2.25 0 012.25 2.25V18A2.25 2.25 0 0118 20.25h-7.5A2.25 2.25 0 018.25 18v-1.5m8.25-8.25h-6a2.25 2.25 0 00-2.25 2.25v6\"><\/path><\/svg><\/span><pre class=\"shiki dark-plus\" style=\"background-color: #1E1E1E\" tabindex=\"0\"><code><span class=\"line\"><span style=\"color: #D4D4D4\">Imports System.Drawing<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">Imports System.IO<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">Imports System.Reflection<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">Imports System.Windows.Forms<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #569CD6\">Public Class <\/span><span style=\"color: #D4D4D4\">FormViewContentEx<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Public Property <\/span><span style=\"color: #D4D4D4\">LayoutKey As <\/span><span style=\"color: #4EC9B0\">String<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #CE9178\">&quot;&quot;<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> ReadOnly MinWidth As <\/span><span style=\"color: #4EC9B0\">Integer<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #B5CEA8\">500<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> ReadOnly MinHeight As <\/span><span style=\"color: #4EC9B0\">Integer<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #B5CEA8\">300<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> WithEvents TabControlContent As<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">TabControl<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> WithEvents RichTextBox As<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">RichTextBox<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> WithEvents WebBrowser As<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">WebBrowser<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> pFileList As<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">List<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Of<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> pCaptionList As<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">List<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Of<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> pFormTitle As <\/span><span style=\"color: #4EC9B0\">String<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #CE9178\">&quot;&quot;<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> pFormIcon As <\/span><span style=\"color: #4EC9B0\">System<\/span><span style=\"color: #D4D4D4\">.Drawing.<\/span><span style=\"color: #9CDCFE\">Icon<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> Nothing<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> TabHeight As <\/span><span style=\"color: #4EC9B0\">Integer<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #B5CEA8\">33<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Public Sub New<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">fileList<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">List<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Of<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">),<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                   captionList As <\/span><span style=\"color: #4EC9B0\">List<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Of<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">),<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                   Optional formTitle As <\/span><span style=\"color: #4EC9B0\">String<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #CE9178\">&quot;&quot;<\/span><span style=\"color: #D4D4D4\">,<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                   Optional formIcon As <\/span><span style=\"color: #4EC9B0\">Drawing<\/span><span style=\"color: #D4D4D4\">.<\/span><span style=\"color: #9CDCFE\">Icon<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> Nothing<\/span><span style=\"color: #D4D4D4\">,<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                   Optional szLayoutKey As <\/span><span style=\"color: #4EC9B0\">String<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #CE9178\">&quot;&quot;<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        Me.<\/span><span style=\"color: #9CDCFE\">DoubleBuffered<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> True<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">LayoutKey<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> szLayoutKey<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">pFileList<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> fileList<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">pCaptionList<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> captionList<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">pFormTitle<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> formTitle<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">pFormIcon<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> formIcon<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; This call is required by the designer.<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">InitializeComponent<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> formIcon IsNot<\/span><span style=\"color: #569CD6\"> Nothing<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            Me.<\/span><span style=\"color: #9CDCFE\">Icon<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> formIcon<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">Else<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            Me.<\/span><span style=\"color: #9CDCFE\">Icon<\/span><span style=\"color: #D4D4D4\"> = iuCommonResources.<\/span><span style=\"color: #DCDCAA\">GetIcon<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #CE9178\">&quot;SilverIceLogo&quot;<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> Not <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">.<\/span><span style=\"color: #DCDCAA\">IsNullOrWhiteSpace<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">formTitle<\/span><span style=\"color: #D4D4D4\">) <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            Me.<\/span><span style=\"color: #9CDCFE\">Text<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> formTitle<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">Else<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> callingAssembly <\/span><span style=\"color: #D4D4D4\">= Assembly.<\/span><span style=\"color: #DCDCAA\">GetCallingAssembly<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> callingAssembly IsNot<\/span><span style=\"color: #569CD6\"> Nothing<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> attr <\/span><span style=\"color: #D4D4D4\">= <\/span><span style=\"color: #DCDCAA\">CType<\/span><span style=\"color: #D4D4D4\">(callingAssembly.<\/span><span style=\"color: #DCDCAA\">GetCustomAttribute<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #DCDCAA\">GetType<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">AssemblyProductAttribute<\/span><span style=\"color: #D4D4D4\">)),<\/span><span style=\"color: #9CDCFE\"> AssemblyProductAttribute<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                Me.<\/span><span style=\"color: #9CDCFE\">Text<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> attr<\/span><span style=\"color: #D4D4D4\">?.Product<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">InitializeUI<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private Sub <\/span><span style=\"color: #DCDCAA\">FormViewContentEx_Load<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">sender<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">Object<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> e<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">EventArgs<\/span><span style=\"color: #D4D4D4\">) Handles MyBase.Load<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> pFileList.<\/span><span style=\"color: #9CDCFE\">Count<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #B5CEA8\">0<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            MessageBox.<\/span><span style=\"color: #DCDCAA\">Show<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #CE9178\">&quot;Specify at least one content to show!&quot;<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #CE9178\">&quot;Warning&quot;<\/span><span style=\"color: #D4D4D4\">, MessageBoxButtons.OK, MessageBoxIcon.<\/span><span style=\"color: #9CDCFE\">Warning<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            Me.<\/span><span style=\"color: #DCDCAA\">Close<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">Return<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">RestoreLayout<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Me<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">ShowContent<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #DCDCAA\">pFileList<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #B5CEA8\">0<\/span><span style=\"color: #D4D4D4\">))<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private Sub <\/span><span style=\"color: #DCDCAA\">FormViewContentEx_FormClosing<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">sender<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">Object<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> e<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">FormClosingEventArgs<\/span><span style=\"color: #D4D4D4\">) Handles MyBase.FormClosing<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">SaveLayout<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Me<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private Sub <\/span><span style=\"color: #DCDCAA\">InitializeUI<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; TabControl setup<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        TabControlContent.<\/span><span style=\"color: #9CDCFE\">Dock<\/span><span style=\"color: #D4D4D4\"> = DockStyle.Top<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        TabControlContent.<\/span><span style=\"color: #9CDCFE\">Height<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> TabHeight<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        TabControlContent.<\/span><span style=\"color: #9CDCFE\">Padding<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">Point<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #B5CEA8\">15<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> 7<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        TabControlContent.<\/span><span style=\"color: #9CDCFE\">Margin<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">Padding<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #B5CEA8\">4<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">3<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">4<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">3<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        TabControlContent.<\/span><span style=\"color: #9CDCFE\">Appearance<\/span><span style=\"color: #D4D4D4\"> = TabAppearance.Normal<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        TabControlContent.<\/span><span style=\"color: #9CDCFE\">SizeMode<\/span><span style=\"color: #D4D4D4\"> = TabSizeMode.Normal<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        TabControlContent.<\/span><span style=\"color: #9CDCFE\">DrawMode<\/span><span style=\"color: #D4D4D4\"> = TabDrawMode.OwnerDrawFixed<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39;TabControlContent.Font = New System.Drawing.Font(&quot;Consolas&quot;, 10.0F, Drawing.FontStyle.Regular, Drawing.GraphicsUnit.Point, CByte(0))<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        TabControlContent.<\/span><span style=\"color: #9CDCFE\">Font<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">Font<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #CE9178\">&quot;Microsoft Sans Serif&quot;<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">9.0F<\/span><span style=\"color: #D4D4D4\">, FontStyle.Regular, GraphicsUnit.Point, <\/span><span style=\"color: #DCDCAA\">CByte<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #B5CEA8\">0<\/span><span style=\"color: #D4D4D4\">))<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        AddHandler TabControlContent.DrawItem,<\/span><span style=\"color: #9CDCFE\"> AddressOf<\/span><span style=\"color: #D4D4D4\"> TabControlContent_DrawItem<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        Me.Controls.<\/span><span style=\"color: #DCDCAA\">Add<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">TabControlContent<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; Viewer shared (below tabs)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39;RichTextBox.Dock = DockStyle.Fill<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        RichTextBox.<\/span><span style=\"color: #9CDCFE\">Visible<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> False<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        RichTextBox.<\/span><span style=\"color: #9CDCFE\">Font<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #D4D4D4\">System.Drawing.<\/span><span style=\"color: #DCDCAA\">Font<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #CE9178\">&quot;Consolas&quot;<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">11.0F<\/span><span style=\"color: #D4D4D4\">, Drawing.FontStyle.Regular, Drawing.GraphicsUnit.Point, <\/span><span style=\"color: #DCDCAA\">CByte<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #B5CEA8\">0<\/span><span style=\"color: #D4D4D4\">))<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        RichTextBox.<\/span><span style=\"color: #9CDCFE\">BackColor<\/span><span style=\"color: #D4D4D4\"> = Drawing.Color.Black<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        RichTextBox.<\/span><span style=\"color: #9CDCFE\">ForeColor<\/span><span style=\"color: #D4D4D4\"> = Drawing.Color.Silver<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        RichTextBox.<\/span><span style=\"color: #9CDCFE\">ReadOnly<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> True<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        Me.Controls.<\/span><span style=\"color: #DCDCAA\">Add<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">RichTextBox<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39;WebBrowser.Dock = DockStyle.Fill<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        WebBrowser.<\/span><span style=\"color: #9CDCFE\">Visible<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> False<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        WebBrowser.<\/span><span style=\"color: #9CDCFE\">ScriptErrorsSuppressed<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> True<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        Me.Controls.<\/span><span style=\"color: #DCDCAA\">Add<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">WebBrowser<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; Add tabs<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">For<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #9CDCFE\">i<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #B5CEA8\">0<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #C586C0\">To<\/span><span style=\"color: #D4D4D4\"> pFileList.<\/span><span style=\"color: #9CDCFE\">Count<\/span><span style=\"color: #D4D4D4\"> - <\/span><span style=\"color: #B5CEA8\">1<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> caption <\/span><span style=\"color: #D4D4D4\">= <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\">(pCaptionList.<\/span><span style=\"color: #9CDCFE\">Count<\/span><span style=\"color: #D4D4D4\"> &gt;<\/span><span style=\"color: #9CDCFE\"> i<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #DCDCAA\">pCaptionList<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">i<\/span><span style=\"color: #D4D4D4\">), $<\/span><span style=\"color: #CE9178\">&quot;File {i + 1}&quot;<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> tp <\/span><span style=\"color: #D4D4D4\">As<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">TabPage<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">caption<\/span><span style=\"color: #D4D4D4\">) <\/span><span style=\"color: #C586C0\">With<\/span><span style=\"color: #D4D4D4\"> {<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                .<\/span><span style=\"color: #9CDCFE\">Tag<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #DCDCAA\">pFileList<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">i<\/span><span style=\"color: #D4D4D4\">),<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                .<\/span><span style=\"color: #9CDCFE\">Font<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">Font<\/span><span style=\"color: #D4D4D4\">(TabControlContent.Font, FontStyle.<\/span><span style=\"color: #9CDCFE\">Regular<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            }<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            TabControlContent.TabPages.<\/span><span style=\"color: #DCDCAA\">Add<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">tp<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">Next<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        AddHandler TabControlContent.SelectedIndexChanged,<\/span><span style=\"color: #9CDCFE\"> AddressOf<\/span><span style=\"color: #D4D4D4\"> TabControlContent_SelectedIndexChanged<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private Sub <\/span><span style=\"color: #DCDCAA\">TabControlContent_SelectedIndexChanged<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">sender<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">Object<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> e<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">EventArgs<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> tab <\/span><span style=\"color: #D4D4D4\">= TabControlContent.SelectedTab<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> tab IsNot<\/span><span style=\"color: #569CD6\"> Nothing<\/span><span style=\"color: #D4D4D4\"> AndAlso tab.Tag IsNot<\/span><span style=\"color: #569CD6\"> Nothing<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #DCDCAA\">ShowContent<\/span><span style=\"color: #D4D4D4\">(tab.Tag.<\/span><span style=\"color: #DCDCAA\">ToString<\/span><span style=\"color: #D4D4D4\">())<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private Sub <\/span><span style=\"color: #DCDCAA\">ShowContent<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">path<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">String<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">.<\/span><span style=\"color: #DCDCAA\">IsNullOrWhiteSpace<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">path<\/span><span style=\"color: #D4D4D4\">) <\/span><span style=\"color: #C586C0\">Then<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #C586C0\">Exit Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        Try<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> path.<\/span><span style=\"color: #DCDCAA\">Contains<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #CE9178\">&quot;:\/\/&quot;<\/span><span style=\"color: #D4D4D4\">) <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                WebBrowser.<\/span><span style=\"color: #9CDCFE\">Url<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">Uri<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">path<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                WebBrowser.<\/span><span style=\"color: #9CDCFE\">Visible<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> True<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                RichTextBox.<\/span><span style=\"color: #9CDCFE\">Visible<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> False<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">ElseIf<\/span><span style=\"color: #D4D4D4\"> File.<\/span><span style=\"color: #DCDCAA\">Exists<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">path<\/span><span style=\"color: #D4D4D4\">) <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> textContent <\/span><span style=\"color: #D4D4D4\">As <\/span><span style=\"color: #4EC9B0\">String<\/span><span style=\"color: #D4D4D4\"> = File.<\/span><span style=\"color: #DCDCAA\">ReadAllText<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">path<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #DCDCAA\">IsHtmlContent<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">textContent<\/span><span style=\"color: #D4D4D4\">) <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                    WebBrowser.<\/span><span style=\"color: #9CDCFE\">Url<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">Uri<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #CE9178\">&quot;file:\/\/\/&quot;<\/span><span style=\"color: #D4D4D4\"> &amp; path.<\/span><span style=\"color: #DCDCAA\">Replace<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #CE9178\">&quot;\\&quot;<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #CE9178\">&quot;\/&quot;<\/span><span style=\"color: #D4D4D4\">))<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                    WebBrowser.<\/span><span style=\"color: #9CDCFE\">Visible<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> True<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                    RichTextBox.<\/span><span style=\"color: #9CDCFE\">Visible<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> False<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #C586C0\">Else<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                    RichTextBox.<\/span><span style=\"color: #9CDCFE\">Text<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> textContent<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                    RichTextBox.<\/span><span style=\"color: #9CDCFE\">Visible<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> True<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                    WebBrowser.<\/span><span style=\"color: #9CDCFE\">Visible<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> False<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">Else<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                MessageBox.<\/span><span style=\"color: #DCDCAA\">Show<\/span><span style=\"color: #D4D4D4\">($<\/span><span style=\"color: #CE9178\">&quot;File not found: {path}&quot;<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #CE9178\">&quot;Error&quot;<\/span><span style=\"color: #D4D4D4\">, MessageBoxButtons.OK, MessageBoxIcon.<\/span><span style=\"color: #9CDCFE\">Error<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        Catch ex As <\/span><span style=\"color: #4EC9B0\">Exception<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            MessageBox.<\/span><span style=\"color: #DCDCAA\">Show<\/span><span style=\"color: #D4D4D4\">($<\/span><span style=\"color: #CE9178\">&quot;Error loading content: {ex.Message}&quot;<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #CE9178\">&quot;Error&quot;<\/span><span style=\"color: #D4D4D4\">, MessageBoxButtons.OK, MessageBoxIcon.<\/span><span style=\"color: #9CDCFE\">Error<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">End<\/span><span style=\"color: #D4D4D4\"> Try<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private Sub <\/span><span style=\"color: #DCDCAA\">FormViewContentEx_Resize<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">sender<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">Object<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> e<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">EventArgs<\/span><span style=\"color: #D4D4D4\">) Handles MyBase.Resize<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> Me.<\/span><span style=\"color: #9CDCFE\">Width<\/span><span style=\"color: #D4D4D4\"> &lt;<\/span><span style=\"color: #9CDCFE\"> MinWidth<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #C586C0\">Then<\/span><span style=\"color: #D4D4D4\"> Me.<\/span><span style=\"color: #9CDCFE\">Width<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> MinWidth<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> Me.<\/span><span style=\"color: #9CDCFE\">Height<\/span><span style=\"color: #D4D4D4\"> &lt;<\/span><span style=\"color: #9CDCFE\"> MinHeight<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #C586C0\">Then<\/span><span style=\"color: #D4D4D4\"> Me.<\/span><span style=\"color: #9CDCFE\">Height<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> MinHeight<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">ResizeViewer<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private Sub <\/span><span style=\"color: #DCDCAA\">ResizeViewer<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> h <\/span><span style=\"color: #D4D4D4\">As <\/span><span style=\"color: #4EC9B0\">Integer<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> w <\/span><span style=\"color: #D4D4D4\">As <\/span><span style=\"color: #4EC9B0\">Integer<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">w<\/span><span style=\"color: #D4D4D4\"> = Me.Width<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">h<\/span><span style=\"color: #D4D4D4\"> = Me.<\/span><span style=\"color: #9CDCFE\">Height<\/span><span style=\"color: #D4D4D4\"> -<\/span><span style=\"color: #9CDCFE\"> TabHeight<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        RichTextBox.<\/span><span style=\"color: #9CDCFE\">Width<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> w<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        RichTextBox.<\/span><span style=\"color: #9CDCFE\">Height<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> h<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        RichTextBox.<\/span><span style=\"color: #9CDCFE\">Top<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> TabHeight<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        WebBrowser.<\/span><span style=\"color: #9CDCFE\">Width<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> w<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        WebBrowser.<\/span><span style=\"color: #9CDCFE\">Height<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> h<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        WebBrowser.<\/span><span style=\"color: #9CDCFE\">Top<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #9CDCFE\"> TabHeight<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private Sub <\/span><span style=\"color: #DCDCAA\">TabControlContent_DrawItem<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">sender<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">Object<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> e<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">DrawItemEventArgs<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> g <\/span><span style=\"color: #D4D4D4\">As <\/span><span style=\"color: #4EC9B0\">Graphics<\/span><span style=\"color: #D4D4D4\"> = e.Graphics<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> tabPage <\/span><span style=\"color: #D4D4D4\">= TabControlContent.<\/span><span style=\"color: #DCDCAA\">TabPages<\/span><span style=\"color: #D4D4D4\">(e.<\/span><span style=\"color: #9CDCFE\">Index<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> tabBounds <\/span><span style=\"color: #D4D4D4\">= TabControlContent.<\/span><span style=\"color: #DCDCAA\">GetTabRect<\/span><span style=\"color: #D4D4D4\">(e.<\/span><span style=\"color: #9CDCFE\">Index<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; Check if tab is selected<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> isSelected <\/span><span style=\"color: #D4D4D4\">As <\/span><span style=\"color: #4EC9B0\">Boolean<\/span><span style=\"color: #D4D4D4\"> = (e.<\/span><span style=\"color: #9CDCFE\">Index<\/span><span style=\"color: #D4D4D4\"> = TabControlContent.<\/span><span style=\"color: #9CDCFE\">SelectedIndex<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; Custom colors<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> backColor <\/span><span style=\"color: #D4D4D4\">As <\/span><span style=\"color: #4EC9B0\">Color<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">isSelected<\/span><span style=\"color: #D4D4D4\">, Color.<\/span><span style=\"color: #DCDCAA\">FromArgb<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #B5CEA8\">255<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">255<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">192<\/span><span style=\"color: #D4D4D4\">), SystemColors.<\/span><span style=\"color: #9CDCFE\">Control<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> textColor <\/span><span style=\"color: #D4D4D4\">As <\/span><span style=\"color: #4EC9B0\">Color<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">isSelected<\/span><span style=\"color: #D4D4D4\">, Color.DarkRed, Color.<\/span><span style=\"color: #9CDCFE\">Black<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> fontToUse <\/span><span style=\"color: #D4D4D4\">As <\/span><span style=\"color: #4EC9B0\">Font<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">isSelected<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">Font<\/span><span style=\"color: #D4D4D4\">(TabControlContent.Font, FontStyle.<\/span><span style=\"color: #9CDCFE\">Bold<\/span><span style=\"color: #D4D4D4\">), TabControlContent.<\/span><span style=\"color: #9CDCFE\">Font<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; Background<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        Using b As<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #DCDCAA\">SolidBrush<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">backColor<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            g.<\/span><span style=\"color: #DCDCAA\">FillRectangle<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">b<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> tabBounds<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">End<\/span><span style=\"color: #D4D4D4\"> Using<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; Use TextRenderer for native-looking text (GDI)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        TextRenderer.<\/span><span style=\"color: #DCDCAA\">DrawText<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">g<\/span><span style=\"color: #D4D4D4\">, tabPage.Text,<\/span><span style=\"color: #9CDCFE\"> fontToUse<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> tabBounds<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> textColor<\/span><span style=\"color: #D4D4D4\">,<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                          TextFormatFlags.HorizontalCenter Or TextFormatFlags.<\/span><span style=\"color: #9CDCFE\">VerticalCenter<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; Optional border<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        ControlPaint.<\/span><span style=\"color: #DCDCAA\">DrawBorder<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">g<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> tabBounds<\/span><span style=\"color: #D4D4D4\">, SystemColors.ControlDark, ButtonBorderStyle.<\/span><span style=\"color: #9CDCFE\">Solid<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #569CD6\">End Class<\/span><\/span>\n<span class=\"line\"><\/span><\/code><\/pre><\/div>\n\n\n\n<p class=\"wp-block-paragraph\">The <strong>FormViewContentEx.Designer<\/strong><\/p>\n\n\n\n<div class=\"wp-block-kevinbatdorf-code-block-pro cbp-has-line-numbers\" data-code-block-pro-font-family=\"Code-Pro-Geist-Mono\" style=\"font-size:.875rem;font-family:Code-Pro-Geist-Mono,ui-monospace,SFMono-Regular,Menlo,Monaco,Consolas,monospace;--cbp-line-number-color:#D4D4D4;--cbp-line-number-width:calc(2 * 0.6 * .875rem);line-height:1.25rem;--cbp-tab-width:2;tab-size:var(--cbp-tab-width, 2)\"><span style=\"display:flex;align-items:center;padding:10px 0px 10px 16px;margin-bottom:-2px;width:100%;text-align:left;background-color:#2b2b2b;color:#c7c7c7\">VB<\/span><span role=\"button\" tabindex=\"0\" style=\"color:#D4D4D4;display:none\" aria-label=\"Copy\" class=\"code-block-pro-copy-button\"><pre class=\"code-block-pro-copy-button-pre\" aria-hidden=\"true\"><textarea class=\"code-block-pro-copy-button-textarea\" tabindex=\"-1\" aria-hidden=\"true\" readonly>&lt;Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>\nPartial Class FormViewContentEx\n    Inherits System.Windows.Forms.Form\n\n    'Form overrides dispose to clean up the component list.\n    &lt;System.Diagnostics.DebuggerNonUserCode()>\n    Protected Overrides Sub Dispose(ByVal disposing As Boolean)\n        Try\n            If disposing AndAlso components IsNot Nothing Then\n                components.Dispose()\n            End If\n        Finally\n            MyBase.Dispose(disposing)\n        End Try\n    End Sub\n\n    'Required by the Windows Form Designer\n    Private components As System.ComponentModel.IContainer\n\n    'NOTE: The following procedure is required by the Windows Form Designer\n    'It can be modified using the Windows Form Designer.  \n    'Do not modify it using the code editor.\n    &lt;System.Diagnostics.DebuggerStepThrough()>\n    Private Sub InitializeComponent()\n        SuspendLayout()\n        ' \n        ' FormViewContentEx\n        ' \n        AutoScaleDimensions = New System.Drawing.SizeF(7F, 15F)\n        AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font\n        ClientSize = New System.Drawing.Size(1217, 537)\n        Margin = New System.Windows.Forms.Padding(4, 3, 4, 3)\n        Name = \"FormViewContentEx\"\n        Text = \"Show File Content\"\n        ResumeLayout(False)\n\n    End Sub\nEnd Class\n<\/textarea><\/pre><svg xmlns=\"http:\/\/www.w3.org\/2000\/svg\" style=\"width:24px;height:24px\" fill=\"none\" viewBox=\"0 0 24 24\" stroke=\"currentColor\" stroke-width=\"2\"><path class=\"with-check\" stroke-linecap=\"round\" stroke-linejoin=\"round\" d=\"M4.5 12.75l6 6 9-13.5\"><\/path><path class=\"without-check\" stroke-linecap=\"round\" stroke-linejoin=\"round\" d=\"M16.5 8.25V6a2.25 2.25 0 00-2.25-2.25H6A2.25 2.25 0 003.75 6v8.25A2.25 2.25 0 006 16.5h2.25m8.25-8.25H18a2.25 2.25 0 012.25 2.25V18A2.25 2.25 0 0118 20.25h-7.5A2.25 2.25 0 018.25 18v-1.5m8.25-8.25h-6a2.25 2.25 0 00-2.25 2.25v6\"><\/path><\/svg><\/span><pre class=\"shiki dark-plus\" style=\"background-color: #1E1E1E\" tabindex=\"0\"><code><span class=\"line\"><span style=\"color: #D4D4D4\">&lt;Global.Microsoft.VisualBasic.CompilerServices.<\/span><span style=\"color: #DCDCAA\">DesignerGenerated<\/span><span style=\"color: #D4D4D4\">()&gt;<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">Partial<\/span><span style=\"color: #569CD6\"> Class <\/span><span style=\"color: #D4D4D4\">FormViewContentEx<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    Inherits System.Windows.Forms.<\/span><span style=\"color: #4EC9B0\">Form<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #6A9955\">&#39;Form overrides dispose to clean up the component list.<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    &lt;System.Diagnostics.<\/span><span style=\"color: #DCDCAA\">DebuggerNonUserCode<\/span><span style=\"color: #D4D4D4\">()&gt;<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    Protected Overrides<\/span><span style=\"color: #569CD6\"> Sub <\/span><span style=\"color: #DCDCAA\">Dispose<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">ByVal<\/span><span style=\"color: #D4D4D4\"> disposing As <\/span><span style=\"color: #4EC9B0\">Boolean<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        Try<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> disposing AndAlso components IsNot<\/span><span style=\"color: #569CD6\"> Nothing<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                components.<\/span><span style=\"color: #DCDCAA\">Dispose<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        Finally<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            MyBase.<\/span><span style=\"color: #DCDCAA\">Dispose<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">disposing<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">End<\/span><span style=\"color: #D4D4D4\"> Try<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #6A9955\">&#39;Required by the Windows Form Designer<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private<\/span><span style=\"color: #D4D4D4\"> components As <\/span><span style=\"color: #4EC9B0\">System<\/span><span style=\"color: #D4D4D4\">.ComponentModel.IContainer<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #6A9955\">&#39;NOTE: The following procedure is required by the Windows Form Designer<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #6A9955\">&#39;It can be modified using the Windows Form Designer.  <\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #6A9955\">&#39;Do not modify it using the code editor.<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    &lt;System.Diagnostics.<\/span><span style=\"color: #DCDCAA\">DebuggerStepThrough<\/span><span style=\"color: #D4D4D4\">()&gt;<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Private Sub <\/span><span style=\"color: #DCDCAA\">InitializeComponent<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">SuspendLayout<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; <\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; FormViewContentEx<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #6A9955\">&#39; <\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">AutoScaleDimensions<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #D4D4D4\">System.Drawing.<\/span><span style=\"color: #DCDCAA\">SizeF<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #B5CEA8\">7F<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">15F<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">AutoScaleMode<\/span><span style=\"color: #D4D4D4\"> = System.Windows.Forms.AutoScaleMode.Font<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">ClientSize<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #D4D4D4\">System.Drawing.<\/span><span style=\"color: #DCDCAA\">Size<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #B5CEA8\">1217<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">537<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">Margin<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> New <\/span><span style=\"color: #D4D4D4\">System.Windows.Forms.<\/span><span style=\"color: #DCDCAA\">Padding<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #B5CEA8\">4<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">3<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">4<\/span><span style=\"color: #D4D4D4\">, <\/span><span style=\"color: #B5CEA8\">3<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">Name<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #CE9178\">&quot;FormViewContentEx&quot;<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #9CDCFE\">Text<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #CE9178\">&quot;Show File Content&quot;<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">ResumeLayout<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #569CD6\">False<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><span style=\"color: #569CD6\">End Class<\/span><\/span>\n<span class=\"line\"><\/span><\/code><\/pre><\/div>\n","protected":false},"excerpt":{"rendered":"<p>Displays the contents of multiple files in a custom form, with associated captions. Notes: The wrapper (below the form): The form FormViewContentEx: The FormViewContentEx.Designer<\/p>\n","protected":false},"author":1,"featured_media":0,"parent":870,"menu_order":0,"comment_status":"closed","ping_status":"closed","template":"","meta":{"footnotes":""},"class_list":["post-652","page","type-page","status-publish","hentry"],"_links":{"self":[{"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/pages\/652","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/comments?post=652"}],"version-history":[{"count":8,"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/pages\/652\/revisions"}],"predecessor-version":[{"id":883,"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/pages\/652\/revisions\/883"}],"up":[{"embeddable":true,"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/pages\/870"}],"wp:attachment":[{"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/media?parent=652"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}