Public Sub gv_Data(x As Integer, y As Integer) ' Fills the GridView with the querry results Dim i As Integer Dim szine As String If ((x Mod 2) = 0) Then szine = &E5E5E5& Else szine = &FFFFFF& Endif
Select Case y Case 0 gV.Data.Text = Keress.Name(x) gV.Data.BackGround = szine Case 1 gV.Data.Text = Keress.Volm(x) gV.Data.BackGround = szine Case 2 gV.Data.Text = Keress.Road(x) gV.Data.BackGround = szine Case 3 gV.Data.Text = Keress.Size(x) gV.Data.BackGround = szine Case 4 gV.Data.Text = Keress.When(x) gV.Data.BackGround = szine End Select End Tell me just where to put, and how. I've tried many versions but always resulting with Stack overflow error. Thanks! Csaba 2012/1/22, Benoît Minisini <[email protected]>: > Le 21/01/2012 17:48, M. Cs. a écrit : >> Is there a way to force a GridView control with 4 columns to adjust >> the column's width to the content's width? >> >> How would it work with a control which expands or stretches itself >> during maximizing the FMain? >> >> Thanks! >> > > Normally you have to set the column width to -1 to make it adjust its > contents. But I'm not sure that it works with GridView using the Data event. > > Just test and tell me. :-) > > -- > Benoît Minisini > > ------------------------------------------------------------------------------ > Try before you buy = See our experts in action! > The most comprehensive online learning library for Microsoft developers > is just $99.99! Visual Studio, SharePoint, SQL - plus HTML5, CSS3, MVC3, > Metro Style Apps, more. Free future releases when you subscribe now! > http://p.sf.net/sfu/learndevnow-dev2 > _______________________________________________ > Gambas-user mailing list > [email protected] > https://lists.sourceforge.net/lists/listinfo/gambas-user > ------------------------------------------------------------------------------ Try before you buy = See our experts in action! The most comprehensive online learning library for Microsoft developers is just $99.99! Visual Studio, SharePoint, SQL - plus HTML5, CSS3, MVC3, Metro Style Apps, more. Free future releases when you subscribe now! http://p.sf.net/sfu/learndevnow-dev2 _______________________________________________ Gambas-user mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/gambas-user
