jj 07.12 3

This commit is contained in:
JenneJ
2016-12-07 14:39:37 +01:00
parent 9aaadf7921
commit 934732780d
4 changed files with 90 additions and 30 deletions

View File

@@ -26,6 +26,7 @@ Partial Class frmGeodataNavigation
Dim VectorItemsLayer1 As DevExpress.XtraMap.VectorItemsLayer = New DevExpress.XtraMap.VectorItemsLayer()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmGeodataNavigation))
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
Me.btnReload = New System.Windows.Forms.ToolStripButton()
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
Me.tsLabelRecordCount = New System.Windows.Forms.ToolStripStatusLabel()
Me.MapControl1 = New DevExpress.XtraMap.MapControl()
@@ -35,12 +36,14 @@ Partial Class frmGeodataNavigation
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
Me.GridControlGeo = New DevExpress.XtraGrid.GridControl()
Me.grvwMain = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.btnDelete = New System.Windows.Forms.Button()
Me.btnSave = New System.Windows.Forms.Button()
Me.btnOpenMap = New System.Windows.Forms.Button()
Me.Label2 = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label()
Me.txtLon = New System.Windows.Forms.TextBox()
Me.txtLat = New System.Windows.Forms.TextBox()
Me.ToolStrip1.SuspendLayout()
Me.StatusStrip1.SuspendLayout()
CType(Me.MapControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -57,12 +60,21 @@ Partial Class frmGeodataNavigation
'
'ToolStrip1
'
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.btnReload})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Size = New System.Drawing.Size(1002, 25)
Me.ToolStrip1.TabIndex = 0
Me.ToolStrip1.Text = "ToolStrip1"
'
'btnReload
'
Me.btnReload.Image = Global.DD_Record_Organiser.My.Resources.Resources.refresh_16xLG
Me.btnReload.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnReload.Name = "btnReload"
Me.btnReload.Size = New System.Drawing.Size(81, 22)
Me.btnReload.Text = "Neu laden"
'
'StatusStrip1
'
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsLabelRecordCount})
@@ -128,6 +140,7 @@ Partial Class frmGeodataNavigation
'
'SplitContainer1.Panel2
'
Me.SplitContainer1.Panel2.Controls.Add(Me.btnDelete)
Me.SplitContainer1.Panel2.Controls.Add(Me.btnSave)
Me.SplitContainer1.Panel2.Controls.Add(Me.btnOpenMap)
Me.SplitContainer1.Panel2.Controls.Add(Me.Label2)
@@ -167,22 +180,36 @@ Partial Class frmGeodataNavigation
Me.grvwMain.OptionsView.ShowAutoFilterRow = True
Me.grvwMain.OptionsView.ShowHorizontalLines = DevExpress.Utils.DefaultBoolean.[True]
'
'btnDelete
'
Me.btnDelete.Image = Global.DD_Record_Organiser.My.Resources.Resources.delete
Me.btnDelete.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnDelete.Location = New System.Drawing.Point(379, 96)
Me.btnDelete.Name = "btnDelete"
Me.btnDelete.Size = New System.Drawing.Size(96, 33)
Me.btnDelete.TabIndex = 6
Me.btnDelete.Text = "Löschen"
Me.btnDelete.UseVisualStyleBackColor = True
'
'btnSave
'
Me.btnSave.Location = New System.Drawing.Point(379, 96)
Me.btnSave.Image = Global.DD_Record_Organiser.My.Resources.Resources.save_16xLG
Me.btnSave.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnSave.Location = New System.Drawing.Point(277, 96)
Me.btnSave.Name = "btnSave"
Me.btnSave.Size = New System.Drawing.Size(96, 33)
Me.btnSave.TabIndex = 5
Me.btnSave.Text = "Save"
Me.btnSave.Text = "Speichern"
Me.btnSave.UseVisualStyleBackColor = True
'
'btnOpenMap
'
Me.btnOpenMap.Location = New System.Drawing.Point(277, 96)
Me.btnOpenMap.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnOpenMap.Location = New System.Drawing.Point(277, 41)
Me.btnOpenMap.Name = "btnOpenMap"
Me.btnOpenMap.Size = New System.Drawing.Size(96, 33)
Me.btnOpenMap.Size = New System.Drawing.Size(198, 33)
Me.btnOpenMap.TabIndex = 4
Me.btnOpenMap.Text = "Set on Map"
Me.btnOpenMap.Text = "Auf Karte setzen"
Me.btnOpenMap.UseVisualStyleBackColor = True
'
'Label2
@@ -233,6 +260,8 @@ Partial Class frmGeodataNavigation
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmGeodataNavigation"
Me.Text = "Geodata Navigation"
Me.ToolStrip1.ResumeLayout(False)
Me.ToolStrip1.PerformLayout()
Me.StatusStrip1.ResumeLayout(False)
Me.StatusStrip1.PerformLayout()
CType(Me.MapControl1, System.ComponentModel.ISupportInitialize).EndInit()
@@ -267,4 +296,6 @@ Partial Class frmGeodataNavigation
Friend WithEvents txtLat As System.Windows.Forms.TextBox
Friend WithEvents btnSave As System.Windows.Forms.Button
Friend WithEvents btnOpenMap As System.Windows.Forms.Button
Friend WithEvents btnReload As System.Windows.Forms.ToolStripButton
Friend WithEvents btnDelete As System.Windows.Forms.Button
End Class