[Gambas-user] Populate grid with generic query
Daniel Quintero
dquinter at ...626...
Thu Feb 20 22:47:15 CET 2014
Hi Fabien, thanks for answering :D
I understood almost all code, except these two parts:
Public Sub ResultChange()
Dim hField As ResultField
* hResult = db.Find("tt")*
*"tt"* is my query?
And this:
Public Sub GridView1_Data(Row As Integer, Column As Integer)
'for fun
If Column = 0 Then *Last*.Data.Font.Bold = True 'The first column is bold
If row Mod 2 = 1 Then *Last*.Data.Background = Color.LightGray 'one
line on two is gray
'**
hResult.MoveTo(Row)
*Last*.Data.Text = hResult[GridView1.Columns[
Column].Text]
End
*Last* is a cell?
Thanks, as always, you are a person willing to help :)
*_________________________*
*Lic. Daniel Quintero Rojas*
*¡Saludos desde México!________*
On Thu, Feb 20, 2014 at 2:45 PM, Fabien Bodard <gambas.fr at ...626...> wrote:
> You must to store the query result as private on the form
>
>
> then
>
> ' Gambas class file
>
> Private hResult As Result
>
> Public Sub _new()
>
> Connections["Connection1"].Open
> ResultChange
>
> End
>
> Public Sub ResultChange()
>
> Dim hField As ResultField
> hResult = db.Find("tt")
>
> For Each hField In hResult.Fields
> Inc GridView1.Columns.Count
> GridView1.Columns[GridView1.Columns.Max].Text = hField.Name
> Next
>
> GridView1.Rows.Count = hResult.Count
> GridView1.Refresh
>
> End
>
> Public Sub GridView1_Data(Row As Integer, Column As Integer)
> 'for fun
>
> If Column = 0 Then Last.Data.Font.Bold = True 'The first column is bold
> If row Mod 2 = 1 Then Last.Data.Background = Color.LightGray 'one
> line on two is gray
> '**
>
> hResult.MoveTo(Row)
>
> Last.Data.Text = hResult[GridView1.Columns[Column].Text]
>
> End
>
> Public Sub ComboBox1_Click()
>
> 'do your stuf on query
> ResultChange
> End
>
> 2014-02-20 21:11 GMT+01:00 Daniel Quintero <dquinter at ...626...>:
> > Hi all
> >
> > I've a beginer question:
> >
> > I have a simple query:
> >
> > select [list of fields]
> > from [table]
> > where [conditions]
> >
> > How can I populate a grid?
> >
> > My problem is that [list of fields], [table] and [conditions] can change
> > depending on the values of various ComboBoxes
> >
> > Thanks in advance
> >
> > :)
> >
> > *_________________________*
> > *Lic. Daniel Quintero Rojas*
> >
> > *¡Saludos desde México!________*
> >
> ------------------------------------------------------------------------------
> > Managing the Performance of Cloud-Based Applications
> > Take advantage of what the Cloud has to offer - Avoid Common Pitfalls.
> > Read the Whitepaper.
> >
> http://pubads.g.doubleclick.net/gampad/clk?id=121054471&iu=/4140/ostg.clktrk
> > _______________________________________________
> > Gambas-user mailing list
> > Gambas-user at lists.sourceforge.net
> > https://lists.sourceforge.net/lists/listinfo/gambas-user
>
>
>
> --
> Fabien Bodard
>
>
> ------------------------------------------------------------------------------
> Managing the Performance of Cloud-Based Applications
> Take advantage of what the Cloud has to offer - Avoid Common Pitfalls.
> Read the Whitepaper.
>
> http://pubads.g.doubleclick.net/gampad/clk?id=121054471&iu=/4140/ostg.clktrk
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>
More information about the User
mailing list