diff --git a/Projects/WindowsApplication1/WindowsApplication1.sln b/Projects/WindowsApplication1/WindowsApplication1.sln new file mode 100644 index 0000000000000000000000000000000000000000..797527f8abceed5020a052d9a2dcfae470209a4a --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1.sln @@ -0,0 +1,20 @@ + +Microsoft Visual Studio Solution File, Format Version 11.00 +# Visual Basic Express 2010 +Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "WindowsApplication1", "WindowsApplication1\WindowsApplication1.vbproj", "{41FA52F9-0BEF-4509-B9FD-115442D7D81D}" +EndProject +Global + GlobalSection(SolutionConfigurationPlatforms) = preSolution + Debug|x86 = Debug|x86 + Release|x86 = Release|x86 + EndGlobalSection + GlobalSection(ProjectConfigurationPlatforms) = postSolution + {41FA52F9-0BEF-4509-B9FD-115442D7D81D}.Debug|x86.ActiveCfg = Debug|x86 + {41FA52F9-0BEF-4509-B9FD-115442D7D81D}.Debug|x86.Build.0 = Debug|x86 + {41FA52F9-0BEF-4509-B9FD-115442D7D81D}.Release|x86.ActiveCfg = Release|x86 + {41FA52F9-0BEF-4509-B9FD-115442D7D81D}.Release|x86.Build.0 = Release|x86 + EndGlobalSection + GlobalSection(SolutionProperties) = preSolution + HideSolutionNode = FALSE + EndGlobalSection +EndGlobal diff --git a/Projects/WindowsApplication1/WindowsApplication1.suo b/Projects/WindowsApplication1/WindowsApplication1.suo new file mode 100644 index 0000000000000000000000000000000000000000..96811b50c9cfad986cf063902dd7079e4ef5ea24 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1.suo differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/Form1.Designer.vb b/Projects/WindowsApplication1/WindowsApplication1/Form1.Designer.vb new file mode 100644 index 0000000000000000000000000000000000000000..9d7c4ad9ce1e2a9d0efd084722285e5557a3094b --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/Form1.Designer.vb @@ -0,0 +1,279 @@ + _ +Partial Class Form1 + Inherits System.Windows.Forms.Form + + 'Form reemplaza a Dispose para limpiar la lista de componentes. + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Requerido por el Diseñador de Windows Forms + Private components As System.ComponentModel.IContainer + + 'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento + 'Se puede modificar usando el Diseñador de Windows Forms. + 'No lo modifique con el editor de código. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.RichTextBox1 = New System.Windows.Forms.RichTextBox() + Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() + Me.ConversióToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ConvertirDocumentToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.EditarToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ObrirDocumentToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.GuardarToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.GenerarWordToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.Label1 = New System.Windows.Forms.Label() + Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.Label2 = New System.Windows.Forms.Label() + Me.RichTextBox2 = New System.Windows.Forms.RichTextBox() + Me.Button9 = New System.Windows.Forms.Button() + Me.TextBox1 = New System.Windows.Forms.TextBox() + Me.Button7 = New System.Windows.Forms.Button() + Me.Button6 = New System.Windows.Forms.Button() + Me.Button5 = New System.Windows.Forms.Button() + Me.Timer1 = New System.Windows.Forms.Timer(Me.components) + Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() + Me.ToolStripStatusLabel1 = New System.Windows.Forms.ToolStripStatusLabel() + Me.RichTextBox3 = New System.Windows.Forms.RichTextBox() + Me.MenuStrip1.SuspendLayout() + Me.GroupBox1.SuspendLayout() + Me.StatusStrip1.SuspendLayout() + Me.SuspendLayout() + ' + 'RichTextBox1 + ' + Me.RichTextBox1.EnableAutoDragDrop = True + Me.RichTextBox1.Font = New System.Drawing.Font("Times New Roman", 13.8!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.RichTextBox1.Location = New System.Drawing.Point(204, 76) + Me.RichTextBox1.Name = "RichTextBox1" + Me.RichTextBox1.Size = New System.Drawing.Size(1265, 644) + Me.RichTextBox1.TabIndex = 1 + Me.RichTextBox1.Text = "" + Me.RichTextBox1.Visible = False + ' + 'MenuStrip1 + ' + Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ConversióToolStripMenuItem, Me.EditarToolStripMenuItem, Me.GenerarWordToolStripMenuItem}) + Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) + Me.MenuStrip1.Name = "MenuStrip1" + Me.MenuStrip1.Size = New System.Drawing.Size(1481, 28) + Me.MenuStrip1.TabIndex = 11 + Me.MenuStrip1.Text = "MenuStrip1" + ' + 'ConversióToolStripMenuItem + ' + Me.ConversióToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ConvertirDocumentToolStripMenuItem}) + Me.ConversióToolStripMenuItem.Name = "ConversióToolStripMenuItem" + Me.ConversióToolStripMenuItem.Size = New System.Drawing.Size(86, 24) + Me.ConversióToolStripMenuItem.Text = "Conversió" + ' + 'ConvertirDocumentToolStripMenuItem + ' + Me.ConvertirDocumentToolStripMenuItem.Name = "ConvertirDocumentToolStripMenuItem" + Me.ConvertirDocumentToolStripMenuItem.Size = New System.Drawing.Size(211, 24) + Me.ConvertirDocumentToolStripMenuItem.Text = "Convertir Document" + ' + 'EditarToolStripMenuItem + ' + Me.EditarToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ObrirDocumentToolStripMenuItem, Me.GuardarToolStripMenuItem}) + Me.EditarToolStripMenuItem.Name = "EditarToolStripMenuItem" + Me.EditarToolStripMenuItem.Size = New System.Drawing.Size(101, 24) + Me.EditarToolStripMenuItem.Text = "Editar Takes" + ' + 'ObrirDocumentToolStripMenuItem + ' + Me.ObrirDocumentToolStripMenuItem.Name = "ObrirDocumentToolStripMenuItem" + Me.ObrirDocumentToolStripMenuItem.Size = New System.Drawing.Size(185, 24) + Me.ObrirDocumentToolStripMenuItem.Text = "Obrir Document" + ' + 'GuardarToolStripMenuItem + ' + Me.GuardarToolStripMenuItem.Name = "GuardarToolStripMenuItem" + Me.GuardarToolStripMenuItem.Size = New System.Drawing.Size(185, 24) + Me.GuardarToolStripMenuItem.Text = "Guardar" + ' + 'GenerarWordToolStripMenuItem + ' + Me.GenerarWordToolStripMenuItem.Name = "GenerarWordToolStripMenuItem" + Me.GenerarWordToolStripMenuItem.Size = New System.Drawing.Size(114, 24) + Me.GenerarWordToolStripMenuItem.Text = "Generar Word" + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(201, 43) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(222, 17) + Me.Label1.TabIndex = 12 + Me.Label1.Text = "Visualització Previa a la conversió" + Me.Label1.Visible = False + ' + 'GroupBox1 + ' + Me.GroupBox1.Controls.Add(Me.Label2) + Me.GroupBox1.Controls.Add(Me.RichTextBox2) + Me.GroupBox1.Controls.Add(Me.Button9) + Me.GroupBox1.Controls.Add(Me.TextBox1) + Me.GroupBox1.Controls.Add(Me.Button7) + Me.GroupBox1.Controls.Add(Me.Button6) + Me.GroupBox1.Controls.Add(Me.Button5) + Me.GroupBox1.Location = New System.Drawing.Point(12, 76) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.Size = New System.Drawing.Size(172, 193) + Me.GroupBox1.TabIndex = 25 + Me.GroupBox1.TabStop = False + Me.GroupBox1.Text = "Opcions per insertar" + Me.GroupBox1.Visible = False + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(6, 29) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(136, 17) + Me.Label2.TabIndex = 26 + Me.Label2.Text = "Selecciona el símbol" + ' + 'RichTextBox2 + ' + Me.RichTextBox2.EnableAutoDragDrop = True + Me.RichTextBox2.Enabled = False + Me.RichTextBox2.Font = New System.Drawing.Font("Times New Roman", 13.8!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.RichTextBox2.Location = New System.Drawing.Point(6, 153) + Me.RichTextBox2.Name = "RichTextBox2" + Me.RichTextBox2.ReadOnly = True + Me.RichTextBox2.Size = New System.Drawing.Size(161, 33) + Me.RichTextBox2.TabIndex = 30 + Me.RichTextBox2.Text = "" + ' + 'Button9 + ' + Me.Button9.Enabled = False + Me.Button9.Location = New System.Drawing.Point(107, 124) + Me.Button9.Name = "Button9" + Me.Button9.Size = New System.Drawing.Size(60, 23) + Me.Button9.TabIndex = 29 + Me.Button9.Text = "ADD CUSTOM" + Me.Button9.UseVisualStyleBackColor = True + ' + 'TextBox1 + ' + Me.TextBox1.Enabled = False + Me.TextBox1.Location = New System.Drawing.Point(6, 125) + Me.TextBox1.Name = "TextBox1" + Me.TextBox1.Size = New System.Drawing.Size(95, 22) + Me.TextBox1.TabIndex = 28 + ' + 'Button7 + ' + Me.Button7.Enabled = False + Me.Button7.Location = New System.Drawing.Point(89, 58) + Me.Button7.Name = "Button7" + Me.Button7.Size = New System.Drawing.Size(78, 28) + Me.Button7.TabIndex = 27 + Me.Button7.Text = "( OFF )" + Me.Button7.UseVisualStyleBackColor = True + ' + 'Button6 + ' + Me.Button6.Enabled = False + Me.Button6.Location = New System.Drawing.Point(6, 91) + Me.Button6.Name = "Button6" + Me.Button6.Size = New System.Drawing.Size(161, 28) + Me.Button6.TabIndex = 26 + Me.Button6.Text = "( ON / OFF )" + Me.Button6.UseVisualStyleBackColor = True + ' + 'Button5 + ' + Me.Button5.Enabled = False + Me.Button5.Location = New System.Drawing.Point(6, 58) + Me.Button5.Name = "Button5" + Me.Button5.Size = New System.Drawing.Size(77, 28) + Me.Button5.TabIndex = 25 + Me.Button5.Text = "( ON )" + Me.Button5.UseVisualStyleBackColor = True + ' + 'StatusStrip1 + ' + Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel1}) + Me.StatusStrip1.Location = New System.Drawing.Point(0, 737) + Me.StatusStrip1.Name = "StatusStrip1" + Me.StatusStrip1.Size = New System.Drawing.Size(1481, 22) + Me.StatusStrip1.TabIndex = 26 + Me.StatusStrip1.Text = "StatusStrip1" + ' + 'ToolStripStatusLabel1 + ' + Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1" + Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(0, 17) + ' + 'RichTextBox3 + ' + Me.RichTextBox3.Location = New System.Drawing.Point(41, 525) + Me.RichTextBox3.Name = "RichTextBox3" + Me.RichTextBox3.Size = New System.Drawing.Size(138, 96) + Me.RichTextBox3.TabIndex = 27 + Me.RichTextBox3.Text = "" + Me.RichTextBox3.Visible = False + ' + 'Form1 + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.AutoSize = True + Me.ClientSize = New System.Drawing.Size(1481, 759) + Me.Controls.Add(Me.RichTextBox3) + Me.Controls.Add(Me.StatusStrip1) + Me.Controls.Add(Me.GroupBox1) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.RichTextBox1) + Me.Controls.Add(Me.MenuStrip1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.Fixed3D + Me.MainMenuStrip = Me.MenuStrip1 + Me.MaximizeBox = False + Me.MinimizeBox = False + Me.Name = "Form1" + Me.Text = "Takeiteasy" + Me.MenuStrip1.ResumeLayout(False) + Me.MenuStrip1.PerformLayout() + Me.GroupBox1.ResumeLayout(False) + Me.GroupBox1.PerformLayout() + Me.StatusStrip1.ResumeLayout(False) + Me.StatusStrip1.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents RichTextBox1 As System.Windows.Forms.RichTextBox + Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox + Friend WithEvents RichTextBox2 As System.Windows.Forms.RichTextBox + Friend WithEvents Button9 As System.Windows.Forms.Button + Friend WithEvents TextBox1 As System.Windows.Forms.TextBox + Friend WithEvents Button7 As System.Windows.Forms.Button + Friend WithEvents Button6 As System.Windows.Forms.Button + Friend WithEvents Button5 As System.Windows.Forms.Button + Friend WithEvents Timer1 As System.Windows.Forms.Timer + Friend WithEvents ConversióToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ConvertirDocumentToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents EditarToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ObrirDocumentToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents GuardarToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents GenerarWordToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip + Friend WithEvents ToolStripStatusLabel1 As System.Windows.Forms.ToolStripStatusLabel + Friend WithEvents RichTextBox3 As System.Windows.Forms.RichTextBox + +End Class diff --git a/Projects/WindowsApplication1/WindowsApplication1/Form1.resx b/Projects/WindowsApplication1/WindowsApplication1/Form1.resx new file mode 100644 index 0000000000000000000000000000000000000000..50c67bdf15ed90006c54e14de93c051f9f7d2920 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/Form1.resx @@ -0,0 +1,129 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + + 149, 17 + + + 248, 17 + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/Form1.vb b/Projects/WindowsApplication1/WindowsApplication1/Form1.vb new file mode 100644 index 0000000000000000000000000000000000000000..83c07bc96e5e8e88b701dda2478b4c612ab6bcf9 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/Form1.vb @@ -0,0 +1,240 @@ +Imports Word = Microsoft.Office.Interop.Word +Imports Microsoft.Office.Interop +Imports System.Runtime.InteropServices + + +Public Class Form1 + + + + + + Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + + + + + End Sub + + Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + + Dim doc As New Word.Document + Dim WordApp As New Word.Application() + Dim file As Object = "Z:\j.doc" + Dim Nothingobj As Object = System.Reflection.Missing.Value + doc = WordApp.Documents.Open(file, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj) + doc.ActiveWindow.Selection.WholeStory() + doc.ActiveWindow.Selection.Copy() + + + Dim data As IDataObject = Clipboard.GetDataObject() + + doc.Close() + End Sub + + + + + + + + + + Private Sub DesarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + Dim saveFileDialog1 As New SaveFileDialog() + saveFileDialog1.Filter = "Document de Word Convertit|*.doc" + saveFileDialog1.Title = "Guardar Document de Word Convertit" + saveFileDialog1.ShowDialog() + + + If saveFileDialog1.ShowDialog() = DialogResult.OK Then + RichTextBox1.SaveFile(saveFileDialog1.FileName, _ + RichTextBoxStreamType.PlainText) + MsgBox("correcto") + End If + End Sub + + + + + + + + + + + + + + + + + + Private Sub SortirToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + End + End Sub + + + + + Private Sub ConvertirDocumentToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ConvertirDocumentToolStripMenuItem.Click + + + End Sub + + Private Sub ObrirDocumentToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ObrirDocumentToolStripMenuItem.Click + RichTextBox1.Text = "" + + End Sub + + + Private Sub GuardarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GuardarToolStripMenuItem.Click + + End Sub + + Private Sub GenerarWordToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GenerarWordToolStripMenuItem.Click + Dim saveFileDialog1 As New SaveFileDialog() + saveFileDialog1.Filter = "Word Final |*.doc" + saveFileDialog1.Title = "Document de Word Final " + + If saveFileDialog1.ShowDialog() = DialogResult.OK Then + + ' Create Word Application + Dim oWord As Object + oWord = CreateObject("Word.Application") + ' Create new word document + + Dim doc As New Word.Document + oWord.ScreenUpdating = False + + ToolStripStatusLabel1.Text = "Word obert" + Dim file As Object = saveFileDialog1.FileName + + Dim data As IDataObject = Clipboard.GetDataObject() + Dim oTable As Word.Table + Dim datos(0 To RichTextBox1.Lines.GetLength(0), 0 To 2) As String + Dim i As Integer + i = 0 + Dim lines() As String = RichTextBox1.Lines + Dim doit As String + doit = "false" + For Each line As String In RichTextBox1.Lines + Dim primercaracter As String + If RichTextBox1.Lines(i).ToString = vbCrLf Then MsgBox(RichTextBox1.Lines(i).ToString) + If (RichTextBox1.Lines(i).ToString = "") Then + + 'MsgBox(RichTextBox1.Lines(i).ToString & vbCrLf & i) + Else + primercaracter = RichTextBox1.Lines(i).Substring(0, 1).ToString + If (primercaracter = "<") Then + datos(i, 0) = "newtake" + datos(i, 1) = RichTextBox1.Lines(i).Trim.ToString + datos(i, 2) = "-NADA-" + doit = "true" + ElseIf (primercaracter = "*") Then + Dim textof As String + Dim textofs() As String + textof = RichTextBox1.Lines(i).ToString + textofs = textof.Split("*") + datos(i, 0) = "voz" + datos(i, 1) = textofs(1).Trim.ToString + datos(i, 2) = textofs(2).Trim.ToString + Else + If (doit = "false") Then + datos(i, 0) = "titulo" + datos(i, 1) = RichTextBox1.Lines(i).ToString + datos(i, 2) = "-NADA-" + Else + If (datos(i - 1, 2) = "") Then + 'MsgBox("fila : " & i & vbCrLf & "previo : " & datos(i - 2, 2) & vbCrLf & "actual : " & RichTextBox1.Lines(i).ToString) + datos(i - 2, 2) = datos(i - 2, 2) & " " & RichTextBox1.Lines(i).ToString + Else + 'MsgBox("fila : " & i & vbCrLf & "previo : " & datos(i - 1, 2) & vbCrLf & "actual : " & RichTextBox1.Lines(i).ToString) + datos(i - 1, 2) = datos(i - 1, 2) & " " & RichTextBox1.Lines(i).ToString + End If + End If + End If + End If + + i = i + 1 + Next line + Dim datos2(0 To RichTextBox1.Lines.GetLength(0), 0 To 2) As String + Dim canti As String = datos.GetUpperBound(0) + Dim p As Integer = 0 + + For j As Integer = 1 To canti - 1 Step +1 + + If datos(j - 1, 1) = "" Then + + Else + datos2(p, 1) = datos(j - 1, 1) + datos2(p, 2) = datos(j - 1, 2) + p = p + 1 + End If + Next + oWord.Visible = False + oTable = doc.Tables.Add(doc.Bookmarks.Item("\endofdoc").Range, datos2.GetUpperBound(0), 2) + oTable.Range.ParagraphFormat.SpaceAfter = 6 + oTable.Range.Font.Name = "Times New Roman" + oTable.Range.Font.Size = 11 + oTable.Range.Font.Bold = True + + Dim takes As Boolean = False + For n As Integer = 1 To datos2.GetUpperBound(0) Step +1 + Me.Text = "Quedan " & (datos2.GetUpperBound(0) - n) - 1 & " Lineas per convertir" + If (n <= 1) Then + oTable.Cell(1, 1).Range.Text = datos2(n - 1, 1) + oTable.Cell(1, 1).Merge(oTable.Cell(1, 2)) + Else + Dim pric As String + '(datos(n - 1, 1)) + If (datos2(n - 1, 1) = "") Then + ' oTable.Rows(n - 1).Delete() + Else + + If datos2(n - 1, 1) IsNot "" Then + pric = datos2(n - 1, 1).Substring(0, 1).ToString + If (pric = "<") Then + oTable.Cell(n, 1).Merge(oTable.Cell(n, 2)) + oTable.Cell(n, 1).Range.Text = datos2(n - 1, 1) + oTable.Cell(n, 1).Range.Font.ColorIndex = Word.WdColorIndex.wdGreen + takes = True + + Else + If takes = True Then + oTable.Cell(n, 1).Range.Text = "*" & datos2(n - 1, 1) & "*" + oTable.Cell(n, 2).Range.Text = datos2(n - 1, 2) + oTable.Cell(n, 2).Width = 360 + oTable.Cell(n, 1).Width = 100 + Else + oTable.Cell(n, 1).Range.Text = datos2(n - 1, 1) + oTable.Cell(n, 1).Merge(oTable.Cell(n, 2)) + + End If + + End If + Else + 'oTable.Rows(n - 1).Delete() + End If + + End If + End If + + Next + doc.SaveAs2(saveFileDialog1.FileName) + + doc.Close() + oWord.Application.Quit() + MsgBox("Guardat :)") + ToolStripStatusLabel1.Text = "Word tancat" + End If + End Sub + + Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click + + End Sub + + Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click + + End Sub +End Class \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/Form2.Designer.vb b/Projects/WindowsApplication1/WindowsApplication1/Form2.Designer.vb new file mode 100644 index 0000000000000000000000000000000000000000..8240bf0ceb78fe11c7b2863bc1bd493c7a11fab2 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/Form2.Designer.vb @@ -0,0 +1,166 @@ + _ +Partial Class Form2 + Inherits System.Windows.Forms.Form + + 'Form reemplaza a Dispose para limpiar la lista de componentes. + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Requerido por el Diseñador de Windows Forms + Private components As System.ComponentModel.IContainer + + 'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento + 'Se puede modificar usando el Diseñador de Windows Forms. + 'No lo modifique con el editor de código. + _ + Private Sub InitializeComponent() + Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.Label2 = New System.Windows.Forms.Label() + Me.RichTextBox2 = New System.Windows.Forms.RichTextBox() + Me.Button9 = New System.Windows.Forms.Button() + Me.TextBox1 = New System.Windows.Forms.TextBox() + Me.Button7 = New System.Windows.Forms.Button() + Me.Button6 = New System.Windows.Forms.Button() + Me.Button5 = New System.Windows.Forms.Button() + Me.Label1 = New System.Windows.Forms.Label() + Me.RichTextBox1 = New System.Windows.Forms.RichTextBox() + Me.GroupBox1.SuspendLayout() + Me.SuspendLayout() + ' + 'GroupBox1 + ' + Me.GroupBox1.Controls.Add(Me.Label2) + Me.GroupBox1.Controls.Add(Me.RichTextBox2) + Me.GroupBox1.Controls.Add(Me.Button9) + Me.GroupBox1.Controls.Add(Me.TextBox1) + Me.GroupBox1.Controls.Add(Me.Button7) + Me.GroupBox1.Controls.Add(Me.Button6) + Me.GroupBox1.Controls.Add(Me.Button5) + Me.GroupBox1.Location = New System.Drawing.Point(12, 28) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.Size = New System.Drawing.Size(172, 193) + Me.GroupBox1.TabIndex = 28 + Me.GroupBox1.TabStop = False + Me.GroupBox1.Text = "Opcions per insertar" + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(6, 29) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(136, 17) + Me.Label2.TabIndex = 26 + Me.Label2.Text = "Selecciona el símbol" + ' + 'RichTextBox2 + ' + Me.RichTextBox2.EnableAutoDragDrop = True + Me.RichTextBox2.Font = New System.Drawing.Font("Times New Roman", 13.8!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.RichTextBox2.Location = New System.Drawing.Point(6, 153) + Me.RichTextBox2.Name = "RichTextBox2" + Me.RichTextBox2.ReadOnly = True + Me.RichTextBox2.Size = New System.Drawing.Size(161, 33) + Me.RichTextBox2.TabIndex = 30 + Me.RichTextBox2.Text = "" + ' + 'Button9 + ' + Me.Button9.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Button9.Location = New System.Drawing.Point(107, 124) + Me.Button9.Name = "Button9" + Me.Button9.Size = New System.Drawing.Size(60, 23) + Me.Button9.TabIndex = 29 + Me.Button9.Text = "ADD CUSTOM" + Me.Button9.UseVisualStyleBackColor = True + ' + 'TextBox1 + ' + Me.TextBox1.Location = New System.Drawing.Point(6, 125) + Me.TextBox1.Name = "TextBox1" + Me.TextBox1.Size = New System.Drawing.Size(95, 22) + Me.TextBox1.TabIndex = 28 + ' + 'Button7 + ' + Me.Button7.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Button7.Location = New System.Drawing.Point(89, 58) + Me.Button7.Name = "Button7" + Me.Button7.Size = New System.Drawing.Size(78, 28) + Me.Button7.TabIndex = 27 + Me.Button7.Text = "( OFF )" + Me.Button7.UseVisualStyleBackColor = True + ' + 'Button6 + ' + Me.Button6.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Button6.Location = New System.Drawing.Point(6, 91) + Me.Button6.Name = "Button6" + Me.Button6.Size = New System.Drawing.Size(161, 28) + Me.Button6.TabIndex = 26 + Me.Button6.Text = "( ON / OFF )" + Me.Button6.UseVisualStyleBackColor = True + ' + 'Button5 + ' + Me.Button5.Location = New System.Drawing.Point(6, 58) + Me.Button5.Name = "Button5" + Me.Button5.Size = New System.Drawing.Size(77, 28) + Me.Button5.TabIndex = 25 + Me.Button5.Text = "( ON )" + Me.Button5.UseVisualStyleBackColor = True + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(187, 8) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(222, 17) + Me.Label1.TabIndex = 27 + Me.Label1.Text = "Visualització Previa a la conversió" + ' + 'RichTextBox1 + ' + Me.RichTextBox1.EnableAutoDragDrop = True + Me.RichTextBox1.Font = New System.Drawing.Font("Times New Roman", 13.8!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.RichTextBox1.Location = New System.Drawing.Point(190, 28) + Me.RichTextBox1.Name = "RichTextBox1" + Me.RichTextBox1.Size = New System.Drawing.Size(1287, 644) + Me.RichTextBox1.TabIndex = 26 + Me.RichTextBox1.Text = "" + ' + 'Form2 + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(1489, 680) + Me.Controls.Add(Me.GroupBox1) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.RichTextBox1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle + Me.Name = "Form2" + Me.Text = "Form2" + Me.GroupBox1.ResumeLayout(False) + Me.GroupBox1.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents RichTextBox2 As System.Windows.Forms.RichTextBox + Friend WithEvents Button9 As System.Windows.Forms.Button + Friend WithEvents TextBox1 As System.Windows.Forms.TextBox + Friend WithEvents Button7 As System.Windows.Forms.Button + Friend WithEvents Button6 As System.Windows.Forms.Button + Friend WithEvents Button5 As System.Windows.Forms.Button + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents RichTextBox1 As System.Windows.Forms.RichTextBox +End Class diff --git a/Projects/WindowsApplication1/WindowsApplication1/Form2.resx b/Projects/WindowsApplication1/WindowsApplication1/Form2.resx new file mode 100644 index 0000000000000000000000000000000000000000..29dcb1b3a353ba227f65e11fbe3d6f0766e84292 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/Form2.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/Form2.vb b/Projects/WindowsApplication1/WindowsApplication1/Form2.vb new file mode 100644 index 0000000000000000000000000000000000000000..b2d3fc80b02232ff2bbc36a060565f78e1d807c3 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/Form2.vb @@ -0,0 +1,31 @@ +Public Class Form2 + + Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + + End Sub + + Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click + RichTextBox2.Text = "( ON )" + End Sub + + + + Private Sub RichTextBox2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles RichTextBox2.Click + RichTextBox2.SelectAll() + End Sub + + + Private Sub Button7_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click + RichTextBox2.Text = "( OFF )" + End Sub + + Private Sub Button6_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click + RichTextBox2.Text = "( ON / OFF )" + End Sub + + Private Sub Button9_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click + If TextBox1.Text IsNot "" Then + RichTextBox2.Text = TextBox1.Text + End If + End Sub +End Class \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/MDIParent1.Designer.vb b/Projects/WindowsApplication1/WindowsApplication1/MDIParent1.Designer.vb new file mode 100644 index 0000000000000000000000000000000000000000..47b8603b67c7a3102d24116ea50ba55995d15bd9 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/MDIParent1.Designer.vb @@ -0,0 +1,237 @@ + _ +Partial Class MDIParent1 + Inherits System.Windows.Forms.Form + + 'Form reemplaza a Dispose para limpiar la lista de componentes. + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + + 'Requerido por el Diseñador de Windows Forms + Private components As System.ComponentModel.IContainer + + 'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento + 'Se puede modificar usando el Diseñador de Windows Forms. + 'No lo modifique con el editor de código. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(MDIParent1)) + Me.MenuStrip = New System.Windows.Forms.MenuStrip() + Me.FileMenu = New System.Windows.Forms.ToolStripMenuItem() + Me.OpenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator() + Me.SaveToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SaveAsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator() + Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator() + Me.ExitToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolsMenu = New System.Windows.Forms.ToolStripMenuItem() + Me.OptionsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStrip = New System.Windows.Forms.ToolStrip() + Me.OpenToolStripButton = New System.Windows.Forms.ToolStripButton() + Me.SaveToolStripButton = New System.Windows.Forms.ToolStripButton() + Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() + Me.StatusStrip = New System.Windows.Forms.StatusStrip() + Me.ToolStripStatusLabel = New System.Windows.Forms.ToolStripStatusLabel() + Me.ToolTip = New System.Windows.Forms.ToolTip(Me.components) + Me.GenerarDocumentoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RichTextBox1 = New System.Windows.Forms.RichTextBox() + Me.MenuStrip.SuspendLayout() + Me.ToolStrip.SuspendLayout() + Me.StatusStrip.SuspendLayout() + Me.SuspendLayout() + ' + 'MenuStrip + ' + Me.MenuStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.FileMenu, Me.ToolsMenu}) + Me.MenuStrip.Location = New System.Drawing.Point(0, 0) + Me.MenuStrip.Name = "MenuStrip" + Me.MenuStrip.Padding = New System.Windows.Forms.Padding(8, 2, 0, 2) + Me.MenuStrip.Size = New System.Drawing.Size(843, 28) + Me.MenuStrip.TabIndex = 5 + Me.MenuStrip.Text = "MenuStrip" + ' + 'FileMenu + ' + Me.FileMenu.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.OpenToolStripMenuItem, Me.ToolStripSeparator3, Me.SaveToolStripMenuItem, Me.SaveAsToolStripMenuItem, Me.ToolStripSeparator4, Me.ToolStripSeparator5, Me.ExitToolStripMenuItem}) + Me.FileMenu.ImageTransparentColor = System.Drawing.SystemColors.ActiveBorder + Me.FileMenu.Name = "FileMenu" + Me.FileMenu.Size = New System.Drawing.Size(71, 24) + Me.FileMenu.Text = "&Archivo" + ' + 'OpenToolStripMenuItem + ' + Me.OpenToolStripMenuItem.Image = CType(resources.GetObject("OpenToolStripMenuItem.Image"), System.Drawing.Image) + Me.OpenToolStripMenuItem.ImageTransparentColor = System.Drawing.Color.Black + Me.OpenToolStripMenuItem.Name = "OpenToolStripMenuItem" + Me.OpenToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.O), System.Windows.Forms.Keys) + Me.OpenToolStripMenuItem.Size = New System.Drawing.Size(181, 24) + Me.OpenToolStripMenuItem.Text = "&Abrir" + ' + 'ToolStripSeparator3 + ' + Me.ToolStripSeparator3.Name = "ToolStripSeparator3" + Me.ToolStripSeparator3.Size = New System.Drawing.Size(178, 6) + ' + 'SaveToolStripMenuItem + ' + Me.SaveToolStripMenuItem.Image = CType(resources.GetObject("SaveToolStripMenuItem.Image"), System.Drawing.Image) + Me.SaveToolStripMenuItem.ImageTransparentColor = System.Drawing.Color.Black + Me.SaveToolStripMenuItem.Name = "SaveToolStripMenuItem" + Me.SaveToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.S), System.Windows.Forms.Keys) + Me.SaveToolStripMenuItem.Size = New System.Drawing.Size(181, 24) + Me.SaveToolStripMenuItem.Text = "&Guardar" + ' + 'SaveAsToolStripMenuItem + ' + Me.SaveAsToolStripMenuItem.Name = "SaveAsToolStripMenuItem" + Me.SaveAsToolStripMenuItem.Size = New System.Drawing.Size(181, 24) + Me.SaveAsToolStripMenuItem.Text = "Guardar &como" + ' + 'ToolStripSeparator4 + ' + Me.ToolStripSeparator4.Name = "ToolStripSeparator4" + Me.ToolStripSeparator4.Size = New System.Drawing.Size(178, 6) + ' + 'ToolStripSeparator5 + ' + Me.ToolStripSeparator5.Name = "ToolStripSeparator5" + Me.ToolStripSeparator5.Size = New System.Drawing.Size(178, 6) + ' + 'ExitToolStripMenuItem + ' + Me.ExitToolStripMenuItem.Name = "ExitToolStripMenuItem" + Me.ExitToolStripMenuItem.Size = New System.Drawing.Size(181, 24) + Me.ExitToolStripMenuItem.Text = "&Salir" + ' + 'ToolsMenu + ' + Me.ToolsMenu.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.OptionsToolStripMenuItem, Me.GenerarDocumentoToolStripMenuItem}) + Me.ToolsMenu.Name = "ToolsMenu" + Me.ToolsMenu.Size = New System.Drawing.Size(110, 24) + Me.ToolsMenu.Text = "&Herramientas" + ' + 'OptionsToolStripMenuItem + ' + Me.OptionsToolStripMenuItem.Name = "OptionsToolStripMenuItem" + Me.OptionsToolStripMenuItem.Size = New System.Drawing.Size(220, 24) + Me.OptionsToolStripMenuItem.Text = "&Convertir Documento" + ' + 'ToolStrip + ' + Me.ToolStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.OpenToolStripButton, Me.SaveToolStripButton, Me.ToolStripSeparator1}) + Me.ToolStrip.Location = New System.Drawing.Point(0, 28) + Me.ToolStrip.Name = "ToolStrip" + Me.ToolStrip.Size = New System.Drawing.Size(843, 25) + Me.ToolStrip.TabIndex = 6 + Me.ToolStrip.Text = "ToolStrip" + ' + 'OpenToolStripButton + ' + Me.OpenToolStripButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image + Me.OpenToolStripButton.Image = CType(resources.GetObject("OpenToolStripButton.Image"), System.Drawing.Image) + Me.OpenToolStripButton.ImageTransparentColor = System.Drawing.Color.Black + Me.OpenToolStripButton.Name = "OpenToolStripButton" + Me.OpenToolStripButton.Size = New System.Drawing.Size(23, 22) + Me.OpenToolStripButton.Text = "Abrir" + ' + 'SaveToolStripButton + ' + Me.SaveToolStripButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image + Me.SaveToolStripButton.Image = CType(resources.GetObject("SaveToolStripButton.Image"), System.Drawing.Image) + Me.SaveToolStripButton.ImageTransparentColor = System.Drawing.Color.Black + Me.SaveToolStripButton.Name = "SaveToolStripButton" + Me.SaveToolStripButton.Size = New System.Drawing.Size(23, 22) + Me.SaveToolStripButton.Text = "Guardar" + ' + 'ToolStripSeparator1 + ' + Me.ToolStripSeparator1.Name = "ToolStripSeparator1" + Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25) + ' + 'StatusStrip + ' + Me.StatusStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel}) + Me.StatusStrip.Location = New System.Drawing.Point(0, 533) + Me.StatusStrip.Name = "StatusStrip" + Me.StatusStrip.Padding = New System.Windows.Forms.Padding(1, 0, 19, 0) + Me.StatusStrip.Size = New System.Drawing.Size(843, 25) + Me.StatusStrip.TabIndex = 7 + Me.StatusStrip.Text = "StatusStrip" + ' + 'ToolStripStatusLabel + ' + Me.ToolStripStatusLabel.Name = "ToolStripStatusLabel" + Me.ToolStripStatusLabel.Size = New System.Drawing.Size(54, 20) + Me.ToolStripStatusLabel.Text = "Estado" + ' + 'GenerarDocumentoToolStripMenuItem + ' + Me.GenerarDocumentoToolStripMenuItem.Name = "GenerarDocumentoToolStripMenuItem" + Me.GenerarDocumentoToolStripMenuItem.Size = New System.Drawing.Size(220, 24) + Me.GenerarDocumentoToolStripMenuItem.Text = "Generar Documento" + ' + 'RichTextBox1 + ' + Me.RichTextBox1.Location = New System.Drawing.Point(743, 434) + Me.RichTextBox1.Name = "RichTextBox1" + Me.RichTextBox1.Size = New System.Drawing.Size(100, 96) + Me.RichTextBox1.TabIndex = 9 + Me.RichTextBox1.Text = "" + Me.RichTextBox1.Visible = False + ' + 'MDIParent1 + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(843, 558) + Me.Controls.Add(Me.RichTextBox1) + Me.Controls.Add(Me.ToolStrip) + Me.Controls.Add(Me.MenuStrip) + Me.Controls.Add(Me.StatusStrip) + Me.IsMdiContainer = True + Me.MainMenuStrip = Me.MenuStrip + Me.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4) + Me.Name = "MDIParent1" + Me.Text = "MDIParent1" + Me.MenuStrip.ResumeLayout(False) + Me.MenuStrip.PerformLayout() + Me.ToolStrip.ResumeLayout(False) + Me.ToolStrip.PerformLayout() + Me.StatusStrip.ResumeLayout(False) + Me.StatusStrip.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents OptionsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ToolTip As System.Windows.Forms.ToolTip + Friend WithEvents ToolStripStatusLabel As System.Windows.Forms.ToolStripStatusLabel + Friend WithEvents StatusStrip As System.Windows.Forms.StatusStrip + Friend WithEvents ToolStrip As System.Windows.Forms.ToolStrip + Friend WithEvents OpenToolStripButton As System.Windows.Forms.ToolStripButton + Friend WithEvents SaveToolStripButton As System.Windows.Forms.ToolStripButton + Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents ToolStripSeparator4 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents ExitToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ToolStripSeparator5 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents SaveAsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents FileMenu As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents OpenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents SaveToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents MenuStrip As System.Windows.Forms.MenuStrip + Friend WithEvents ToolsMenu As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents GenerarDocumentoToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents RichTextBox1 As System.Windows.Forms.RichTextBox + +End Class diff --git a/Projects/WindowsApplication1/WindowsApplication1/MDIParent1.resx b/Projects/WindowsApplication1/WindowsApplication1/MDIParent1.resx new file mode 100644 index 0000000000000000000000000000000000000000..34414bbd6a62c556ee2b4069f38d2b8c4b6b7fa5 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/MDIParent1.resx @@ -0,0 +1,198 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 257, 17 + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAJfSURBVDhPvZNbSBNgGIZ30UVXFmlRCEaWhF2IgSHVRUjS + SVFKs8JIE8pTBwzFNg9tOnVzJ6eudJjbdE2dVpZhWCEUikRoqaPEtCwoKsXMUMnT09xCkyzwph/em5/v + fb73+35+geB/nJxiMxKthctyE3k6K2lKI8vqG52sIyxe5TCdF5aTZYelSA1EJRcjqDNrWEqNNbK/dklI + KyE8UUVofIET0NtlZGKk1qEfwxamBg1YTSrqzdIlIWEJakLjtATHFiGorVAzPly1yDzzqYQpWxJV5XIq + S3MxFGehL8jkmlJEkSx1MbTaqGD8i3G+86zdTK8IbLFL6g/AjTIZ3z/qHbHnzE11CofuW/NpsMi4XZmL + 1ZCNRS/BpLvCdW06pWoROoXQmaZSn8vou0LmYr9pEVNfpWbmjQQGpIv11n7XnwY9yfAykc6aCC7GhCAw + 6LL51ieH90ruVKtoe6B0Fv0+wosoaA9nujWIiYcBvK7w4dyp/U5AmVbM11cSBlozqLcome0XQ3ecE9AZ + YzceZ7othInmfYw27maobjuSeC9OBLo5l1mizmCoS8hNs4KOJ/YkPUl2wBnoOMns08NMPj7IWNMehuv9 + +FztTXvOaiKDPPHb6uIE6PJFdDdncsucD32Z8Nwe99lRJluCGXsUwEiDP4NWHz4Yt2BTuiKO3YzvNveF + pyzMS6XWJMd2N4F2jWBebcoVNMtWci9rFTXpazGkunP10kYiD23C39djAaCRpqARnyVPGE3ahWOOxZyO + COTIgZ3s3eXDDh8vvD3d8djgxro1Lqx3/RV9Wb/pH8U/ATEu7l+AbzRZAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAIpSURBVDhPrZPdS5NxFMf3L3TfTdBFtzU1hmuxGjzlHMqq + YVgRvT2RL+XSZZqoWJlGLV8gW+HSScvpJJxU+AamSI2hTCVLM1e0xKGm2EQw+PY7v+j5tTJv6gfn8vM5 + zznn+6hU/+M9exoFla99GW3eJTx2L6CxIYL7jhnU1nyC/XYIN8qnUFoygcKC18jLHcWF80EovQns7QFq + qlex0VtZXYMxrReH057wUgTe1kUuqKz48lee4MjCCnabn0OtlmE55BEC96N5Ligt+byu4Cf8PryIOJMP + BZenccDcJATO+lkuuGR794fgV3hkMoJtkhfWnHGkpjiFoO5umAuys0ZjBL/Dg8EwNuvdkOUATCaHEFRX + feQC+UxAEawH9/g/YFNiA44cfYGkpFohuFk5je4usFMCx0++guXYAN82LYxmps+mzj/gPhy0dEKS7EJw + tWwSHT6wDABNrm/s7l9Rfn2OL5UWRjNnZgQVODm1HQZDhRBcKRyHpxl46FxjwYnCmJ4TU+YTNqSfK+Kd + k1MYvN8Dvb5MCGx5YwwGqu5EeWcSUEjitBKG3s5ibGoOcu417DW2cVi7xwWdrkgIKJaOe1A+mwQEn82/ + hTeheYRmlnCx2I54vYvBjYjf9QDaxHwhyMwYZnMv85m3GjzYskNCS0c/fF2D6O7zY+DlEPaZLFDr6pHA + 4O2aOmg01ljB6VP9PJ6UMAoJ3ZlORdumhdHM1JWK4J0J2ULwL3/0d2xoOmtKzOuNAAAAAElFTkSuQmCC + + + + 143, 17 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAJfSURBVDhPvZNbSBNgGIZ30UVXFmlRCEaWhF2IgSHVRUjS + SVFKs8JIE8pTBwzFNg9tOnVzJ6eudJjbdE2dVpZhWCEUikRoqaPEtCwoKsXMUMnT09xCkyzwph/em5/v + fb73+35+geB/nJxiMxKthctyE3k6K2lKI8vqG52sIyxe5TCdF5aTZYelSA1EJRcjqDNrWEqNNbK/dklI + KyE8UUVofIET0NtlZGKk1qEfwxamBg1YTSrqzdIlIWEJakLjtATHFiGorVAzPly1yDzzqYQpWxJV5XIq + S3MxFGehL8jkmlJEkSx1MbTaqGD8i3G+86zdTK8IbLFL6g/AjTIZ3z/qHbHnzE11CofuW/NpsMi4XZmL + 1ZCNRS/BpLvCdW06pWoROoXQmaZSn8vou0LmYr9pEVNfpWbmjQQGpIv11n7XnwY9yfAykc6aCC7GhCAw + 6LL51ieH90ruVKtoe6B0Fv0+wosoaA9nujWIiYcBvK7w4dyp/U5AmVbM11cSBlozqLcome0XQ3ecE9AZ + YzceZ7othInmfYw27maobjuSeC9OBLo5l1mizmCoS8hNs4KOJ/YkPUl2wBnoOMns08NMPj7IWNMehuv9 + +FztTXvOaiKDPPHb6uIE6PJFdDdncsucD32Z8Nwe99lRJluCGXsUwEiDP4NWHz4Yt2BTuiKO3YzvNveF + pyzMS6XWJMd2N4F2jWBebcoVNMtWci9rFTXpazGkunP10kYiD23C39djAaCRpqARnyVPGE3ahWOOxZyO + COTIgZ3s3eXDDh8vvD3d8djgxro1Lqx3/RV9Wb/pH8U/ATEu7l+AbzRZAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAIpSURBVDhPrZPdS5NxFMf3L3TfTdBFtzU1hmuxGjzlHMqq + YVgRvT2RL+XSZZqoWJlGLV8gW+HSScvpJJxU+AamSI2hTCVLM1e0xKGm2EQw+PY7v+j5tTJv6gfn8vM5 + zznn+6hU/+M9exoFla99GW3eJTx2L6CxIYL7jhnU1nyC/XYIN8qnUFoygcKC18jLHcWF80EovQns7QFq + qlex0VtZXYMxrReH057wUgTe1kUuqKz48lee4MjCCnabn0OtlmE55BEC96N5Ligt+byu4Cf8PryIOJMP + BZenccDcJATO+lkuuGR794fgV3hkMoJtkhfWnHGkpjiFoO5umAuys0ZjBL/Dg8EwNuvdkOUATCaHEFRX + feQC+UxAEawH9/g/YFNiA44cfYGkpFohuFk5je4usFMCx0++guXYAN82LYxmps+mzj/gPhy0dEKS7EJw + tWwSHT6wDABNrm/s7l9Rfn2OL5UWRjNnZgQVODm1HQZDhRBcKRyHpxl46FxjwYnCmJ4TU+YTNqSfK+Kd + k1MYvN8Dvb5MCGx5YwwGqu5EeWcSUEjitBKG3s5ibGoOcu417DW2cVi7xwWdrkgIKJaOe1A+mwQEn82/ + hTeheYRmlnCx2I54vYvBjYjf9QDaxHwhyMwYZnMv85m3GjzYskNCS0c/fF2D6O7zY+DlEPaZLFDr6pHA + 4O2aOmg01ljB6VP9PJ6UMAoJ3ZlORdumhdHM1JWK4J0J2ULwL3/0d2xoOmtKzOuNAAAAAElFTkSuQmCC + + + + 17, 17 + + + 381, 17 + + + 51 + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/MDIParent1.vb b/Projects/WindowsApplication1/WindowsApplication1/MDIParent1.vb new file mode 100644 index 0000000000000000000000000000000000000000..23ada0eac05e56f9acf166c558c580d24d220d7f --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/MDIParent1.vb @@ -0,0 +1,396 @@ +Imports System.Windows.Forms +Imports Word = Microsoft.Office.Interop.Word +Imports Microsoft.Office.Interop +Imports System.Runtime.InteropServices + +Public Class MDIParent1 + + Private Sub ShowNewForm(ByVal sender As Object, ByVal e As EventArgs) + ' Cree una nueva instancia del formulario secundario. + Dim ChildForm As New Form1 + ' Conviértalo en un elemento secundario de este formulario MDI antes de mostrarlo. + ChildForm.MdiParent = Me + + m_ChildFormNumber += 1 + ChildForm.Text = "Ventana " & m_ChildFormNumber + + ChildForm.Show() + End Sub + + Public Function convertirdoc() + Dim i As Integer + i = 0 + + Dim activeChild As Form2 = Me.ActiveMdiChild + If (Not activeChild Is Nothing) Then + Dim lines() As String = activeChild.RichTextBox1.Lines + Dim datos(0 To activeChild.RichTextBox1.Lines.GetLength(0), 0 To 2) As String + Dim doit As String + + doit = "false" + For Each line As String In activeChild.RichTextBox1.Lines + Dim primercaracter As String + + If (activeChild.RichTextBox1.Lines(i).ToString = "") Then + 'MsgBox(RichTextBox1.Lines(i).ToString & vbCrLf & i) + Else + primercaracter = activeChild.RichTextBox1.Lines(i).Substring(0, 1).ToString + If (primercaracter = "<") Then + datos(i, 0) = "newtake" + datos(i, 1) = activeChild.RichTextBox1.Lines(i).Trim.ToString + datos(i, 2) = "-NADA-" + doit = "true" + + ElseIf (primercaracter = "*") Then + + Dim textof As String + Dim textofs() As String + textof = activeChild.RichTextBox1.Lines(i).ToString + textofs = textof.Split("*") + datos(i, 0) = "voz" + datos(i, 1) = textofs(1).Trim.ToString + datos(i, 2) = textofs(2).Trim.ToString + Else + If (doit = "false") Then + + datos(i, 0) = "titulo" + datos(i, 1) = activeChild.RichTextBox1.Lines(i).ToString + datos(i, 2) = "-NADA-" + Else + If (datos(i - 1, 2) = "") Then + 'MsgBox("fila : " & i & vbCrLf & "previo : " & datos(i - 2, 2) & vbCrLf & "actual : " & RichTextBox1.Lines(i).ToString) + datos(i - 2, 2) = datos(i - 2, 2) & " " & activeChild.RichTextBox1.Lines(i).ToString + Else + 'MsgBox("fila : " & i & vbCrLf & "previo : " & datos(i - 1, 2) & vbCrLf & "actual : " & RichTextBox1.Lines(i).ToString) + datos(i - 1, 2) = datos(i - 1, 2) & " " & activeChild.RichTextBox1.Lines(i).ToString + End If + + End If + + + + + + End If + End If + Me.Text = "Falten " & (datos.GetUpperBound(0) - i) - 1 & " per convertir" + i = i + 1 + Next line + + Dim datos2(0 To activeChild.RichTextBox1.Lines.GetLength(0), 0 To 2) As String + Dim canti As String = datos.GetUpperBound(0) + Dim p As Integer = 0 + + For j As Integer = 1 To canti - 1 Step +1 + + If datos(j - 1, 1) = "" Then + + Else + datos2(p, 1) = datos(j - 1, 1) + datos2(p, 2) = datos(j - 1, 2) + p = p + 1 + End If + Next + Dim takes As Boolean = False + + + For n As Integer = 1 To datos2.GetUpperBound(0) Step +1 + If (n <= 1) Then + RichTextBox1.Text = datos2(n - 1, 1) & "|" + Else + Dim pric As String + + If (datos2(n - 1, 1) = "") Then + ' oTable.Rows(n - 1).Delete() + Else + + If datos2(n - 1, 1) IsNot "" Then + pric = datos2(n - 1, 1).Substring(0, 1).ToString + If (pric = "<") Then + RichTextBox1.Text = RichTextBox1.Text & datos2(n - 1, 1).ToString & "|" + takes = True + Else + If takes = True Then + RichTextBox1.Text = RichTextBox1.Text & "*" & datos2(n - 1, 1).ToString & "*" & "+" & datos2(n - 1, 2).Trim.ToString & "|" + Else + RichTextBox1.Text = RichTextBox1.Text & datos2(n - 1, 1).ToString & "|" + + End If + + End If + Else + 'oTable.Rows(n - 1).Delete() + End If + + End If + End If + + Next + Dim saveFileDialog1 As New SaveFileDialog() + saveFileDialog1.Filter = "Document de Takes Convertit|*.txt" + saveFileDialog1.Title = "Guardar Document de Takes Convertit" + + If saveFileDialog1.ShowDialog() = DialogResult.OK Then + RichTextBox1.SaveFile(saveFileDialog1.FileName, _ + RichTextBoxStreamType.PlainText) + MsgBox("correcto") + + End If + + End If + Return True + End Function + Private Sub OpenFile(ByVal sender As Object, ByVal e As EventArgs) Handles OpenToolStripMenuItem.Click, OpenToolStripButton.Click + Dim openFileDialog1 As New OpenFileDialog() + openFileDialog1.Filter = "Document convertit |*.txt" + openFileDialog1.Title = "Selecciona el document..." + If openFileDialog1.ShowDialog() = DialogResult.OK Then + Dim sr As New System.IO.StreamReader(openFileDialog1.FileName, System.Text.Encoding.Default) + Dim takes As String = sr.ReadToEnd.ToString + Dim textof As String + Dim textofs() As String + Dim texto2() As String + textof = takes + textofs = textof.Split("|") + Dim primercaracter As String + + ' Cree una nueva instancia del formulario secundario. + Dim ChildForm As New Form2 + ' Conviértalo en un elemento secundario de este formulario MDI antes de mostrarlo. + ChildForm.MdiParent = Me + + m_ChildFormNumber += 1 + ChildForm.Text = "Archivo " & m_ChildFormNumber & " - Nombre : " & openFileDialog1.FileName + ChildForm.Show() + + For n As Integer = 0 To textofs.GetUpperBound(0) - 1 Step +1 + If textofs(n).Length > 1 Then + primercaracter = textofs(n).Substring(0, 1).ToString + If primercaracter = "<" Then + ChildForm.RichTextBox1.Text = ChildForm.RichTextBox1.Text & vbCrLf & vbCrLf & vbCrLf & textofs(n) & vbCrLf + + ElseIf primercaracter = "*" Then + texto2 = textofs(n).Split("+") + ChildForm.RichTextBox1.Text = ChildForm.RichTextBox1.Text & vbCrLf & vbCrLf & texto2(0) & " " & texto2(1) & vbCrLf + Else + ChildForm.RichTextBox1.Text = ChildForm.RichTextBox1.Text & textofs(n) & vbCrLf + + End If + End If + Next + sr.Close() + + End If + End Sub + + Private Sub SaveAsToolStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) Handles SaveAsToolStripMenuItem.Click + Dim SaveFileDialog As New SaveFileDialog + SaveFileDialog.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.MyDocuments + SaveFileDialog.Filter = "Archivos de texto (*.txt)|*.txt|Todos los archivos (*.*)|*.*" + + If (SaveFileDialog.ShowDialog(Me) = System.Windows.Forms.DialogResult.OK) Then + Dim FileName As String = SaveFileDialog.FileName + ' TODO: agregue código aquí para guardar el contenido actual del formulario en un archivo. + End If + End Sub + + + Private Sub ExitToolsStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) Handles ExitToolStripMenuItem.Click + Me.Close() + End Sub + + Private Sub CutToolStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) + ' Utilice My.Computer.Clipboard para insertar el texto o las imágenes seleccionadas en el Portapapeles + End Sub + + Private Sub CopyToolStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) + ' Utilice My.Computer.Clipboard para insertar el texto o las imágenes seleccionadas en el Portapapeles + End Sub + + Private Sub PasteToolStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) + 'Utilice My.Computer.Clipboard.GetText() o My.Computer.Clipboard.GetData para recuperar la información del Portapapeles. + End Sub + + Private Sub CascadeToolStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) + Me.LayoutMdi(MdiLayout.Cascade) + End Sub + + Private Sub TileVerticalToolStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) + Me.LayoutMdi(MdiLayout.TileVertical) + End Sub + + Private Sub TileHorizontalToolStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) + Me.LayoutMdi(MdiLayout.TileHorizontal) + End Sub + + Private Sub ArrangeIconsToolStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) + Me.LayoutMdi(MdiLayout.ArrangeIcons) + End Sub + + Private Sub CloseAllToolStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) + ' Cierre todos los formularios secundarios del principal. + For Each ChildForm As Form In Me.MdiChildren + ChildForm.Close() + Next + End Sub + + Private m_ChildFormNumber As Integer + + Private Sub OptionsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OptionsToolStripMenuItem.Click + ' Displays an OpenFileDialog so the user can select a Cursor. + Dim openFileDialog1 As New OpenFileDialog() + openFileDialog1.Filter = "Original |*.doc" + openFileDialog1.Title = "Selecciona el document..." + + ' Show the Dialog. + ' If the user clicked OK in the dialog and + ' a .CUR file was selected, open it. + If openFileDialog1.ShowDialog() = DialogResult.OK Then + Dim doc As New Word.Document + Dim WordApp As New Word.Application() + + Dim file As Object = openFileDialog1.FileName + Dim Nothingobj As Object = System.Reflection.Missing.Value + doc = WordApp.Documents.Open(file, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj, Nothingobj) + doc.ActiveWindow.Selection.WholeStory() + doc.ActiveWindow.Selection.Copy() + Dim data As IDataObject = Clipboard.GetDataObject() + RichTextBox1.Text = data.GetData(DataFormats.Text).ToString() + Dim datos(0 To RichTextBox1.Lines.GetLength(0), 0 To 2) As String + If RichTextBox1.Text = "" Then + MsgBox("Carrega l'arxiu primer!!", vbInformation) + + Else + Dim i As Integer + i = 0 + Dim lines() As String = RichTextBox1.Lines + + + + + Dim doit As String + doit = "false" + For Each line As String In RichTextBox1.Lines + Dim primercaracter As String + + If (RichTextBox1.Lines(i).ToString = "") Then + 'MsgBox(RichTextBox1.Lines(i).ToString & vbCrLf & i) + Else + primercaracter = RichTextBox1.Lines(i).Substring(0, 1).ToString + If (primercaracter = "<") Then + datos(i, 0) = "newtake" + datos(i, 1) = RichTextBox1.Lines(i).Trim.ToString + datos(i, 2) = "-NADA-" + doit = "true" + + ElseIf (primercaracter = "*") Then + + Dim textof As String + Dim textofs() As String + textof = RichTextBox1.Lines(i).ToString + textofs = textof.Split("*") + datos(i, 0) = "voz" + datos(i, 1) = textofs(1).Trim.ToString + datos(i, 2) = textofs(2).Trim.ToString + Else + If (doit = "false") Then + + datos(i, 0) = "titulo" + datos(i, 1) = RichTextBox1.Lines(i).ToString + datos(i, 2) = "-NADA-" + Else + If (datos(i - 1, 2) = "") Then + 'MsgBox("fila : " & i & vbCrLf & "previo : " & datos(i - 2, 2) & vbCrLf & "actual : " & RichTextBox1.Lines(i).ToString) + datos(i - 2, 2) = datos(i - 2, 2) & " " & RichTextBox1.Lines(i).ToString + Else + 'MsgBox("fila : " & i & vbCrLf & "previo : " & datos(i - 1, 2) & vbCrLf & "actual : " & RichTextBox1.Lines(i).ToString) + datos(i - 1, 2) = datos(i - 1, 2) & " " & RichTextBox1.Lines(i).ToString + End If + + End If + + + + + + End If + End If + Me.Text = "Falten " & datos.GetUpperBound(0) - i & " per convertir" + i = i + 1 + Next line + + Dim datos2(0 To RichTextBox1.Lines.GetLength(0), 0 To 2) As String + Dim canti As String = datos.GetUpperBound(0) + Dim p As Integer = 0 + + For j As Integer = 1 To canti - 1 Step +1 + + If datos(j - 1, 1) = "" Then + + Else + + datos2(p, 1) = datos(j - 1, 1) + datos2(p, 2) = datos(j - 1, 2) + p = p + 1 + End If + Next + Dim takes As Boolean = False + + + For n As Integer = 1 To datos2.GetUpperBound(0) Step +1 + If (n <= 1) Then + RichTextBox1.Text = datos2(n - 1, 1) & "|" + Else + Dim pric As String + + If (datos2(n - 1, 1) = "") Then + ' oTable.Rows(n - 1).Delete() + Else + + If datos2(n - 1, 1) IsNot "" Then + pric = datos2(n - 1, 1).Substring(0, 1).ToString + If (pric = "<") Then + RichTextBox1.Text = RichTextBox1.Text & datos2(n - 1, 1).ToString & "|" + takes = True + Else + If takes = True Then + RichTextBox1.Text = RichTextBox1.Text & "*" & datos2(n - 1, 1).ToString & "*" & "+" & datos2(n - 1, 2).Trim.ToString & "|" + Else + RichTextBox1.Text = RichTextBox1.Text & datos2(n - 1, 1).ToString & "|" + + End If + + End If + Else + 'oTable.Rows(n - 1).Delete() + End If + + End If + End If + + Next + + Dim saveFileDialog1 As New SaveFileDialog() + saveFileDialog1.Filter = "Document de Takes Convertit|*.txt" + saveFileDialog1.Title = "Guardar Document de Takes Convertit" + + If saveFileDialog1.ShowDialog() = DialogResult.OK Then + RichTextBox1.SaveFile(saveFileDialog1.FileName, _ + RichTextBoxStreamType.PlainText) + MsgBox("correcto") + + + doc.Close() + WordApp.Application.Quit() + End If + + + + End If + End If + End Sub + + Private Sub SaveToolStripButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveToolStripButton.Click + convertirdoc() + End Sub +End Class diff --git a/Projects/WindowsApplication1/WindowsApplication1/My Project/Application.Designer.vb b/Projects/WindowsApplication1/WindowsApplication1/My Project/Application.Designer.vb new file mode 100644 index 0000000000000000000000000000000000000000..c6d64b692b21454ea2dbd25ae47e78df7fc6e4a3 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/My Project/Application.Designer.vb @@ -0,0 +1,38 @@ +'------------------------------------------------------------------------------ +' +' Este código fue generado por una herramienta. +' Versión de runtime:4.0.30319.261 +' +' Los cambios en este archivo podrían causar un comportamiento incorrecto y se perderán si +' se vuelve a generar el código. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + 'NOTA: este archivo se genera de forma automática; no lo modifique directamente. Para realizar cambios, + ' o si detecta errores de compilación en este archivo, vaya al Diseñador de proyectos + ' (vaya a Propiedades del proyecto o haga doble clic en el nodo My Project en el + ' Explorador de soluciones) y realice cambios en la ficha Aplicación. + ' + Partial Friend Class MyApplication + + _ + Public Sub New() + MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows) + Me.IsSingleInstance = false + Me.EnableVisualStyles = true + Me.SaveMySettingsOnExit = true + Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses + End Sub + + _ + Protected Overrides Sub OnCreateMainForm() + Me.MainForm = Global.WindowsApplication1.MDIParent1 + End Sub + End Class +End Namespace diff --git a/Projects/WindowsApplication1/WindowsApplication1/My Project/Application.myapp b/Projects/WindowsApplication1/WindowsApplication1/My Project/Application.myapp new file mode 100644 index 0000000000000000000000000000000000000000..fbdf40528ab4e4b65e4a0dc943625225b724c344 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/My Project/Application.myapp @@ -0,0 +1,10 @@ + + + true + MDIParent1 + false + 0 + true + 0 + true + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/My Project/AssemblyInfo.vb b/Projects/WindowsApplication1/WindowsApplication1/My Project/AssemblyInfo.vb new file mode 100644 index 0000000000000000000000000000000000000000..2b323da6331635988cb9fc90a1a29176a722f0ce --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/My Project/AssemblyInfo.vb @@ -0,0 +1,35 @@ +Imports System +Imports System.Reflection +Imports System.Runtime.InteropServices + +' La información general sobre un ensamblado se controla mediante el siguiente +' conjunto de atributos. Cambie estos atributos para modificar la información +' asociada con un ensamblado. + +' Revisar los valores de los atributos del ensamblado + + + + + + + + + + +'El siguiente GUID sirve como identificador de typelib si este proyecto se expone a COM + + +' La información de versión de un ensamblado consta de los cuatro valores siguientes: +' +' Versión principal +' Versión secundaria +' Número de compilación +' Revisión +' +' Puede especificar todos los valores o usar los valores predeterminados de número de compilación y de revisión +' mediante el asterisco ('*'), como se muestra a continuación: +' + + + diff --git a/Projects/WindowsApplication1/WindowsApplication1/My Project/Resources.Designer.vb b/Projects/WindowsApplication1/WindowsApplication1/My Project/Resources.Designer.vb new file mode 100644 index 0000000000000000000000000000000000000000..9afe3db39902dcbb956797ff7415cf6d3986cee5 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/My Project/Resources.Designer.vb @@ -0,0 +1,62 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.261 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My.Resources + + 'This class was auto-generated by the StronglyTypedResourceBuilder + 'class via a tool like ResGen or Visual Studio. + 'To add or remove a member, edit your .ResX file then rerun ResGen + 'with the /str option, or rebuild your VS project. + ''' + ''' A strongly-typed resource class, for looking up localized strings, etc. + ''' + _ + Friend Module Resources + + Private resourceMan As Global.System.Resources.ResourceManager + + Private resourceCulture As Global.System.Globalization.CultureInfo + + ''' + ''' Returns the cached ResourceManager instance used by this class. + ''' + _ + Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager + Get + If Object.ReferenceEquals(resourceMan, Nothing) Then + Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("WindowsApplication1.Resources", GetType(Resources).Assembly) + resourceMan = temp + End If + Return resourceMan + End Get + End Property + + ''' + ''' Overrides the current thread's CurrentUICulture property for all + ''' resource lookups using this strongly typed resource class. + ''' + _ + Friend Property Culture() As Global.System.Globalization.CultureInfo + Get + Return resourceCulture + End Get + Set(ByVal value As Global.System.Globalization.CultureInfo) + resourceCulture = value + End Set + End Property + End Module +End Namespace diff --git a/Projects/WindowsApplication1/WindowsApplication1/My Project/Resources.resx b/Projects/WindowsApplication1/WindowsApplication1/My Project/Resources.resx new file mode 100644 index 0000000000000000000000000000000000000000..ffecec851ab4deae63e81647b4655c7d1fe6dfd7 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/My Project/Resources.resx @@ -0,0 +1,117 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/My Project/Settings.Designer.vb b/Projects/WindowsApplication1/WindowsApplication1/My Project/Settings.Designer.vb new file mode 100644 index 0000000000000000000000000000000000000000..852fa00f7da1d433486b265e7a617790b387547f --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/My Project/Settings.Designer.vb @@ -0,0 +1,73 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.261 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + _ + Partial Friend NotInheritable Class MySettings + Inherits Global.System.Configuration.ApplicationSettingsBase + + Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings) + +#Region "My.Settings Auto-Save Functionality" +#If _MyType = "WindowsForms" Then + Private Shared addedHandler As Boolean + + Private Shared addedHandlerLockObject As New Object + + _ + Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs) + If My.Application.SaveMySettingsOnExit Then + My.Settings.Save() + End If + End Sub +#End If +#End Region + + Public Shared ReadOnly Property [Default]() As MySettings + Get + +#If _MyType = "WindowsForms" Then + If Not addedHandler Then + SyncLock addedHandlerLockObject + If Not addedHandler Then + AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings + addedHandler = True + End If + End SyncLock + End If +#End If + Return defaultInstance + End Get + End Property + End Class +End Namespace + +Namespace My + + _ + Friend Module MySettingsProperty + + _ + Friend ReadOnly Property Settings() As Global.WindowsApplication1.My.MySettings + Get + Return Global.WindowsApplication1.My.MySettings.Default + End Get + End Property + End Module +End Namespace diff --git a/Projects/WindowsApplication1/WindowsApplication1/My Project/Settings.settings b/Projects/WindowsApplication1/WindowsApplication1/My Project/Settings.settings new file mode 100644 index 0000000000000000000000000000000000000000..377f56d6b1c07be246086b62ae66d9b8025ed6de --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/My Project/Settings.settings @@ -0,0 +1,7 @@ + + + + + + + diff --git a/Projects/WindowsApplication1/WindowsApplication1/My Project/app.manifest b/Projects/WindowsApplication1/WindowsApplication1/My Project/app.manifest new file mode 100644 index 0000000000000000000000000000000000000000..d3854b33d9e403631cc8b64402763fc12ab05d58 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/My Project/app.manifest @@ -0,0 +1,47 @@ + + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/WindowsApplication1.vbproj b/Projects/WindowsApplication1/WindowsApplication1/WindowsApplication1.vbproj new file mode 100644 index 0000000000000000000000000000000000000000..6df720cc3b5a87291b39691989bf2bec2b533a24 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/WindowsApplication1.vbproj @@ -0,0 +1,234 @@ + + + + Debug + x86 + + + 2.0 + {41FA52F9-0BEF-4509-B9FD-115442D7D81D} + WinExe + WindowsApplication1.My.MyApplication + WindowsApplication1 + WindowsApplication1 + 512 + WindowsForms + v4.0 + Client + false + publish\ + true + Disk + false + Foreground + 7 + Days + false + false + true + true + 1 + 1.0.0.%2a + false + true + true + + + x86 + true + full + true + true + bin\Debug\ + WindowsApplication1.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + + + x86 + pdbonly + false + true + true + bin\Release\ + WindowsApplication1.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + + + On + + + Binary + + + Off + + + On + + + My Project\app.manifest + + + 73A112ECACC61E8BAC9EFD7C229F76276A3B4C42 + + + WindowsApplication1_TemporaryKey.pfx + + + true + + + LocalIntranet + + + true + + + + + + + + + + + + + + + + + + + + + + + + + + + Form + + + Form1.vb + Form + + + Form2.vb + + + Form + + + MDIParent1.vb + + + Form + + + + True + Application.myapp + + + True + True + Resources.resx + + + True + Settings.settings + True + + + + + Form1.vb + + + Form2.vb + + + MDIParent1.vb + + + VbMyResourcesResXFileCodeGenerator + Resources.Designer.vb + My.Resources + Designer + + + + + + MyApplicationCodeGenerator + Application.Designer.vb + + + SettingsSingleFileGenerator + My + Settings.Designer.vb + + + + + + {2DF8D04C-5BFA-101B-BDE5-00AA0044DE52} + 2 + 5 + 0 + primary + False + True + + + {00020905-0000-0000-C000-000000000046} + 8 + 5 + 0 + primary + False + True + + + {0002E157-0000-0000-C000-000000000046} + 5 + 3 + 0 + primary + False + True + + + + + False + Microsoft .NET Framework 4 Client Profile %28x86 y x64%29 + true + + + False + .NET Framework 3.5 SP1 Client Profile + false + + + False + .NET Framework 3.5 SP1 + false + + + False + Windows Installer 3.1 + true + + + + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/WindowsApplication1.vbproj.user b/Projects/WindowsApplication1/WindowsApplication1/WindowsApplication1.vbproj.user new file mode 100644 index 0000000000000000000000000000000000000000..fe42a76ccacd2e820c78f1b09e71db7de5c072b0 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/WindowsApplication1.vbproj.user @@ -0,0 +1,13 @@ + + + + publish\ + + + + + + es-ES + false + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/WindowsApplication1_TemporaryKey.pfx b/Projects/WindowsApplication1/WindowsApplication1/WindowsApplication1_TemporaryKey.pfx new file mode 100644 index 0000000000000000000000000000000000000000..f9b397099db37254cf0e3f85c9168cc49f1b6077 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/WindowsApplication1_TemporaryKey.pfx differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.application b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.application new file mode 100644 index 0000000000000000000000000000000000000000..9362a3884ac45a665a68b32df85a150e9c8e6613 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + Tx7daQfI7BbcbknnaV6oePCjlLo= + + + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.exe b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.exe new file mode 100644 index 0000000000000000000000000000000000000000..de136bc0a2f5e34e6ba0cc861d1f014cd1e4672d Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.exe differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.exe.manifest b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.exe.manifest new file mode 100644 index 0000000000000000000000000000000000000000..f8b526e0839953ee0b9b16ef3dea41de736c4a31 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.exe.manifest @@ -0,0 +1,63 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Wahy6QAzBWn4jdJUvS+wHQ0uE50= + + + + + + + + + + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.pdb b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.pdb new file mode 100644 index 0000000000000000000000000000000000000000..dd19a9b7153ac650d8557eae222a61e3e5949492 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.pdb differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.vshost.application b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.vshost.application new file mode 100644 index 0000000000000000000000000000000000000000..9362a3884ac45a665a68b32df85a150e9c8e6613 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.vshost.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + Tx7daQfI7BbcbknnaV6oePCjlLo= + + + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.vshost.exe b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.vshost.exe new file mode 100644 index 0000000000000000000000000000000000000000..bb84a51ac4f20534146c09f2fd9c928d15a903b2 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.vshost.exe differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.vshost.exe.manifest b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.vshost.exe.manifest new file mode 100644 index 0000000000000000000000000000000000000000..f8b526e0839953ee0b9b16ef3dea41de736c4a31 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.vshost.exe.manifest @@ -0,0 +1,63 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Wahy6QAzBWn4jdJUvS+wHQ0uE50= + + + + + + + + + + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.xml b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.xml new file mode 100644 index 0000000000000000000000000000000000000000..7a1ac27b27d1b7106db508f29a27a19e42bfacb0 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/WindowsApplication1.xml @@ -0,0 +1,24 @@ + + + + +WindowsApplication1 + + + + + + Returns the cached ResourceManager instance used by this class. + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.deploy b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.deploy new file mode 100644 index 0000000000000000000000000000000000000000..dcb1b4e5a80df2c25a542c4b9bcccc0f5ece6518 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.deploy differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.manifest b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.manifest new file mode 100644 index 0000000000000000000000000000000000000000..dc9b24d62dce1d9cff9c69b4d97d071584480585 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.manifest @@ -0,0 +1,63 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + VqNfCLlZ24lvOOnGyetpVLSY29w= + + + + + + + + + + +FrQEihkJNGmy5VjNzijh2mlWJjM=erEpRg3dJMDcmS12JKvpUPIQnEkpoocW8ISTx14k+uCNM/vAkHySbXItAXzOnSf7+9xFTM5oGz41uSDsQfHkEEpblXzsSI38PGmP939UVMN1U+MjJhk5fCdOmnpje8UjAsiSSZpHQe/BEtAZxPcAjSjeedXGpyGQJCKTIf6HdUE=3f5zSwo7u4Uqr61lF8zsnfpEkEZOn+FzJfw5dGrML7ltvlwhiz8g7RgZ4Qvc53cPjL1iotJolMJQJhg2S9xM/KW/lhVw5hA6SYLAccvgbq23ng2OWtTzuMEsodnaPRqHNnx94oNayKH/G/zZjWx2YQi67moMmmZqcSe8grYMH0s=AQABCN=elribonazo\ribozxZW3eFhQfmH8VZN+qLiBgAykKA=xKHVGtd2i5gCrCNsdd2/bGPGwFNP/uqPuPt0lZebTS7Qb3ZjCJp0+s2E/nxtj/rA593BZB6fZV35mKgnb0W/MLva+x5vyA1W8LSJdY0Va7gBYzm3iSnstfnWV+uRSVzxAPmoQmWirvFmGzhtxPJEqK4GqiYer3rj5I+JoXQJ8gs=3f5zSwo7u4Uqr61lF8zsnfpEkEZOn+FzJfw5dGrML7ltvlwhiz8g7RgZ4Qvc53cPjL1iotJolMJQJhg2S9xM/KW/lhVw5hA6SYLAccvgbq23ng2OWtTzuMEsodnaPRqHNnx94oNayKH/G/zZjWx2YQi67moMmmZqcSe8grYMH0s=AQABMIIB1TCCAT6gAwIBAgIQKV53iWFkK49Js/eYj5Bb/zANBgkqhkiG9w0BAQUFADApMScwJQYDVQQDHh4AZQBsAHIAaQBiAG8AbgBhAHoAbwBcAHIAaQBiAG8wHhcNMTIwMzI5MDEwOTAzWhcNMTMwMzI5MDcwOTAzWjApMScwJQYDVQQDHh4AZQBsAHIAaQBiAG8AbgBhAHoAbwBcAHIAaQBiAG8wgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJAoGBAN3+c0sKO7uFKq+tZRfM7J36RJBGTp/hcyX8OXRqzC+5bb5cIYs/IO0YGeEL3Od3D4y9YqLSaJTCUCYYNkvcTPylv5YVcOYQOkmCwHHL4G6tt54NjlrU87jBLKHZ2j0ahzZ8feKDWsih/xv82Y1sdmEIuu5qDJpmanEnvIK2DB9LAgMBAAEwDQYJKoZIhvcNAQEFBQADgYEAs3mNeDqgXRp3hCm7KqeyW7ZlLJyeLagXxKEExhMTYUZlkJJ7HU49M2EfWR4pcQysD3nVZmNq/YxtAHX0P2k8xf5aahdJYOmHQIx+RVAJTVDU+SQPN8ZEiIaxoLTwAVHvfkSVkNLSqntfaLfL6bXKRB9wsrTLTnK9gYyMzSIkY4w= \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/WindowsApplication1.application b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/WindowsApplication1.application new file mode 100644 index 0000000000000000000000000000000000000000..c604fea57332854c52c3cc3797c3eb91784885ee --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/WindowsApplication1.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + jmeuMDVD+/hj03NKgaIGaPt1TKE= + + + +nC0bGJMTLO8rMLHIBWDk45VmQbw=YCF3bpFKyT/3gy0m/Pf2wbRIhNqaZU1yg8Z0p30Z+mDFGpY1s34et8recn2SjAahC9Y9Mtr0D1kzUBW7LgQSB692Rt0vTUK9r07NKJ3Xj0VKZVZYgl5wDYhzds7XKvgdctFcWZDzuorH79VpoeyxWc8wn/EYO+ioRbrtV4wgrVc=3f5zSwo7u4Uqr61lF8zsnfpEkEZOn+FzJfw5dGrML7ltvlwhiz8g7RgZ4Qvc53cPjL1iotJolMJQJhg2S9xM/KW/lhVw5hA6SYLAccvgbq23ng2OWtTzuMEsodnaPRqHNnx94oNayKH/G/zZjWx2YQi67moMmmZqcSe8grYMH0s=AQABCN=elribonazo\ribobDLL9DSnGn6uia0xgcySsP8/dtA=zXHUgp0CFw1od7nfZTgAe2efZui8YICIcxiospjmoy9B6HqDSAyHhPOiMwi/2pD8OQakG8mhNXSXNeaFHGIuQxFVy99Mz0P5TY4By5mhPjlNxTAQ3lhvDWiTK5xr+aH6dy8TsfZNmr/djkjpC6L6k5U53WhB3GUGn+iWkHgxAF4=3f5zSwo7u4Uqr61lF8zsnfpEkEZOn+FzJfw5dGrML7ltvlwhiz8g7RgZ4Qvc53cPjL1iotJolMJQJhg2S9xM/KW/lhVw5hA6SYLAccvgbq23ng2OWtTzuMEsodnaPRqHNnx94oNayKH/G/zZjWx2YQi67moMmmZqcSe8grYMH0s=AQABMIIB1TCCAT6gAwIBAgIQKV53iWFkK49Js/eYj5Bb/zANBgkqhkiG9w0BAQUFADApMScwJQYDVQQDHh4AZQBsAHIAaQBiAG8AbgBhAHoAbwBcAHIAaQBiAG8wHhcNMTIwMzI5MDEwOTAzWhcNMTMwMzI5MDcwOTAzWjApMScwJQYDVQQDHh4AZQBsAHIAaQBiAG8AbgBhAHoAbwBcAHIAaQBiAG8wgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJAoGBAN3+c0sKO7uFKq+tZRfM7J36RJBGTp/hcyX8OXRqzC+5bb5cIYs/IO0YGeEL3Od3D4y9YqLSaJTCUCYYNkvcTPylv5YVcOYQOkmCwHHL4G6tt54NjlrU87jBLKHZ2j0ahzZ8feKDWsih/xv82Y1sdmEIuu5qDJpmanEnvIK2DB9LAgMBAAEwDQYJKoZIhvcNAQEFBQADgYEAs3mNeDqgXRp3hCm7KqeyW7ZlLJyeLagXxKEExhMTYUZlkJJ7HU49M2EfWR4pcQysD3nVZmNq/YxtAHX0P2k8xf5aahdJYOmHQIx+RVAJTVDU+SQPN8ZEiIaxoLTwAVHvfkSVkNLSqntfaLfL6bXKRB9wsrTLTnK9gYyMzSIkY4w= \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/autorun.inf b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/autorun.inf new file mode 100644 index 0000000000000000000000000000000000000000..7e7adee0bbac046f1b413723a1afda7453e6a534 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/autorun.inf @@ -0,0 +1,3 @@ +[autorun] +open=setup.exe +icon=setup.exe,0 diff --git a/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/setup.exe b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/setup.exe new file mode 100644 index 0000000000000000000000000000000000000000..6332325b655d6de756e5ec01683e2428b4a42b32 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/bin/Debug/app.publish/setup.exe differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/DesignTimeResolveAssemblyReferences.cache b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/DesignTimeResolveAssemblyReferences.cache new file mode 100644 index 0000000000000000000000000000000000000000..6a1fe31f690276a8e0533b5040263f6c1e5b20b1 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/DesignTimeResolveAssemblyReferences.cache differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput.cache b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput.cache new file mode 100644 index 0000000000000000000000000000000000000000..e70d54eef7e2bfa3be88bb026db78a4e5fda8379 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput.cache differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/GenerateResource.read.1.tlog b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/GenerateResource.read.1.tlog new file mode 100644 index 0000000000000000000000000000000000000000..6d56191b44d5701a04e853763378f6015ace8554 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/GenerateResource.read.1.tlog differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/GenerateResource.write.1.tlog b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/GenerateResource.write.1.tlog new file mode 100644 index 0000000000000000000000000000000000000000..04d435ed304c33854ccab786541c3b68f692b954 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/GenerateResource.write.1.tlog differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/TempPE/My Project.Resources.Designer.vb.dll b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/TempPE/My Project.Resources.Designer.vb.dll new file mode 100644 index 0000000000000000000000000000000000000000..beac3e1044c61868c230cec84d5205dc6610f862 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/TempPE/My Project.Resources.Designer.vb.dll differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.Form1.resources b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.Form1.resources new file mode 100644 index 0000000000000000000000000000000000000000..6c05a9776bd7cbae976fdcec7e3a254e93018279 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.Form1.resources differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.Form2.resources b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.Form2.resources new file mode 100644 index 0000000000000000000000000000000000000000..6c05a9776bd7cbae976fdcec7e3a254e93018279 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.Form2.resources differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.MDIParent1.resources b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.MDIParent1.resources new file mode 100644 index 0000000000000000000000000000000000000000..9060a1abc4ea3e5050509693ef883422a694511c Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.MDIParent1.resources differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.Resources.resources b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.Resources.resources new file mode 100644 index 0000000000000000000000000000000000000000..6c05a9776bd7cbae976fdcec7e3a254e93018279 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.Resources.resources differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.TrustInfo.xml b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.TrustInfo.xml new file mode 100644 index 0000000000000000000000000000000000000000..ade52e194967145108067dc8590c57c9b00142ec --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.TrustInfo.xml @@ -0,0 +1,12 @@ + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.application b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.application new file mode 100644 index 0000000000000000000000000000000000000000..9362a3884ac45a665a68b32df85a150e9c8e6613 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + Tx7daQfI7BbcbknnaV6oePCjlLo= + + + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.exe b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.exe new file mode 100644 index 0000000000000000000000000000000000000000..de136bc0a2f5e34e6ba0cc861d1f014cd1e4672d Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.exe differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.exe.manifest b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.exe.manifest new file mode 100644 index 0000000000000000000000000000000000000000..f8b526e0839953ee0b9b16ef3dea41de736c4a31 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.exe.manifest @@ -0,0 +1,63 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Wahy6QAzBWn4jdJUvS+wHQ0uE50= + + + + + + + + + + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.pdb b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.pdb new file mode 100644 index 0000000000000000000000000000000000000000..dd19a9b7153ac650d8557eae222a61e3e5949492 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.pdb differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.vbproj.FileListAbsolute.txt b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.vbproj.FileListAbsolute.txt new file mode 100644 index 0000000000000000000000000000000000000000..e62875767160ead313fc2e4f7b3d3f8d93eb0039 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.vbproj.FileListAbsolute.txt @@ -0,0 +1,31 @@ +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\bin\Debug\WindowsApplication1.exe +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\bin\Debug\WindowsApplication1.pdb +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\bin\Debug\WindowsApplication1.xml +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\obj\x86\Debug\ResolveAssemblyReference.cache +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\obj\x86\Debug\WindowsApplication1.vbproj.ResolveComReference.cache +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\obj\x86\Debug\WindowsApplication1.Form1.resources +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\obj\x86\Debug\WindowsApplication1.Resources.resources +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\obj\x86\Debug\GenerateResource.read.1.tlog +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\obj\x86\Debug\GenerateResource.write.1.tlog +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\obj\x86\Debug\WindowsApplication1.exe +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\obj\x86\Debug\WindowsApplication1.xml +C:\Users\ribo\AppData\Local\Temporary Projects\WindowsApplication1\obj\x86\Debug\WindowsApplication1.pdb +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.vbproj.ResolveComReference.cache +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.exe +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.xml +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.pdb +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\ResolveAssemblyReference.cache +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.Form1.resources +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.Resources.resources +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\GenerateResource.read.1.tlog +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\GenerateResource.write.1.tlog +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\bin\Debug\WindowsApplication1.exe +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\bin\Debug\WindowsApplication1.pdb +C:\Users\ribo\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\bin\Debug\WindowsApplication1.xml +C:\Users\ribo\Documents\Visual Studio 2010\Projects\WindowsApplication1\WindowsApplication1\bin\Debug\WindowsApplication1.exe.manifest +C:\Users\ribo\Documents\Visual Studio 2010\Projects\WindowsApplication1\WindowsApplication1\bin\Debug\WindowsApplication1.application +C:\Users\ribo\Documents\Visual Studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.TrustInfo.xml +C:\Users\ribo\Documents\Visual Studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.exe.manifest +C:\Users\ribo\Documents\Visual Studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.application +C:\Users\ribo\Documents\Visual Studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.MDIParent1.resources +C:\Users\ribo\Documents\Visual Studio 2010\Projects\WindowsApplication1\WindowsApplication1\obj\x86\Debug\WindowsApplication1.Form2.resources diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.vbproj.ResolveComReference.cache b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.vbproj.ResolveComReference.cache new file mode 100644 index 0000000000000000000000000000000000000000..2dc37b6792e09192411f516b2848c124151b48fa Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.vbproj.ResolveComReference.cache differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.xml b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.xml new file mode 100644 index 0000000000000000000000000000000000000000..7a1ac27b27d1b7106db508f29a27a19e42bfacb0 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/obj/x86/Debug/WindowsApplication1.xml @@ -0,0 +1,24 @@ + + + + +WindowsApplication1 + + + + + + Returns the cached ResourceManager instance used by this class. + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.application b/Projects/WindowsApplication1/WindowsApplication1/publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.application new file mode 100644 index 0000000000000000000000000000000000000000..c604fea57332854c52c3cc3797c3eb91784885ee --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + jmeuMDVD+/hj03NKgaIGaPt1TKE= + + + +nC0bGJMTLO8rMLHIBWDk45VmQbw=YCF3bpFKyT/3gy0m/Pf2wbRIhNqaZU1yg8Z0p30Z+mDFGpY1s34et8recn2SjAahC9Y9Mtr0D1kzUBW7LgQSB692Rt0vTUK9r07NKJ3Xj0VKZVZYgl5wDYhzds7XKvgdctFcWZDzuorH79VpoeyxWc8wn/EYO+ioRbrtV4wgrVc=3f5zSwo7u4Uqr61lF8zsnfpEkEZOn+FzJfw5dGrML7ltvlwhiz8g7RgZ4Qvc53cPjL1iotJolMJQJhg2S9xM/KW/lhVw5hA6SYLAccvgbq23ng2OWtTzuMEsodnaPRqHNnx94oNayKH/G/zZjWx2YQi67moMmmZqcSe8grYMH0s=AQABCN=elribonazo\ribobDLL9DSnGn6uia0xgcySsP8/dtA=zXHUgp0CFw1od7nfZTgAe2efZui8YICIcxiospjmoy9B6HqDSAyHhPOiMwi/2pD8OQakG8mhNXSXNeaFHGIuQxFVy99Mz0P5TY4By5mhPjlNxTAQ3lhvDWiTK5xr+aH6dy8TsfZNmr/djkjpC6L6k5U53WhB3GUGn+iWkHgxAF4=3f5zSwo7u4Uqr61lF8zsnfpEkEZOn+FzJfw5dGrML7ltvlwhiz8g7RgZ4Qvc53cPjL1iotJolMJQJhg2S9xM/KW/lhVw5hA6SYLAccvgbq23ng2OWtTzuMEsodnaPRqHNnx94oNayKH/G/zZjWx2YQi67moMmmZqcSe8grYMH0s=AQABMIIB1TCCAT6gAwIBAgIQKV53iWFkK49Js/eYj5Bb/zANBgkqhkiG9w0BAQUFADApMScwJQYDVQQDHh4AZQBsAHIAaQBiAG8AbgBhAHoAbwBcAHIAaQBiAG8wHhcNMTIwMzI5MDEwOTAzWhcNMTMwMzI5MDcwOTAzWjApMScwJQYDVQQDHh4AZQBsAHIAaQBiAG8AbgBhAHoAbwBcAHIAaQBiAG8wgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJAoGBAN3+c0sKO7uFKq+tZRfM7J36RJBGTp/hcyX8OXRqzC+5bb5cIYs/IO0YGeEL3Od3D4y9YqLSaJTCUCYYNkvcTPylv5YVcOYQOkmCwHHL4G6tt54NjlrU87jBLKHZ2j0ahzZ8feKDWsih/xv82Y1sdmEIuu5qDJpmanEnvIK2DB9LAgMBAAEwDQYJKoZIhvcNAQEFBQADgYEAs3mNeDqgXRp3hCm7KqeyW7ZlLJyeLagXxKEExhMTYUZlkJJ7HU49M2EfWR4pcQysD3nVZmNq/YxtAHX0P2k8xf5aahdJYOmHQIx+RVAJTVDU+SQPN8ZEiIaxoLTwAVHvfkSVkNLSqntfaLfL6bXKRB9wsrTLTnK9gYyMzSIkY4w= \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.deploy b/Projects/WindowsApplication1/WindowsApplication1/publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.deploy new file mode 100644 index 0000000000000000000000000000000000000000..dcb1b4e5a80df2c25a542c4b9bcccc0f5ece6518 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.deploy differ diff --git a/Projects/WindowsApplication1/WindowsApplication1/publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.manifest b/Projects/WindowsApplication1/WindowsApplication1/publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.manifest new file mode 100644 index 0000000000000000000000000000000000000000..dc9b24d62dce1d9cff9c69b4d97d071584480585 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/publish/Application Files/WindowsApplication1_1_0_0_0/WindowsApplication1.exe.manifest @@ -0,0 +1,63 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + VqNfCLlZ24lvOOnGyetpVLSY29w= + + + + + + + + + + +FrQEihkJNGmy5VjNzijh2mlWJjM=erEpRg3dJMDcmS12JKvpUPIQnEkpoocW8ISTx14k+uCNM/vAkHySbXItAXzOnSf7+9xFTM5oGz41uSDsQfHkEEpblXzsSI38PGmP939UVMN1U+MjJhk5fCdOmnpje8UjAsiSSZpHQe/BEtAZxPcAjSjeedXGpyGQJCKTIf6HdUE=3f5zSwo7u4Uqr61lF8zsnfpEkEZOn+FzJfw5dGrML7ltvlwhiz8g7RgZ4Qvc53cPjL1iotJolMJQJhg2S9xM/KW/lhVw5hA6SYLAccvgbq23ng2OWtTzuMEsodnaPRqHNnx94oNayKH/G/zZjWx2YQi67moMmmZqcSe8grYMH0s=AQABCN=elribonazo\ribozxZW3eFhQfmH8VZN+qLiBgAykKA=xKHVGtd2i5gCrCNsdd2/bGPGwFNP/uqPuPt0lZebTS7Qb3ZjCJp0+s2E/nxtj/rA593BZB6fZV35mKgnb0W/MLva+x5vyA1W8LSJdY0Va7gBYzm3iSnstfnWV+uRSVzxAPmoQmWirvFmGzhtxPJEqK4GqiYer3rj5I+JoXQJ8gs=3f5zSwo7u4Uqr61lF8zsnfpEkEZOn+FzJfw5dGrML7ltvlwhiz8g7RgZ4Qvc53cPjL1iotJolMJQJhg2S9xM/KW/lhVw5hA6SYLAccvgbq23ng2OWtTzuMEsodnaPRqHNnx94oNayKH/G/zZjWx2YQi67moMmmZqcSe8grYMH0s=AQABMIIB1TCCAT6gAwIBAgIQKV53iWFkK49Js/eYj5Bb/zANBgkqhkiG9w0BAQUFADApMScwJQYDVQQDHh4AZQBsAHIAaQBiAG8AbgBhAHoAbwBcAHIAaQBiAG8wHhcNMTIwMzI5MDEwOTAzWhcNMTMwMzI5MDcwOTAzWjApMScwJQYDVQQDHh4AZQBsAHIAaQBiAG8AbgBhAHoAbwBcAHIAaQBiAG8wgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJAoGBAN3+c0sKO7uFKq+tZRfM7J36RJBGTp/hcyX8OXRqzC+5bb5cIYs/IO0YGeEL3Od3D4y9YqLSaJTCUCYYNkvcTPylv5YVcOYQOkmCwHHL4G6tt54NjlrU87jBLKHZ2j0ahzZ8feKDWsih/xv82Y1sdmEIuu5qDJpmanEnvIK2DB9LAgMBAAEwDQYJKoZIhvcNAQEFBQADgYEAs3mNeDqgXRp3hCm7KqeyW7ZlLJyeLagXxKEExhMTYUZlkJJ7HU49M2EfWR4pcQysD3nVZmNq/YxtAHX0P2k8xf5aahdJYOmHQIx+RVAJTVDU+SQPN8ZEiIaxoLTwAVHvfkSVkNLSqntfaLfL6bXKRB9wsrTLTnK9gYyMzSIkY4w= \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/publish/WindowsApplication1.application b/Projects/WindowsApplication1/WindowsApplication1/publish/WindowsApplication1.application new file mode 100644 index 0000000000000000000000000000000000000000..c604fea57332854c52c3cc3797c3eb91784885ee --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/publish/WindowsApplication1.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + jmeuMDVD+/hj03NKgaIGaPt1TKE= + + + +nC0bGJMTLO8rMLHIBWDk45VmQbw=YCF3bpFKyT/3gy0m/Pf2wbRIhNqaZU1yg8Z0p30Z+mDFGpY1s34et8recn2SjAahC9Y9Mtr0D1kzUBW7LgQSB692Rt0vTUK9r07NKJ3Xj0VKZVZYgl5wDYhzds7XKvgdctFcWZDzuorH79VpoeyxWc8wn/EYO+ioRbrtV4wgrVc=3f5zSwo7u4Uqr61lF8zsnfpEkEZOn+FzJfw5dGrML7ltvlwhiz8g7RgZ4Qvc53cPjL1iotJolMJQJhg2S9xM/KW/lhVw5hA6SYLAccvgbq23ng2OWtTzuMEsodnaPRqHNnx94oNayKH/G/zZjWx2YQi67moMmmZqcSe8grYMH0s=AQABCN=elribonazo\ribobDLL9DSnGn6uia0xgcySsP8/dtA=zXHUgp0CFw1od7nfZTgAe2efZui8YICIcxiospjmoy9B6HqDSAyHhPOiMwi/2pD8OQakG8mhNXSXNeaFHGIuQxFVy99Mz0P5TY4By5mhPjlNxTAQ3lhvDWiTK5xr+aH6dy8TsfZNmr/djkjpC6L6k5U53WhB3GUGn+iWkHgxAF4=3f5zSwo7u4Uqr61lF8zsnfpEkEZOn+FzJfw5dGrML7ltvlwhiz8g7RgZ4Qvc53cPjL1iotJolMJQJhg2S9xM/KW/lhVw5hA6SYLAccvgbq23ng2OWtTzuMEsodnaPRqHNnx94oNayKH/G/zZjWx2YQi67moMmmZqcSe8grYMH0s=AQABMIIB1TCCAT6gAwIBAgIQKV53iWFkK49Js/eYj5Bb/zANBgkqhkiG9w0BAQUFADApMScwJQYDVQQDHh4AZQBsAHIAaQBiAG8AbgBhAHoAbwBcAHIAaQBiAG8wHhcNMTIwMzI5MDEwOTAzWhcNMTMwMzI5MDcwOTAzWjApMScwJQYDVQQDHh4AZQBsAHIAaQBiAG8AbgBhAHoAbwBcAHIAaQBiAG8wgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJAoGBAN3+c0sKO7uFKq+tZRfM7J36RJBGTp/hcyX8OXRqzC+5bb5cIYs/IO0YGeEL3Od3D4y9YqLSaJTCUCYYNkvcTPylv5YVcOYQOkmCwHHL4G6tt54NjlrU87jBLKHZ2j0ahzZ8feKDWsih/xv82Y1sdmEIuu5qDJpmanEnvIK2DB9LAgMBAAEwDQYJKoZIhvcNAQEFBQADgYEAs3mNeDqgXRp3hCm7KqeyW7ZlLJyeLagXxKEExhMTYUZlkJJ7HU49M2EfWR4pcQysD3nVZmNq/YxtAHX0P2k8xf5aahdJYOmHQIx+RVAJTVDU+SQPN8ZEiIaxoLTwAVHvfkSVkNLSqntfaLfL6bXKRB9wsrTLTnK9gYyMzSIkY4w= \ No newline at end of file diff --git a/Projects/WindowsApplication1/WindowsApplication1/publish/autorun.inf b/Projects/WindowsApplication1/WindowsApplication1/publish/autorun.inf new file mode 100644 index 0000000000000000000000000000000000000000..7e7adee0bbac046f1b413723a1afda7453e6a534 --- /dev/null +++ b/Projects/WindowsApplication1/WindowsApplication1/publish/autorun.inf @@ -0,0 +1,3 @@ +[autorun] +open=setup.exe +icon=setup.exe,0 diff --git a/Projects/WindowsApplication1/WindowsApplication1/publish/setup.exe b/Projects/WindowsApplication1/WindowsApplication1/publish/setup.exe new file mode 100644 index 0000000000000000000000000000000000000000..6332325b655d6de756e5ec01683e2428b4a42b32 Binary files /dev/null and b/Projects/WindowsApplication1/WindowsApplication1/publish/setup.exe differ diff --git a/Settings/VB Express/CurrentSettings-2012-03-25.vssettings b/Settings/VB Express/CurrentSettings-2012-03-25.vssettings new file mode 100644 index 0000000000000000000000000000000000000000..0f388e067d71a7d3388ea13ba5977b8841b466da --- /dev/null +++ b/Settings/VB Express/CurrentSettings-2012-03-25.vssettings @@ -0,0 +1,1925 @@ + + + + + + + Default + 65535 + + + + 50 + 50 + 5 + 60 + 0 + + + + 000000000000010001000100000001 + 11011100 + 000000000000000000000000010000000100000000000000000000000000 + 1111101 + True + + + 0000000000000100010001000000011 + 11011100 + 0000000000000000000000000100000001000000000000000000000000000000000000 + 1111101 + True + + + + + 0 + 10000 + 0 + 1 + 0 + 1 + 1 + + 1 + 1 + 1 + 2000 + 2000 + 0 + 7799040 + 1 + 1 + 0 + 0 + 1 + 1 + 0 + 3000 + 0 + 0 + 1 + Function: $FUNCTION, Thread: $TID $TNAME + 1 + 0 + 1 + 0 + 67577 + 0 + 2 + 0 + 1 + 1 + 0 + 1 + 1 + 1 + 0 + 0 + 1 + 0 + 1 + 1 + 1 + 0 + 1 + http://referencesource.microsoft.com/symbols + 0 + 1 + 0 + 0 + 5000 + 1 + 0 + 0 + 10000 + 10000 + 1 + 0 + 500 + 1 + 0 + 0 + 0 + 5000 + 0 + 0 + 1 + 1 + 0 + 0 + 0 + 1 + 0 + 1 + 0 + 1 + 0 + + 0 + + http://msdl.microsoft.com/download/symbols + 20000 + 10000 + 1 + 10000 + + 15000 + 0 + 0 + 0 + 0 + 0 + 1 + 0 + 1 + 0 + 0 + 1 + 0 + 0 + 1 + + 0 + 0 + 1 + 0 + + + + + + + + 1 + 0 + 1 + 2048 + 0 + 509 + 1000 + 125 + 250 + 1 + 1 + 1 + 0 + 0 + 1 + 1000000 + 1 + 1 + 0 + 1 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + true + true + false + + + true + true + false + false + true + true + true + true + false + false + false + true + false + true + true + false + false + true + false + true + false + false + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + View.BookmarkWindow + View.ClassView + + View.CodeDefinitionWindow + View.Output + View.TaskList + + + + + + + + + + + + + + + + + + + + + + + + + + + Find Results + + + + + + + + + + + + + + + + + + + + + + + + + + View.Open + View.OpenWith + View.ClassView + View.BookmarkWindow + View.CodeDefinitionWindow + View.Output + View.TaskList + + + + + View.Refresh + View.Stop + + Window.NewWindow + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + View.OpenWith + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Edit.FindSymbol + Edit.Goto + + + Edit.FormatDocument + Edit.CommentSelection + Edit.UncommentSelection + Edit.InsertSnippet + Edit.FormatDocument + View.DatabaseExplorer + View.SolutionExplorer + View.ErrorList + View.PropertiesWindow + View.Toolbox + View.DatabaseExplorer + View.ErrorList + View.PropertiesWindow + View.SolutionExplorer + View.Toolbox + View.WebBrowser + View.WebBrowser + + View.ObjectBrowser + View.TabOrder + View.DocumentOutline + View.Output + View.TaskList + View.PropertyPages + Project.AddUserControl + Project.AddModule + ExcludeFromProject,ShowAllFiles + ReloadProject,UnloadProject + Project.ProjectBuildOrder + Project.RunCustomTool + Project.AddWebReference + Project.RefreshProjectToolboxItems + Build + Build.BuildSelection + Build.BuildSelection + Build.PublishSelection + Build.PublishSelection + Debug.Output + Debug.Output + Debug.Immediate + Debug.Watch + Debug.CallStack + Debug.CallStack + Debug.CallStack + Debug.Windows + Debug.Windows + Debug.Windows + Debug.BreakAll + Debug.Exceptions + Debug.QuickWatch + Debug.BreakPoints + Debug.ToggleBreakpoint + XML + Data.AddQuery + ConnectToDatabase,ConnectToServer + Snippets + Toolbox + ExternalTools + Upgrade + Help.ReportaBug + + View.NavigateForward + Debug.BreakAll + View.ObjectBrowser + Project.AddUserControl + Project.AddModule + Edit.CommentSelection + + Edit.UncommentSelection + Find Results + Debug.ToggleBreakpoint + + Help.ReportaBug + Bookmark + + + + 0 + 0 + -1 + + + 0 + 0 + + + {00000000-0000-0000-0000-000000000000} + 0 + 1 + + + + + + False + True + True + + + + + + false + true + false + {B1BA9461-FC54-45B3-A484-CB6DD0B95C94} + 0 + 2 + + + + + + 2 + + + + + + CTRL+SHIFT+B + CTRL+Q + ALT+F5 + ALT+F10 + CTRL+ALT+V, A + CTRL+BREAK + + CTRL+L + CTRL+ALT+C + + CTRL+ALT+E + CTRL+G + CTRL+ALT+I + CTRL+ALT+V, L + + SHIFT+F9 + CTRL+ALT+Q + + CTRL+F8 + CTRL+F10 + CTRL+F9 + CTRL+SHIFT+F10 + ALT+NUM * + F5 + CTRL+F5 + F8 + F11 + CTRL+SHIFT+F8 + SHIFT+F11 + SHIFT+F8 + F10 + CTRL+ALT+BREAK + F9 + + CTRL+ALT+W, 1 + + SHIFT+ENTER + ENTER + LEFT ARROW + SHIFT+LEFT ARROW + SHIFT+ALT+LEFT ARROW + RIGHT ARROW + SHIFT+RIGHT ARROW + SHIFT+ALT+RIGHT ARROW + CTRL+T + ALT+RIGHT ARROW + CTRL+SPACE + CTRL+C + CTRL+INS + CTRL+X + SHIFT+DEL + CTRL+SHIFT+V + CTRL+SHIFT+INS + ALT+, + DEL + SHIFT+BKSPCE + BKSPCE + CTRL+K, CTRL+\ + CTRL+END + CTRL+SHIFT+END + CTRL+HOME + CTRL+SHIFT+HOME + CTRL+F + SHIFT+F12 + ALT+F2 + CTRL+SHIFT+F + F3 + CTRL+F3 + SHIFT+F3 + CTRL+SHIFT+F3 + ALT+F12 + CTRL+K, CTRL+D + CTRL+K, CTRL+F + CTRL+] + CTRL+SHIFT+] + CTRL+F12 + F2 + SHIFT+F2 + CTRL+D + F8 + SHIFT+F8 + SHIFT+F12 + ALT+. + ALT+I + TAB + CTRL+L + CTRL+Y + CTRL+SHIFT+L + DOWN ARROW + SHIFT+DOWN ARROW + SHIFT+ALT+DOWN ARROW + END + SHIFT+END + SHIFT+ALT+END + CTRL+ENTER + CTRL+SHIFT+ENTER + HOME + SHIFT+HOME + SHIFT+ALT+HOME + SHIFT+ALT+T + UP ARROW + SHIFT+UP ARROW + SHIFT+ALT+UP ARROW + CTRL+U + CTRL+SHIFT+U + CTRL+DOWN ARROW + DOWN ARROW + CTRL+LEFT ARROW + LEFT ARROW + CTRL+RIGHT ARROW + RIGHT ARROW + CTRL+UP ARROW + UP ARROW + CTRL+SHIFT+G + INS + PGDN + SHIFT+PGDN + PGUP + SHIFT+PGUP + CTRL+V + SHIFT+INS + CTRL+I + CTRL+J + CTRL+K, N + CTRL+SHIFT+I + CTRL+SHIFT+SPACE + CTRL+K, P + CTRL+PGDN + CTRL+DOWN ARROW + CTRL+PGUP + CTRL+UP ARROW + CTRL+K, T + CTRL+E, CTRL+W + CTRL+SHIFT+ALT+P + + CTRL+K, CTRL+L + CTRL+K, CTRL+H + SHIFT+ALT+F12 + CTRL+Y + SHIFT+ALT+BKSPCE + CTRL+SHIFT+Z + CTRL+H + CTRL+SHIFT+H + ALT+SHIFT+I + CTRL+A + CTRL+SHIFT+W + ESC + TAB + SHIFT+TAB + CTRL+= + ENTER + CTRL+SHIFT+DOWN ARROW + SHIFT+DOWN ARROW + CTRL+SHIFT+LEFT ARROW + SHIFT+LEFT ARROW + CTRL+SHIFT+RIGHT ARROW + SHIFT+RIGHT ARROW + CTRL+SHIFT+UP ARROW + SHIFT+UP ARROW + CTRL+M, CTRL+U + CTRL+M, CTRL+P + ALT+F3, S + SHIFT+TAB + CTRL+M, CTRL+L + CTRL+M, CTRL+M + CTRL+M, CTRL+O + CTRL+M, CTRL+H + CTRL+K, CTRL+C + CTRL+K, CTRL+U + CTRL+Z + ALT+BKSPCE + CTRL+SHIFT+PGDN + CTRL+SHIFT+PGUP + CTRL+DEL + CTRL+BKSPCE + CTRL+RIGHT ARROW + CTRL+SHIFT+RIGHT ARROW + CTRL+SHIFT+ALT+RIGHT ARROW + CTRL+LEFT ARROW + CTRL+SHIFT+LEFT ARROW + CTRL+SHIFT+ALT+LEFT ARROW + CTRL+SHIFT+T + CTRL+N + CTRL+N + CTRL+SHIFT+N + CTRL+O + CTRL+SHIFT+O + CTRL+P + CTRL+SHIFT+S + CTRL+S + F1 + CTRL+D + SHIFT+ALT+A + CTRL+SHIFT+A + CTRL+ALT+Ins + CTRL+K, CTRL+B + CTRL+/ + + + CTRL+SHIFT+1 + CTRL+SHIFT+2 + CTRL+SHIFT+8 + CTRL+SHIFT+D + CTRL+W, CTRL+E + CTRL+W, CTRL+E + CTRL+ALT+F12 + SHIFT+ALT+ENTER + + CTRL+SHIFT+F2 + CTRL+SHIFT+- + CTRL+SHIFT+F12 + ALT+- + SHIFT+ALT+- + CTRL+SHIFT+8 + F4 + SHIFT+F4 + CTRL+ALT+S + CTRL+ALT+R + CTRL+ALT+L + CTRL+R + CTRL+R + CTRL+ALT+K + CTRL+ALT+X + F2 + CTRL+ALT+J + + F7 + SHIFT+F7 + ALT+LEFT ARROW + ALT+RIGHT ARROW + ESC + CTRL+F4 + SHIFT+ESC + CTRL+F2 + CTRL+F6 + CTRL+TAB + ALT+F6 + F6 + CTRL+PGDN + ALT+F7 + CTRL+SHIFT+F6 + CTRL+SHIFT+TAB + SHIFT+ALT+F6 + SHIFT+F6 + CTRL+PGUP + + SHIFT+ALT+F7 + ALT+I + CTRL+ALT+DOWN ARROW + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + 1 + -1 + VB + + + VB + true + true + false + false + false + false + false + true + {A5A527EA-CF0A-4ABF-B501-EAFE6B3BA5C6} + 0 + false + false + false + true + false + false + false + false + false + false + true + false + false + true + + + 0 + + + 1 + 1 + + + {946E8047-0CF2-11d1-8C8D-0000F87570EE},{57F6B7D2-1436-11d1-883C-0000F87579D2},{BAFF6A1A-0CF2-11d1-8C8D-0000F87570EE},{6B115DD7-9CBC-461A-9562-5227BBD2D115},{B8280AF8-5ED0-4B48-AB18-87DD69E059C9},{F1E1021E-A781-4862-9F4B-88746A288A67},{7583bb73-a453-40e8-8951-b6986ddb1d9b},{CD914678-D0EC-11d2-A87B-00C04F79EFB7},{0FD397F9-E4A5-4392-AFF2-36DC3FB133D2},{E7CA29CE-6D17-4071-A258-E760ACFFEA79},{de03177c-918d-40af-8c17-c9d63670c175},{D245F35B-3F45-4516-B1E6-04608DA126CC},{D245F35A-3F45-4516-B1E6-04608DA126CC} + 0 + false + -1 + + + + + + {00000000-0000-0000-0000-000000000000} + 1 + + + + 0 + 0 + 0 + false + 0 + 1 + + + MatchCase=0 WholeWord=0 Hidden=0 Up=0 Selection=0 Block=0 KeepCase=0 SubFolders=0 KeepOpen=0 NameOnly=0 MarkAll=0 Plain Document Find + MatchCase=0 WholeWord=0 Hidden=0 Up=0 Selection=0 Block=0 KeepCase=0 SubFolders=1 KeepOpen=0 NameOnly=0 MarkAll=0 Plain Files Find + 1 + 0 + 1 + 0 + 0 + MatchCase=0 WholeWord=0 Hidden=0 Up=0 Selection=0 Block=0 KeepCase=0 SubFolders=1 KeepOpen=0 NameOnly=0 MarkAll=0 Plain Document Find + 0 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + Regex + + 7Design|Debug|NoToolWin + + + + + + + VBExp + + + False + VBExpressHowDoI80 + http://go.microsoft.com/fwlink/?linkid=36141&clcid=%VSSPV_LCID_HEX% + True + 9 + VB + <Provider Type="SearchProviderTypeLocalHelp" Enabled="True" /><Provider Type="SearchProviderTypeMsdnOnline" Enabled="True" /><Provider Type="SearchProviderTypeCodeWise" Enabled="True" /> + 0 + True + true + true + true + true + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + 3.0 + 0 + 3.0 + 0 + 2.0 + 1 + 0 + 1 + 1 + 0 + + csv + + 1 + 64 + 5 + 1 + 0 + 64 + + + True + True + 1048576 + 0 + True + + + false + False + true + -1 + + false + + + True + True + True + 25 + + False + + + VB + + + application/soap+msbin1 + True + True + True + about:blank + + + True + True + True + True + True + False + True + True + 8, 8 + False + SnapLines + True + True + Microsoft.VisualStudio.Windows.Forms.ToolsOptionsPage + False + True + True + True + True + True + + + Preserve + True + True + True + True + True + True + True + True + True + Preserve + True + False + DoubleQuote + 120 + False + + + None + True + True + True + True + True + True + True + True + True + %VsInstallDir%\xml\Schemas + + + #3201 + {34B7B406-3CE1-4f68-BDC2-D78282D230C6} + + + #3200 + {34B7B406-3CE1-4f68-BDC2-D78282D230C6} + + + + + false + false + true + true + true + 0 + true + true + true + true + false + false + false + false + false + + + false + true + true + true + + + 5 + true + false + true + 10 + true + 10 + + + %vsspv_settings_directory%\CurrentSettings.vssettings + + false + + + 0 + 1 + 1 + 1 + 0 + 4 + 1 + false + %vsspv_visualstudio_dir%\Templates\ItemTemplates + %vsspv_visualstudio_dir%\Templates\ProjectTemplates + %vsspv_visualstudio_dir%\Projects + false + 0 + 0 + 0 + true + true + + + 5 + http://go.microsoft.com/fwlink/?linkid=85888&clcid=%VSSPV_LCID_HEX% + -1 + 60 + + + + TODO:2 + UNDONE:2 + HACK:2 + UnresolvedMergeConflict:3 + + true + true + false + + + http://go.microsoft.com/fwlink/?LinkId=36582&clcid=%VSSPV_LCID_HEX% + http://go.microsoft.com/fwlink/?LinkId=32722&clcid=%VSSPV_LCID_HEX% + %SYSTEMROOT%\system32\notepad.exe + 1 + + + + + 0 + 1 + 1 + 0 + + + true + false + 0 + .suo;.sln;.ncb;.sdf;.vcxproj;.csproj;.user;.vbproj;.scc;.vsscc;.vspscc;.old;.filters + .cpp;.cxx;.cc;.c;.inl;.h;.hpp;.hxx;.hm;.inc;.rc;.resx;.idl;.rc2;.def;.odl;.asm;.asmx;.xsd;.bin;.rgs;.html;.htm;.manifest + 0 + false + + + + + + + true + true + true + true + -1 + 4 + 2 + false + false + false + 4 + false + false + true + + + -1 + -1 + -1 + -1 + true + -1 + -1 + + + true + true + true + true + true + 4 + 2 + true + false + true + 4 + false + false + true + + + false + false + true + false + true + false + false + false + false + false + false + false + false + false + false + false + true + false + false + false + true + true + false + + true + true + 65 + false + 0 + 5 + 2 + false + false + 60 + false + + + true + true + true + true + true + 4 + 2 + false + false + false + 4 + false + false + true + + + 1 + 1 + 1 + 1 + 1 + 2 + + + true + true + true + true + true + 4 + 2 + false + false + true + 4 + false + false + true + + + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 2 + 80 + 1 + 1 + 1 + 1 + 1 + 1 + {}[]().,:;+-*/%&|^!~=<>?@#'"\ + 1500 + 1 + 1 + 0 + 1 + 1 + 0 + 0 + 0 + 1 + 0 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 0 + 1 + 0 + 1 + 1 + 0 + 1 + 0 + 1 + 1 + 1 + 0 + 0 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 0 + 2 + 1 + 0 + 1 + 1 + 1 + 0 + 0 + 1 + 0 + 1 + 0 + 1 + 1 + 1 + 1 + 1 + 1 + 0 + 1 + 0 + 1 + 0 + 0 + 1 + 1 + 1 + 0 + 0 + 1 + 0 + 0 + 0 + 0 + 0 + 1 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 1 + 1 + 50 + 50 + 1 + 1 + 5 + 1 + 0 + 1 + 1 + 0 + 0 + 1 + 1 + + + + true + true + true + 0 + false + true + true + true + false + false + true + + + true + true + true + true + true + 4 + 1 + false + false + true + 4 + false + false + true + + + 0 + 1 + -1 + 0 + -1 + 1 + 2 + 0 + 100 + 0 + 2 + 2 + 0 + 2 + 2 + 0 + 2 + 2 + 1 + 2 + 0 + 2 + 0 + 1 + 0 + 7257087 + 8388616 + 0 + 1 + 255 + 0 + 0 + 0 + 0 + 90 + 80 + 2 + 1200 + 1800 + 750 + 500 + -1 + -1 + -1 + 0 + 50 + 2000 + 15000 + 5 + jpg + 15724527 + 16777215 + 0 + 0 + 16750848 + 14145511 + 12895452 + 16487691 + 16768975 + 16765887 + 13172735 + 0 + 0 + 3575607 + 13003057 + 13027014 + -1 + 243 + 1 + 2 + 16739258 + 16760311 + 8650752 + -1 + 128 + -1 + 4294967295 + 11119017 + 2 + 20 + 0 + 0 + 5 + 0 + 0 + 3 + 3 + 1 + -1 + 0 + 1 + gif + 1 + 14413810 + 0 + 15577469 + 16244681 + 0 + XHTML 1.0 Transitional + 12383999 + 0 + 0 + 7257087 + 16750848 + -1 + 80 + + + true + true + true + true + true + 4 + 1 + false + false + false + 4 + false + false + true + + + -1 + -1 + -1 + -1 + -1 + -1 + -1 + -1 + -1 + 0 + 0 + -1 + 1 + 2 + + + true + true + true + true + true + 4 + 1 + true + false + false + 4 + false + false + true + + + true + true + true + true + true + 4 + 1 + true + false + false + 4 + false + false + true + + + true + true + true + true + true + 4 + 1 + true + false + false + 4 + false + false + true + + + true + true + true + true + true + 4 + 1 + true + false + false + 4 + false + false + true + + + true + true + true + false + true + 4 + 2 + false + false + false + 4 + false + false + true + + + 0 + true + true + true + true + true + true + true + true + true + 2 + true + false + 0 + MS.Internal.XamlLanguageService.XAMLSpecificPreferences + 120 + false + + + true + true + true + true + true + 2 + 2 + false + false + false + 2 + false + false + true + + + + diff --git a/Settings/VB Express/CurrentSettings.vssettings b/Settings/VB Express/CurrentSettings.vssettings new file mode 100644 index 0000000000000000000000000000000000000000..7b2507f376f4a6f1ca3de88dc04d1c00c7c53cdf --- /dev/null +++ b/Settings/VB Express/CurrentSettings.vssettings @@ -0,0 +1,805 @@ +falsefalsetruefalsetruefalsetruetruefalse00truetruetruefalse56553510truetruetruefalsetrue10false%vsspv_settings_directory%\CurrentSettings.vssettings%vsspv_visualstudio_dir%\Projectsfalsetruefalse41false%vsspv_visualstudio_dir%\Templates\ItemTemplatesfalsefalse101%vsspv_visualstudio_dir%\Templates\ProjectTemplatestrue8false5falsehttp://go.microsoft.com/fwlink/?linkid=85888&clcid=%VSSPV_LCID_HEX%60trueTODO:2HACK:2UNDONE:2UnresolvedMergeConflict:3falsetruehttp://go.microsoft.com/fwlink/?LinkId=36582&clcid=%vsspv_lcid_hex%1%SYSTEMROOT%\system32\notepad.exehttp://go.microsoft.com/fwlink/?LinkId=32722&clcid=%vsspv_lcid_hex%0101 + true + false + 0 + .suo;.sln;.ncb;.sdf;.vcxproj;.csproj;.user;.vbproj;.scc;.vsscc;.vspscc;.old;.filters + .cpp;.cxx;.cc;.c;.inl;.h;.hpp;.hxx;.hm;.inc;.rc;.resx;.idl;.rc2;.def;.odl;.asm;.asmx;.xsd;.bin;.rgs;.html;.htm;.manifest + 0 + false + + 4true2truefalsefalsefalsetruetruefalsefalse4truetruetruetruetruetruetruetruetrue + true + true + true + true + true + 4 + 2 + true + false + true + 4 + false + false + true + + false + false + true + false + true + false + false + false + false + false + false + false + false + false + false + false + true + false + false + false + true + true + false + + true + true + 65 + false + 0 + 5 + 2 + false + false + 60 + false + + true + true + true + true + true + 4 + 2 + false + false + false + 4 + false + false + true + + 1 + 1 + 1 + 1 + 1 + 2 + + true + true + true + true + true + 4 + 2 + false + false + true + 4 + false + false + true + + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 2 + 80 + 1 + 1 + 1 + 1 + 1 + 1 + {}[]().,:;+-*/%&|^!~=<>?@#'"\ + 1500 + 1 + 1 + 0 + 1 + 1 + 0 + 0 + 0 + 1 + 0 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 0 + 1 + 0 + 1 + 1 + 0 + 1 + 0 + 1 + 1 + 1 + 0 + 0 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 1 + 0 + 2 + 1 + 0 + 1 + 1 + 1 + 0 + 0 + 1 + 0 + 1 + 0 + 1 + 1 + 1 + 1 + 1 + 1 + 0 + 1 + 0 + 1 + 0 + 0 + 1 + 1 + 1 + 0 + 0 + 1 + 0 + 0 + 0 + 0 + 0 + 1 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 1 + 1 + 50 + 50 + 1 + 1 + 5 + 1 + 0 + 1 + 1 + 0 + 0 + 1 + 1 + truetrue0truefalsefalsetruefalsetruetruetrue + true + true + true + true + true + 4 + 1 + false + false + true + 4 + false + false + true + + 0 + 1 + -1 + 0 + -1 + 1 + 2 + 0 + 100 + 0 + 2 + 2 + 0 + 2 + 2 + 0 + 2 + 2 + 1 + 2 + 0 + 2 + 0 + 1 + 0 + 7257087 + 8388616 + 0 + 1 + 255 + 0 + 0 + 0 + 0 + 90 + 80 + 2 + 1200 + 1800 + 750 + 500 + -1 + -1 + -1 + 0 + 50 + 2000 + 15000 + 5 + jpg + 15724527 + 16777215 + 0 + 0 + 16750848 + 14145511 + 12895452 + 16487691 + 16768975 + 16765887 + 13172735 + 0 + 0 + 3575607 + 13003057 + 13027014 + -1 + 243 + 1 + 2 + 16739258 + 16760311 + 8650752 + -1 + 128 + -1 + 4294967295 + 11119017 + 2 + 20 + 0 + 0 + 5 + 0 + 0 + 3 + 3 + 1 + -1 + 0 + 1 + gif + 1 + 14413810 + 0 + 15577469 + 16244681 + 0 + XHTML 1.0 Transitional + 12383999 + 0 + 0 + 7257087 + 16750848 + -1 + 80 + + true + true + true + true + true + 4 + 1 + false + false + false + 4 + false + false + true + + -1 + -1 + -1 + -1 + -1 + -1 + -1 + -1 + -1 + 0 + 0 + -1 + 1 + 2 + 4true1truefalsefalsetruetruetruefalsefalse4truetrue4true1truefalsefalsetruetruetruefalsefalse4truetrue + true + true + true + true + true + 4 + 1 + true + false + false + 4 + false + false + true + 4true1truefalsefalsetruetruetruefalsefalse4truetrue4true2truefalsefalsefalsetruefalsefalsefalse4truetruetruePreservetrue120truetruetruetrueDoubleQuotetruefalsetruefalsePreservetruetrue2true2truefalsefalsefalsetruetruefalsefalse2truetrue + + Default + 65535 + + + + 50 + 50 + 5 + 60 + 0 + + + + 000000000000010001000100000001 + 11011100 + 000000000000000000000000010000000100000000000000000000000000 + 1111101 + True + + + 0000000000000100010001000000011 + 11011100 + 0000000000000000000000000100000001000000000000000000000000000000000000 + 1111101 + True + + + 01000111100011111001110101100010011011110000001675777799040002111101110000500020000300020002000100001000010000100005000150002501000500125100011001100000111000001100100110000000010120485090001http://referencesource.microsoft.com/symbolshttp://msdl.microsoft.com/download/symbolsFunction: $FUNCTION, Thread: $TID $TNAMEtruefalsetruetruefalsetruefalsefalsefalsetruefalsefalsefalsefalsetruetruetruetruetruefalsetruetruetruefalsefalsefalsetruefalse001truetruetrue{7E5BB8D2-57E5-4FA9-9542-3870395C16A1}FalseTrueTruefalsetruefalse2{B1BA9461-FC54-45B3-A484-CB6DD0B95C94}0 + + + + 2 + + 10.0.0.0 + + + + + + + + + + + + + + + + + Alt+F10 + Alt+Núm. * + Ctrl+T + Mayús.+F12 + Ctrl++ + Ctrl+Mayús.++ + F2 + Ctrl+D + F8 + Mayús.+F8 + Ctrl+L + Ctrl+Mayús.+L + Ctrl+E, Ctrl+W + Ctrl+Mayús.+Alt+P + Ctrl+Y + Ctrl+Mayús.+Av Pág + Ctrl+Mayús.+Re Pág + Ctrl+N + Ctrl+Alt+Insert + Ctrl+7 + Ctrl+Mayús.+1 + Ctrl+Mayús.+2 + Ctrl+Mayús.+8 + Alt+I + Ctrl+Mayús.+B + Alt+F5 + Ctrl+Alt+V, A + Ctrl+Inter + Ctrl+L + Ctrl+Alt+C + Ctrl+Alt+E + Ctrl+G + Ctrl+Alt+I + Ctrl+Alt+V, L + Mayús.+F9 + Ctrl+Alt+Q + Ctrl+F8 + Ctrl+F10 + Ctrl+F9 + Ctrl+Mayús.+F10 + F5 + Ctrl+F5 + F8 + F11 + Ctrl+Mayús.+F8 + Mayús.+F11 + Mayús.+F8 + F10 + Ctrl+Alt+Inter + F9 + Ctrl+Alt+W, 1 + Mayús.+Entrar + Entrar + Flecha izquierda + Mayús.+Flecha izquierda + Mayús.+Alt+Flecha izquierda + Flecha derecha + Mayús.+Flecha derecha + Mayús.+Alt+Flecha derecha + Alt+Flecha derecha + Ctrl+Espacio + Ctrl+C + Ctrl+Insert + Ctrl+X + Mayús.+Supr + Ctrl+Mayús.+V + Ctrl+Mayús.+Insert + Alt+, + Supr + Mayús.+Retroceso + Retroceso + Ctrl+K, Ctrl+º + Ctrl+Fin + Ctrl+Mayús.+Fin + Ctrl+Inicio + Ctrl+Mayús.+Inicio + Ctrl+F + Alt+F2 + Ctrl+Mayús.+F + F3 + Ctrl+F3 + Mayús.+F3 + Ctrl+Mayús.+F3 + Alt+F12 + Ctrl+K, Ctrl+D + Ctrl+K, Ctrl+F + Ctrl+F12 + Mayús.+F2 + Mayús.+F12 + Alt+. + Alt+I + Tabulador + Ctrl+Y + Flecha abajo + Mayús.+Flecha abajo + Mayús.+Alt+Flecha abajo + Fin + Mayús.+Fin + Mayús.+Alt+Fin + Ctrl+Entrar + Ctrl+Mayús.+Entrar + Inicio + Mayús.+Inicio + Mayús.+Alt+Inicio + Mayús.+Alt+T + Flecha arriba + Mayús.+Flecha arriba + Mayús.+Alt+Flecha arriba + Ctrl+U + Ctrl+Mayús.+U + Ctrl+Flecha abajo + Flecha abajo + Ctrl+Flecha izquierda + Flecha izquierda + Ctrl+Flecha derecha + Flecha derecha + Ctrl+Flecha arriba + Flecha arriba + Ctrl+Mayús.+G + Insert + Av Pág + Mayús.+Av Pág + Re Pág + Mayús.+Re Pág + Ctrl+V + Mayús.+Insert + Ctrl+I + Ctrl+J + Ctrl+K, N + Ctrl+Mayús.+I + Ctrl+Mayús.+Espacio + Ctrl+K, P + Ctrl+Av Pág + Ctrl+Flecha abajo + Ctrl+Re Pág + Ctrl+Flecha arriba + Ctrl+K, T + Ctrl+K, Ctrl+L + Ctrl+K, Ctrl+H + Mayús.+Alt+F12 + Mayús.+Alt+Retroceso + Ctrl+Mayús.+Z + Ctrl+H + Ctrl+Mayús.+H + Mayús.+Alt+I + Ctrl+A + Ctrl+Mayús.+W + Esc + Tabulador + Mayús.+Tabulador + Ctrl+0 + Entrar + Ctrl+Mayús.+Flecha abajo + Mayús.+Flecha abajo + Ctrl+Mayús.+Flecha izquierda + Mayús.+Flecha izquierda + Ctrl+Mayús.+Flecha derecha + Mayús.+Flecha derecha + Ctrl+Mayús.+Flecha arriba + Mayús.+Flecha arriba + Ctrl+M, Ctrl+U + Ctrl+M, Ctrl+P + Alt+F3, S + Mayús.+Tabulador + Ctrl+M, Ctrl+L + Ctrl+M, Ctrl+M + Ctrl+M, Ctrl+O + Ctrl+M, Ctrl+H + Ctrl+K, Ctrl+C + Ctrl+K, Ctrl+U + Ctrl+Z + Alt+Retroceso + Ctrl+Supr + Ctrl+Retroceso + Ctrl+Flecha derecha + Ctrl+Mayús.+Flecha derecha + Ctrl+Mayús.+Alt+Flecha derecha + Ctrl+Flecha izquierda + Ctrl+Mayús.+Flecha izquierda + Ctrl+Mayús.+Alt+Flecha izquierda + Ctrl+Mayús.+T + Ctrl+N + Ctrl+Mayús.+N + Ctrl+O + Ctrl+Mayús.+O + Ctrl+P + Ctrl+Mayús.+S + Ctrl+S + F1 + Ctrl+D + Mayús.+Alt+A + Ctrl+Mayús.+A + Ctrl+K, Ctrl+B + Ctrl+W, Ctrl+E + Ctrl+W, Ctrl+E + Ctrl+Alt+F12 + Mayús.+Alt+Entrar + Ctrl+Mayús.+F2 + Ctrl+Mayús.+- + Ctrl+Mayús.+F12 + Alt+- + Mayús.+Alt+- + F4 + Mayús.+F4 + Ctrl+Alt+S + Ctrl+Alt+R + Ctrl+Alt+L + Ctrl+R + Ctrl+R + Ctrl+Alt+K + Ctrl+Alt+X + F2 + Ctrl+Alt+J + F7 + Mayús.+F7 + Alt+Flecha izquierda + Alt+Flecha derecha + Esc + Ctrl+F4 + Mayús.+Esc + Ctrl+F2 + Ctrl+F6 + Ctrl+Tabulador + Alt+F6 + F6 + Ctrl+Av Pág + Alt+F7 + Ctrl+Mayús.+F6 + Ctrl+Mayús.+Tabulador + Mayús.+Alt+F6 + Mayús.+F6 + Ctrl+Re Pág + Mayús.+Alt+F7 + Ctrl+Alt+Flecha abajo + + + + + trueVBtruetruefalsetruefalsefalsefalsetruefalsefalsefalsefalsetruefalsefalsefalsetruefalsefalsefalsetruefalsefalse{B1BA9461-FC54-45B3-A484-CB6DD0B95C94}0VBfalse11true{946E8047-0CF2-11d1-8C8D-0000F87570EE}, {57F6B7D2-1436-11d1-883C-0000F87579D2}, {BAFF6A1A-0CF2-11d1-8C8D-0000F87570EE}, {6B115DD7-9CBC-461A-9562-5227BBD2D115}, {B8280AF8-5ED0-4B48-AB18-87DD69E059C9}, {F1E1021E-A781-4862-9F4B-88746A288A67}, {7583bb73-a453-40e8-8951-b6986ddb1d9b}, {CD914678-D0EC-11d2-A87B-00C04F79EFB7}, {0FD397F9-E4A5-4392-AFF2-36DC3FB133D2}, {E7CA29CE-6D17-4071-A258-E760ACFFEA79}, {de03177c-918d-40af-8c17-c9d63670c175}, {D245F35B-3F45-4516-B1E6-04608DA126CC}, {D245F35A-3F45-4516-B1E6-04608DA126CC}falsefalse1{00000000-0000-0000-0000-000000000000}false10XAML CommonControles WPF comunes0true41{7b5d447b-0b12-41ea-a84e-c822034422d4}-#1106Todos los formularios Windows Forms0true42XAML ControlsTodos los controles WPF0true43{7b5d447b-0b12-41ea-a84e-c822034422d4}-#1107Controles comunes0true44Silverlight CommonControles de Silverlight comunes0true45{7b5d447b-0b12-41ea-a84e-c822034422d4}-#1102Contenedores0true46Silverlight ControlsTodos los controles de Silverlight0true47{7b5d447b-0b12-41ea-a84e-c822034422d4}-#1103Menús y barras de herramientas0true48DataDatos0true49{7b5d447b-0b12-41ea-a84e-c822034422d4}-#1101Componentes0true410{7b5d447b-0b12-41ea-a84e-c822034422d4}-#1104Impresión0true411{7b5d447b-0b12-41ea-a84e-c822034422d4}-#1105Cuadros de diálogo0true4121200MatchCase=0 WholeWord=0 Hidden=0 Up=0 Selection=0 Block=0 KeepCase=0 SubFolders=1 KeepOpen=0 NameOnly=0 Plain Document FindMatchCase=0 WholeWord=0 Hidden=0 Up=0 Selection=0 Block=0 KeepCase=0 SubFolders=0 KeepOpen=0 NameOnly=0 Plain Document FindMatchCase=0 WholeWord=0 Hidden=0 Up=0 Selection=0 Block=0 KeepCase=0 SubFolders=1 KeepOpen=0 NameOnly=0 Plain Files Find11111111111101Regex007Design|Debug|NoToolWin + + + + + + VBExp + + + False + VBExpressHowDoI80 + http://go.microsoft.com/fwlink/?linkid=36141&clcid=%VSSPV_LCID_HEX% + True + 9 + VB + <Provider Type="SearchProviderTypeLocalHelp" Enabled="True" /><Provider Type="SearchProviderTypeMsdnOnline" Enabled="True" /><Provider Type="SearchProviderTypeCodeWise" Enabled="True" /> + 0 + True + true + true + true + true + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + 3.0 + 0 + 3.0 + 0 + 2.0 + 1 + 0 + 1 + 1 + 0 + + csv + + 1 + 64 + 5 + 1 + 0 + 64 + + True + True + 1048576 + 0 + True + + false + False + true + -1 + + false + + True + True + True + 25 + + False + + VB + + application/soap+msbin1 + True + True + True + about:blank + TrueTrueTrue8, 8SnapLinesTrueFalseTrueTrue + Preserve + True + True + True + True + True + True + True + True + True + Preserve + True + False + DoubleQuote + 120 + False + NoneTrueTrueTrueTrueTrueTrueTrueTrueTrue%VsInstallDir%\xml\Schemas \ No newline at end of file diff --git a/Visualizers/attribcache90.bin b/Visualizers/attribcache90.bin new file mode 100644 index 0000000000000000000000000000000000000000..519be96ca1dcbb4da1e68f2de6f0ec422d1156d5 Binary files /dev/null and b/Visualizers/attribcache90.bin differ diff --git a/Visualizers/autoexp.cs b/Visualizers/autoexp.cs new file mode 100644 index 0000000000000000000000000000000000000000..55a771014c184585a9c12b2dc5d8dd716e6d2f35 --- /dev/null +++ b/Visualizers/autoexp.cs @@ -0,0 +1,124 @@ +#region Using directives + +using System; +using System.Diagnostics; +using System.Drawing; +using System.IO; +using System.Reflection; +using System.Security; +using WebControls = System.Web.UI.WebControls; +using HTMLControls = System.Web.UI.HtmlControls; +using WinForms = System.Windows.Forms; +using SQLTypes = System.Data.SqlTypes; + +#endregion + +// mscorlib +[assembly: DebuggerDisplay(@"\{Name = {Name} FullName = {FullName}}", Target = typeof(Type))] + +// System.Drawing +[assembly: DebuggerDisplay(@"\{Name = {fontFamily.Name} Size={fontSize}}", Target = typeof(Font))] +[assembly: DebuggerDisplay(@"\{Name = {name}}", Target = typeof(FontFamily))] +[assembly: DebuggerDisplay(@"\{Color = {color}}", Target = typeof(Pen))] +[assembly: DebuggerDisplay(@"\{X = {x} Y = {y}}", Target = typeof(Point))] +[assembly: DebuggerDisplay(@"\{X = {x} Y = {y}}", Target = typeof(PointF))] +[assembly: DebuggerDisplay(@"\{X = {x} Y = {y} Width = {width} Height = {height}}", Target = typeof(Rectangle))] +[assembly: DebuggerDisplay(@"\{X = {x} Y = {y} Width = {width} Height = {height}}", Target = typeof(RectangleF))] +[assembly: DebuggerDisplay(@"\{Width = {width} Height = {height}}", Target = typeof(Size))] +[assembly: DebuggerDisplay(@"\{Width = {width} Height = {height}}", Target = typeof(SizeF))] +[assembly: DebuggerDisplay(@"\{Color = {color}}", Target = typeof(SolidBrush))] + +// System.Web.UI.WebControls +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WebControls::Button))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WebControls::Label))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WebControls::HyperLink))] +[assembly: DebuggerDisplay(@"\{Text = {Text} Checked = {Checked}}", Target = typeof(WebControls::CheckBox))] +[assembly: DebuggerDisplay(@"\{Text = {Text} Checked = {Checked}}", Target = typeof(WebControls::RadioButton))] +[assembly: DebuggerDisplay(@"\{SelectedDate = {SelectedData}}", Target = typeof(WebControls::Calendar))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WebControls::LinkButton))] + +// System.Web.UI.HtmlControls +[assembly: DebuggerDisplay(@"\{Value = {Value}}", Target = typeof(HTMLControls::HtmlInputButton))] +[assembly: DebuggerDisplay(@"\{InnerText = {InnerText}}", Target = typeof(HTMLControls::HtmlGenericControl))] +[assembly: DebuggerDisplay(@"\{Value = {Value}}", Target = typeof(HTMLControls::HtmlTextArea))] +[assembly: DebuggerDisplay(@"\{Value = {Value}}", Target = typeof(HTMLControls::HtmlInputText))] +[assembly: DebuggerDisplay(@"\{Value = {Value} Checked = {Checked}}", Target = typeof(HTMLControls::HtmlInputCheckBox))] +[assembly: DebuggerDisplay(@"\{Value = {Value} Checked = {Checked}}", Target = typeof(HTMLControls::HtmlInputRadioButton))] + +// System.Windows.Forms +[assembly: DebuggerDisplay(@"\{ExecutablePath = {executablePath}}", Target = typeof(WinForms::Application))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::Button))] +[assembly: DebuggerDisplay(@"\{Text = {Text} CheckState = {checkState}}", Target = typeof(WinForms::CheckBox))] +[assembly: DebuggerDisplay(@"\{SelectedItem = {Text}}", Target = typeof(WinForms::CheckedListBox))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::DataGrid))] +[assembly: DebuggerDisplay(@"\{Type = {type} Column = {col} Row = {row}}", Target = typeof(WinForms::DataGrid.HitTestInfo))] +[assembly: DebuggerDisplay(@"\{HeaderText = {headerName}}", Target = typeof(WinForms::DataGridColumnStyle))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::DataGridTextBox))] +[assembly: DebuggerDisplay(@"\{HeaderText = {headerName}}", Target = typeof(WinForms::DataGridTextBoxColumn))] +[assembly: DebuggerDisplay(@"\{Font = {font} Color = {color}}", Target = typeof(WinForms::FontDialog))] +[assembly: DebuggerDisplay(@"\{Value = {value} Min = {minimum} Max = {maximum}}", Target = typeof(WinForms::HScrollBar))] +[assembly: DebuggerDisplay(@"\{InvalidRect = {invalidRect}}", Target = typeof(WinForms::InvalidateEventArgs))] +[assembly: DebuggerDisplay(@"\{Index = {index}}", Target = typeof(WinForms::ItemChangedEventArgs))] +[assembly: DebuggerDisplay(@"\{Index = {index} NewValue = {newValue} CurrentValue = {currentValue}}", Target = typeof(WinForms::ItemCheckEventArgs))] +[assembly: DebuggerDisplay(@"\{KeyData = {keyData}}", Target = typeof(WinForms::KeyEventArgs))] +[assembly: DebuggerDisplay(@"\{KeyChar = {keyChar}}", Target = typeof(WinForms::KeyPressEventArgs))] +[assembly: DebuggerDisplay(@"\{LinkText = {linkText}}", Target = typeof(WinForms::LinkClickedEventArgs))] +[assembly: DebuggerDisplay(@"\{SelectedItem = {Text}}", Target = typeof(WinForms::ListBox))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target= typeof(WinForms::ListViewItem))] +[assembly: DebuggerDisplay(@"\{X = {x} Y = {y} Button = {button}}", Target = typeof(WinForms::MouseEventArgs))] +[assembly: DebuggerDisplay(@"\{Value = {currentValue} Min = {minimum} Max = {maximum}}", Target = typeof(WinForms::NumericUpDown))] +[assembly: DebuggerDisplay(@"\{ClipRectangle = {clipRect}}", Target = typeof(WinForms::PaintEventArgs))] +[assembly: DebuggerDisplay(@"\{Value = {value} Min = {minimum} Max = {maximum}}", Target = typeof(WinForms::ProgressBar))] +[assembly: DebuggerDisplay(@"\{Text = {Text} Checked = {isChecked}}", Target = typeof(WinForms::RadioButton))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::RichTextBox))] +[assembly: DebuggerDisplay(@"\{Bounds = {bounds} WorkingArea = {workingArea} Primary = {primary} DeviceName = {deviceName}}", Target = typeof(WinForms::Screen))] +[assembly: DebuggerDisplay(@"\{Start = {start} End = {end}}", Target = typeof(WinForms::SelectionRange))] +[assembly: DebuggerDisplay(@"\{SplitPosition = {splitSize} MinExtra = {minExtra} MinSize = {minSize}}", Target = typeof(WinForms::Splitter))] +[assembly: DebuggerDisplay(@"\{SplitX = {splitX} SplitY = {splitY}}", Target = typeof(WinForms::SplitterEventArgs))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::TextBox))] +[assembly: DebuggerDisplay(@"\{Interval = {interval}}", Target = typeof(WinForms::Timer))] +[assembly: DebuggerDisplay(@"\{Value = {Value} Min = {minimum} Max = {maximum}}", Target = typeof(WinForms::TrackBar))] +[assembly: DebuggerDisplay(@"\{Text = {text}}", Target = typeof(WinForms::TreeNode))] +[assembly: DebuggerDisplay(@"\{Value = {value} Min = {minimum} Max = {maximum}}", Target = typeof(WinForms::VScrollBar))] + +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(Exception))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ApplicationException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ArgumentException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ArgumentNullException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ArgumentOutOfRangeException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ArithmeticException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(DivideByZeroException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(DllNotFoundException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ApplicationException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(IndexOutOfRangeException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(InvalidCastException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(MemberAccessException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(MethodAccessException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(NullReferenceException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(StackOverflowException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(SystemException))] +[assembly: DebuggerDisplay(@"\{{Message}:{TypeName}}", Target = typeof(TypeLoadException))] +[assembly: DebuggerDisplay(@"\{{Message}:{FileName}}", Target = typeof(FileLoadException))] +[assembly: DebuggerDisplay(@"\{{Message}:{FileName}}", Target = typeof(FileNotFoundException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ReflectionTypeLoadException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(SecurityException))] +[assembly: DebuggerDisplay(@"\{Method = {Method}}", Target = typeof(System.Delegate))] + +// The attributes below can be useful to uncomment if ToString evaluation is disabled. +// +//[assembly: DebuggerDisplay(@"\{RGB = {value}}", Target = typeof(Color))] +//[assembly: DebuggerDisplay("{Month}/{Day}/{Year} {Hour}:{Minute}:{Second}", Target = typeof(DateTime))] +//[assembly: DebuggerDisplay(@"\{Value = {value}}", Target = typeof(WinForms::DateTimePicker))] +//[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::LinkLabel))] +//[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::Label))] +//[assembly: DebuggerDisplay(@"\{SelectionStart = {selectionStart} SelectionEnd = {selectionEnd}}", Target = typeof(WinForms::MonthCalendar))] +//[assembly: DebuggerDisplay(@"\{InitialDelay = {InitialDelay} ShowAlways = {ShowAlways}}", Target = typeof(WinForms::ToolTip))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlInt64))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlDateTime))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlInt32))] +//[assembly: DebuggerDisplay("{Value}", Target = typeof(SQLTypes::SqlMoney))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlString))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlSingle))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlInt16))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlByte))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlDouble))] \ No newline at end of file diff --git a/Visualizers/autoexp.dll b/Visualizers/autoexp.dll new file mode 100644 index 0000000000000000000000000000000000000000..2be6416ecad60492e5e42f11a5d8ab5cc224aaca Binary files /dev/null and b/Visualizers/autoexp.dll differ diff --git a/Visualizers/autoexpce.cs b/Visualizers/autoexpce.cs new file mode 100644 index 0000000000000000000000000000000000000000..c5284066d18d950b33c5d37c179822d2b89fa297 --- /dev/null +++ b/Visualizers/autoexpce.cs @@ -0,0 +1,153 @@ +// This file contains DisplayAttribute defines for types from Windows CE assemblies +// If any changes are made, its needs to be recompiled while referencing CE assemblies + +#region Using directives + +using System; +using System.Diagnostics; +using System.Drawing; +using System.IO; +using System.Reflection; +using System.Security; +using WinForms = System.Windows.Forms; +using SQLTypes = System.Data.SqlTypes; + +#endregion + +// mscorlib +[assembly: DebuggerDisplay(@"\{Name = {Name} FullName = {FullName}}", Target = typeof(Type))] + +// System.Drawing +[assembly: DebuggerDisplay(@"\{Name = {Name} Size={Size}}", Target = typeof(Font))] +[assembly: DebuggerDisplay(@"\{Name = {m_strName}}", Target = typeof(FontFamily))] +[assembly: DebuggerDisplay(@"\{Color = {m_color}}", Target = typeof(Pen))] +[assembly: DebuggerDisplay(@"\{X = {m_x} Y = {m_y}}", Target = typeof(Point))] +[assembly: DebuggerDisplay(@"\{X = {m_x} Y = {m_y} Width = {m_cx} Height = {m_cy}}", Target = typeof(Rectangle))] +[assembly: DebuggerDisplay(@"\{X = {m_x} Y = {m_y} Width = {m_cx} Height = {m_cy}}", Target = typeof(RectangleF))] +[assembly: DebuggerDisplay(@"\{Width = {m_cx} Height = {m_cy}}", Target = typeof(Size))] +[assembly: DebuggerDisplay(@"\{Width = {m_cx} Height = {m_cy}}", Target = typeof(SizeF))] +[assembly: DebuggerDisplay(@"\{Color = {m_color}}", Target = typeof(SolidBrush))] + + + +// System.Windows.Forms +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::Button))] +[assembly: DebuggerDisplay(@"\{Text = {Text} CheckState = {CheckState}}", Target = typeof(WinForms::CheckBox))] +[assembly: DebuggerDisplay(@"\{Value = {Value} Min = {Minimum} Max = {Maximum}}", Target = typeof(WinForms::HScrollBar))] +[assembly: DebuggerDisplay(@"\{Index = {index}}", Target = typeof(WinForms::ItemChangedEventArgs))] +[assembly: DebuggerDisplay(@"\{Index = {m_iIndex} NewValue = {m_newCheckValue} CurrentValue = {m_CurrentValue}}", Target = typeof(WinForms::ItemCheckEventArgs))] +[assembly: DebuggerDisplay(@"\{KeyData = {m_keyData}}", Target = typeof(WinForms::KeyEventArgs))] +[assembly: DebuggerDisplay(@"\{KeyChar = {m_ch}}", Target = typeof(WinForms::KeyPressEventArgs))] +[assembly: DebuggerDisplay(@"\{SelectedItem = {Text}}", Target = typeof(WinForms::ListBox))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::ListViewItem))] +[assembly: DebuggerDisplay(@"\{X = {m_x} Y = {m_y} Button = {button}}", Target = typeof(WinForms::MouseEventArgs))] +[assembly: DebuggerDisplay(@"\{Value = {Value} Min = {Minimum} Max = {Maximum}}", Target = typeof(WinForms::NumericUpDown))] +[assembly: DebuggerDisplay(@"\{ClipRectangle = {m_rcClip}}", Target = typeof(WinForms::PaintEventArgs))] +[assembly: DebuggerDisplay(@"\{Value = {Value} Min = {Minimum} Max = {Maximum}}", Target = typeof(WinForms::ProgressBar))] +[assembly: DebuggerDisplay(@"\{Text = {Text} Checked = {Checked}}", Target = typeof(WinForms::RadioButton))] +[assembly: DebuggerDisplay(@"\{Bounds = {Bounds} WorkingArea = {WorkingArea}}", Target = typeof(WinForms::Screen))] +[assembly: DebuggerDisplay(@"\{MinExtra = {MinExtra} MinSize = {MinSize}}", Target = typeof(WinForms::Splitter))] +[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::TextBox))] +[assembly: DebuggerDisplay(@"\{Interval = {m_msec}}", Target = typeof(WinForms::Timer))] +[assembly: DebuggerDisplay(@"\{{Value} Min = {Minimum} Max = {Maximum}}", Target = typeof(WinForms::TrackBar))] +[assembly: DebuggerDisplay(@"\{Text = {m_strText}}", Target = typeof(WinForms::TreeNode))] +[assembly: DebuggerDisplay(@"\{{Value} Min = {Minimum} Max = {Maximum}}", Target = typeof(WinForms::VScrollBar))] + +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(Exception))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ApplicationException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ArgumentException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ArgumentNullException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ArgumentOutOfRangeException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ArithmeticException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(DivideByZeroException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(DllNotFoundException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(ApplicationException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(IndexOutOfRangeException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(InvalidCastException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(MemberAccessException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(MethodAccessException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(NullReferenceException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(StackOverflowException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(SystemException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(TypeLoadException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(FileNotFoundException))] +[assembly: DebuggerDisplay(@"\{{Message}}", Target = typeof(SecurityException))] + +// The attributes below can be useful to uncomment if ToString evaluation is disabled. +// +//[assembly: DebuggerDisplay("{Month}/{Day}/{Year} {Hour}:{Minute}:{Second}", Target = typeof(DateTime))] +//[assembly: DebuggerDisplay(@"\{Value = {Value}}", Target = typeof(WinForms::DateTimePicker))] +//[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::LinkLabel))] +//[assembly: DebuggerDisplay(@"\{Text = {Text}}", Target = typeof(WinForms::Label))] +//[assembly: DebuggerDisplay(@"\{{SelectionStack = {SelectionStart} SelectionEnd = {SelectionEnd}}", Target = typeof(WinForms::MonthCalendar))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlInt64))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlDateTime))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlInt32))] +//[assembly: DebuggerDisplay("{Value}", Target = typeof(SQLTypes::SqlMoney))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlString))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlSingle))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlInt16))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlByte))] +//[assembly: DebuggerDisplay("{m_value}", Target = typeof(SQLTypes::SqlDouble))] + +namespace System.Diagnostics { + + [AttributeUsage(AttributeTargets.Class | AttributeTargets.Struct | AttributeTargets.Delegate | AttributeTargets.Enum | AttributeTargets.Field | AttributeTargets.Property | AttributeTargets.Assembly, AllowMultiple = true)] + public sealed class DebuggerDisplayAttribute : Attribute + { + private string name; + private string value; + private string type; + private string targetName; + private Type target; + + public DebuggerDisplayAttribute(string value) + { + if( value == null ) { + this.value = ""; + } + else { + this.value = value; + } + name = ""; + type = ""; + } + + public string Value + { + get { return this.value; } + } + + public string Name + { + get { return name; } + set { name = value; } + } + + public string Type + { + get { return type; } + set { type = value; } + } + + public Type Target + { + set { + if( value == null) { + throw new ArgumentNullException("value"); + } + + targetName = value.AssemblyQualifiedName; + target = value; + } + get { return target; } + } + + public string TargetTypeName + { + get { return targetName; } + set { targetName = value; } + + } + } +} diff --git a/Visualizers/autoexpce.dll b/Visualizers/autoexpce.dll new file mode 100644 index 0000000000000000000000000000000000000000..2fc42adc4f1fb23032b412472ab8f7ea1ea0b463 Binary files /dev/null and b/Visualizers/autoexpce.dll differ