paul meier
Grünschnabel
hi,
nach einem access2000-DB-Table-Insert führe ich folg.Schritte aus:
1.DataTable("y").Clear
2.fill_DataTable
3.bind DataTable an DataGridView '(dgv)
4.dgv_columns_add 'image_columns
5.dgv_rows_cells_image_zuweisen
der code:
Danach sieht die Columns-nummernreihenfolge im dgv v.l.n.r. so aus:
8-14,1,2
hat jemand ne idee was da falsch ist oder wie ich die Columns 1 u.2
dazu bewegen kann, ganz links im dgv zu stehen, wo sie eig.hingehören?
gruß paul!
nach einem access2000-DB-Table-Insert führe ich folg.Schritte aus:
1.DataTable("y").Clear
2.fill_DataTable
3.bind DataTable an DataGridView '(dgv)
4.dgv_columns_add 'image_columns
5.dgv_rows_cells_image_zuweisen
der code:
Code:
Public Sub dgv_columnadd()
With Form1.dgv_au
.Columns.Add(imageColumn)
.Columns(8).Width = 85
.Columns.Add(imageColumn1)
.Columns(9).Width = 85
.Columns.Add(imageColumn2)
.Columns(10).Width = 85
.Columns.Add(imageColumn3)
.Columns(11).Width = 85
.Columns.Add(imageColumn4)
.Columns(12).Width = 85
.Columns.Add(imageColumn5)
.Columns(13).Width = 85
.Columns.Add(imageColumn6)
.Columns(14).Width = 85
End With
End Sub
Public Sub setzte_datum1()
Me.dgv_au.Columns(8).HeaderText = dat1
Me.dgv_au.Columns(9).HeaderText = dat2
Me.dgv_au.Columns(10).HeaderText = dat3
Me.dgv_au.Columns(11).HeaderText = dat4
Me.dgv_au.Columns(12).HeaderText = dat5
Me.dgv_au.Columns(13).HeaderText = dat6
Me.dgv_au.Columns(14).HeaderText = dat7
End Sub
Public Sub dgv_bilder()
If dad1 = dat1 Then 'wenn db-datum gleich headertext in
1.Spalte des dgv_au ist
Form1.dgv_au.Rows(i1).Cells(8).Value =
Image.FromFile("C:\Daten\...\bg8.bmp")
Else
Form1.dgv_au.Rows(i1).Cells(8).Value =
Image.FromFile("C C:\Daten\...\bg.bmp")
End If
'usw (Cells(8) bis Cells(14)
i1 = i1 + 1
Next
End Sub
Danach sieht die Columns-nummernreihenfolge im dgv v.l.n.r. so aus:
8-14,1,2
hat jemand ne idee was da falsch ist oder wie ich die Columns 1 u.2
dazu bewegen kann, ganz links im dgv zu stehen, wo sie eig.hingehören?
gruß paul!