Changeset 1259

Timestamp:

1/20/2010 2:32:35 AM (7 weeks ago)

Author:

vessper

Message:

20/01/2010

---

- Core: Added a "To" column to determine whether items were sent to the corp or to a character

Location:

trunk/EveHQ/Forms

Files:

• frmMail.Designer.vb (modified) (9 diffs)
• frmMail.vb (modified) (2 diffs)

trunk/EveHQ/Forms/frmMail.Designer.vb

@@ -40 +40 @@
         Me.CollapsibleSplitter1 = New NJFLib.Controls.CollapsibleSplitter
         Me.panelMails = New System.Windows.Forms.Panel
+        Me.colTo = New DotNetLib.Windows.Forms.ContainerListViewColumnHeader
+        Me.ContainerListViewColumnHeader4 = New DotNetLib.Windows.Forms.ContainerListViewColumnHeader
         Me.panelNotifications.SuspendLayout()
         Me.panelMails.SuspendLayout()
@@ -79 +81 @@
                     Or System.Windows.Forms.AnchorStyles.Left) _
                     Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.clvMail.Columns.AddRange(New DotNetLib.Windows.Forms.ContainerListViewColumnHeader() {Me.colFrom, Me.colSubject, Me.colDateTime})
+        Me.clvMail.Columns.AddRange(New DotNetLib.Windows.Forms.ContainerListViewColumnHeader() {Me.colFrom, Me.colTo, Me.colSubject, Me.colDateTime})
         Me.clvMail.DefaultItemHeight = 20
         Me.clvMail.Location = New System.Drawing.Point(0, 56)
@@ -92 +94 @@
         Me.colFrom.Tag = Nothing
         Me.colFrom.Text = "From"
-        Me.colFrom.Width = 200
+        Me.colFrom.Width = 160
         '
         'colSubject
         '
         Me.colSubject.CustomSortTag = Nothing
-        Me.colSubject.DisplayIndex = 1
+        Me.colSubject.DisplayIndex = 2
         Me.colSubject.SortDataType = DotNetLib.Windows.Forms.SortDataType.[String]
         Me.colSubject.Tag = Nothing
@@ -106 +108 @@
         '
         Me.colDateTime.CustomSortTag = Nothing
-        Me.colDateTime.DisplayIndex = 2
+        Me.colDateTime.DisplayIndex = 3
         Me.colDateTime.SortDataType = DotNetLib.Windows.Forms.SortDataType.[Date]
         Me.colDateTime.Tag = Nothing
@@ -127 +129 @@
                     Or System.Windows.Forms.AnchorStyles.Left) _
                     Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.clvNotifications.Columns.AddRange(New DotNetLib.Windows.Forms.ContainerListViewColumnHeader() {Me.ContainerListViewColumnHeader1, Me.ContainerListViewColumnHeader2, Me.ContainerListViewColumnHeader3})
+        Me.clvNotifications.Columns.AddRange(New DotNetLib.Windows.Forms.ContainerListViewColumnHeader() {Me.ContainerListViewColumnHeader1, Me.ContainerListViewColumnHeader4, Me.ContainerListViewColumnHeader2, Me.ContainerListViewColumnHeader3})
         Me.clvNotifications.DefaultItemHeight = 20
         Me.clvNotifications.Location = New System.Drawing.Point(0, 25)
@@ -140 +142 @@
         Me.ContainerListViewColumnHeader1.Tag = Nothing
         Me.ContainerListViewColumnHeader1.Text = "From"
-        Me.ContainerListViewColumnHeader1.Width = 200
+        Me.ContainerListViewColumnHeader1.Width = 160
         '
         'ContainerListViewColumnHeader2
         '
         Me.ContainerListViewColumnHeader2.CustomSortTag = Nothing
-        Me.ContainerListViewColumnHeader2.DisplayIndex = 1
+        Me.ContainerListViewColumnHeader2.DisplayIndex = 2
         Me.ContainerListViewColumnHeader2.SortDataType = DotNetLib.Windows.Forms.SortDataType.[String]
         Me.ContainerListViewColumnHeader2.Tag = Nothing
@@ -154 +156 @@
         '
         Me.ContainerListViewColumnHeader3.CustomSortTag = Nothing
-        Me.ContainerListViewColumnHeader3.DisplayIndex = 2
+        Me.ContainerListViewColumnHeader3.DisplayIndex = 3
         Me.ContainerListViewColumnHeader3.SortDataType = DotNetLib.Windows.Forms.SortDataType.[Date]
         Me.ContainerListViewColumnHeader3.Tag = Nothing
@@ -217 +219 @@
         Me.panelMails.Size = New System.Drawing.Size(884, 325)
         Me.panelMails.TabIndex = 52
+        '
+        'colTo
+        '
+        Me.colTo.CustomSortTag = Nothing
+        Me.colTo.DisplayIndex = 1
+        Me.colTo.SortDataType = DotNetLib.Windows.Forms.SortDataType.[String]
+        Me.colTo.Tag = Nothing
+        Me.colTo.Text = "To"
+        Me.colTo.Width = 160
+        '
+        'ContainerListViewColumnHeader4
+        '
+        Me.ContainerListViewColumnHeader4.CustomSortTag = Nothing
+        Me.ContainerListViewColumnHeader4.DisplayIndex = 1
+        Me.ContainerListViewColumnHeader4.SortDataType = DotNetLib.Windows.Forms.SortDataType.[String]
+        Me.ContainerListViewColumnHeader4.Tag = Nothing
+        Me.ContainerListViewColumnHeader4.Text = "To"
+        Me.ContainerListViewColumnHeader4.Width = 160
         '
         'frmMail
@@ -252 +272 @@
     Friend WithEvents CollapsibleSplitter1 As NJFLib.Controls.CollapsibleSplitter
     Friend WithEvents panelMails As System.Windows.Forms.Panel
+    Friend WithEvents colTo As DotNetLib.Windows.Forms.ContainerListViewColumnHeader
+    Friend WithEvents ContainerListViewColumnHeader4 As DotNetLib.Windows.Forms.ContainerListViewColumnHeader
 End Class

trunk/EveHQ/Forms/frmMail.vb

@@ -183 +183 @@
             End If
             clvMail.Items.Add(mailItem)
-            mailItem.SubItems(1).Text = newMail.MessageTitle
-            mailItem.SubItems(2).Text = FormatDateTime(newMail.MessageDate)
+            If newMail.ToCorpAllianceIDs <> "" Then
+                mailItem.SubItems(1).Text = displayPilot.Corp
+            Else
+                mailItem.SubItems(1).Text = displayPilot.Name
+            End If
+            mailItem.SubItems(2).Text = newMail.MessageTitle
+            mailItem.SubItems(3).Text = FormatDateTime(newMail.MessageDate)
             If newMail.ReadFlag = False Then
                 mailItem.Font = UnreadFont
@@ -247 +252 @@
             Dim strNotice As String = [Enum].GetName(GetType(EveHQ.Core.EveNotificationTypes), newNotice.TypeID)
             strNotice = strNotice.Replace("_", " ")
-            mailItem.SubItems(1).Text = strNotice
-            mailItem.SubItems(2).Text = FormatDateTime(newNotice.MessageDate)
+            mailItem.SubItems(1).Text = displayPilot.Name
+            mailItem.SubItems(2).Text = strNotice
+            mailItem.SubItems(3).Text = FormatDateTime(newNotice.MessageDate)
             If newNotice.ReadFlag = False Then
                 mailItem.Font = UnreadFont