jj 02.12.16 frmGeodataSelect

This commit is contained in:
JenneJ
2016-12-02 14:33:55 +01:00
parent 57517ffed8
commit 29abb10c1b
6 changed files with 495 additions and 33 deletions

View File

@@ -35,8 +35,8 @@ 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.Button2 = New System.Windows.Forms.Button()
Me.Button1 = 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()
@@ -128,15 +128,15 @@ Partial Class frmGeodataNavigation
'
'SplitContainer1.Panel2
'
Me.SplitContainer1.Panel2.Controls.Add(Me.Button2)
Me.SplitContainer1.Panel2.Controls.Add(Me.Button1)
Me.SplitContainer1.Panel2.Controls.Add(Me.btnSave)
Me.SplitContainer1.Panel2.Controls.Add(Me.btnOpenMap)
Me.SplitContainer1.Panel2.Controls.Add(Me.Label2)
Me.SplitContainer1.Panel2.Controls.Add(Me.Label1)
Me.SplitContainer1.Panel2.Controls.Add(Me.txtLon)
Me.SplitContainer1.Panel2.Controls.Add(Me.txtLat)
Me.SplitContainer1.Panel2MinSize = 100
Me.SplitContainer1.Size = New System.Drawing.Size(996, 572)
Me.SplitContainer1.SplitterDistance = 467
Me.SplitContainer1.SplitterDistance = 411
Me.SplitContainer1.TabIndex = 0
'
'GridControlGeo
@@ -145,38 +145,50 @@ Partial Class frmGeodataNavigation
Me.GridControlGeo.Location = New System.Drawing.Point(0, 0)
Me.GridControlGeo.MainView = Me.grvwMain
Me.GridControlGeo.Name = "GridControlGeo"
Me.GridControlGeo.Size = New System.Drawing.Size(996, 467)
Me.GridControlGeo.Size = New System.Drawing.Size(996, 411)
Me.GridControlGeo.TabIndex = 0
Me.GridControlGeo.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.grvwMain})
'
'grvwMain
'
Me.grvwMain.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua
Me.grvwMain.Appearance.EvenRow.Options.UseBackColor = True
Me.grvwMain.GridControl = Me.GridControlGeo
Me.grvwMain.Name = "grvwMain"
Me.grvwMain.OptionsBehavior.Editable = False
Me.grvwMain.OptionsBehavior.ReadOnly = True
Me.grvwMain.OptionsSelection.EnableAppearanceFocusedCell = False
Me.grvwMain.OptionsSelection.EnableAppearanceFocusedRow = False
Me.grvwMain.OptionsSelection.EnableAppearanceHideSelection = False
Me.grvwMain.OptionsSelection.MultiSelect = True
Me.grvwMain.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect
Me.grvwMain.OptionsView.ColumnAutoWidth = False
Me.grvwMain.OptionsView.EnableAppearanceEvenRow = True
Me.grvwMain.OptionsView.ShowHorizontalLines = DevExpress.Utils.DefaultBoolean.[True]
'
'Button2
'btnSave
'
Me.Button2.Location = New System.Drawing.Point(467, 25)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(96, 49)
Me.Button2.TabIndex = 5
Me.Button2.Text = "Save"
Me.Button2.UseVisualStyleBackColor = True
Me.btnSave.Location = New System.Drawing.Point(379, 96)
Me.btnSave.Name = "btnSave"
Me.btnSave.Size = New System.Drawing.Size(96, 33)
Me.btnSave.TabIndex = 5
Me.btnSave.Text = "Save"
Me.btnSave.UseVisualStyleBackColor = True
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(365, 25)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(96, 49)
Me.Button1.TabIndex = 4
Me.Button1.Text = "Set on Map"
Me.Button1.UseVisualStyleBackColor = True
Me.btnOpenMap.Location = New System.Drawing.Point(277, 96)
Me.btnOpenMap.Name = "Button1"
Me.btnOpenMap.Size = New System.Drawing.Size(96, 33)
Me.btnOpenMap.TabIndex = 4
Me.btnOpenMap.Text = "Set on Map"
Me.btnOpenMap.UseVisualStyleBackColor = True
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(164, 22)
Me.Label2.Location = New System.Drawing.Point(8, 77)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(68, 16)
Me.Label2.TabIndex = 3
@@ -195,9 +207,10 @@ Partial Class frmGeodataNavigation
'txtLon
'
Me.txtLon.Font = New System.Drawing.Font("Tahoma", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtLon.Location = New System.Drawing.Point(167, 41)
Me.txtLon.Location = New System.Drawing.Point(11, 96)
Me.txtLon.Name = "txtLon"
Me.txtLon.Size = New System.Drawing.Size(150, 33)
Me.txtLon.ReadOnly = True
Me.txtLon.Size = New System.Drawing.Size(260, 33)
Me.txtLon.TabIndex = 1
'
'txtLat
@@ -205,7 +218,8 @@ Partial Class frmGeodataNavigation
Me.txtLat.Font = New System.Drawing.Font("Tahoma", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtLat.Location = New System.Drawing.Point(11, 41)
Me.txtLat.Name = "txtLat"
Me.txtLat.Size = New System.Drawing.Size(150, 33)
Me.txtLat.ReadOnly = True
Me.txtLat.Size = New System.Drawing.Size(260, 33)
Me.txtLat.TabIndex = 0
'
'frmGeodataNavigation
@@ -252,6 +266,6 @@ Partial Class frmGeodataNavigation
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents txtLon As System.Windows.Forms.TextBox
Friend WithEvents txtLat As System.Windows.Forms.TextBox
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents btnSave As System.Windows.Forms.Button
Friend WithEvents btnOpenMap As System.Windows.Forms.Button
End Class