1 | |
Auteur | Messages |
---|---|
Admin | #1 Posté le 27/12/2009 à 23:02:00 |
C'etait quand même bien pratique sous win$ d'avoir des chekbox ou des buttons à l'intérieur d'une gridview. La gridview aujourd'hui ne contient que du texte et une image par cellule. Peut être qu'une ame charitable pourra nous concocter un composant "Gridview container" .... à suivre ! demo ici : | |
Admin | #2 Posté le 27/12/2009 à 23:03:00 |
t'en dit quoi ? le code : Public Sub Form_Open() Dim hPicChk As New Picture Dim hPicUnChk As Picture Dim i As Integer hPicChk.Resize(20, 20) hPicChk.Fill(Color.White) hPicUnChk = hPicChk.Copy() Draw.Begin(hPicChk) Draw.Style.Check(0, 0, 20, 20, False) Draw.End Draw.Begin(hPicUnChk) Draw.Style.Check(0, 0, 20, 20, True) Draw.End GridView1.Columns.Count = 5 GridView1.Rows.Count = 100 GridView1.Columns[0].Width = 25 GridView1.Columns[0].Text = "R" GridView1.Columns[1].Width = 25 GridView1.Columns[1].Text = "V" GridView1.Columns[2].Width = 25 GridView1.Columns[2].Text = "P" GridView1.Columns[3].Text = "Produit" GridView1.Columns[3].Width = 300 GridView1.Columns[4].Text = "Marque" For i = 0 To 99 GridView1[i, 0].Picture = IIf(CBool(Int(Rnd(0, 2))), hPicChk, hPicUnChk) GridView1[i, 1].Picture = IIf(CBool(Int(Rnd(0, 2))), hPicChk, hPicUnChk) GridView1[i, 2].Picture = IIf(CBool(Int(Rnd(0, 2))), hPicChk, hPicUnChk) Next End Comme on dit, Gambas, il y a moins bien, mais c'est payant ! | |
Admin | #3 Posté le 27/12/2009 à 23:03:00 |
Il est décidément trop fort ce gambix et carrément incollable. Tu m'as "scotché" avec "le coup de l'image en forme de checkbox" ! Merci pour l'info ! Par contre j'ai lemessage d'erreur : Unknow 'style' in class draw avec arret sur la ligne : Draw.Style.Check(0, 0, 20, 20, FALSE) | |
Admin | #4 Posté le 27/12/2009 à 23:04:00 |
C'est du Gambas3, c'est peut etre pour ca que ca coince en gambas2... Va falloir t'y mettre a ce gambas3 ... | |
Admin | #5 Posté le 27/12/2009 à 23:04:00 |
exacte :/ désolé ... oui va falloir s'y pencher ... et moi que je ponde des package uptime pour ubuntu Comme on dit, Gambas, il y a moins bien, mais c'est payant ! | |
1 |