[VB.NET] Mise en forme d'une datagrid suivant une valeur

Version imprimable

C'est encore moi, je suis en train de chercher s'il était possible de faire une mise en forme de datagrid en fonction d'une valeur ; je m'explique : je veux afficher les interlocuteurs des sociétés clientes, seulement, il se peut que pour une raison x ou y un interlocuteur ne soit plus dans la société. Mais je veux conserver l'interlocuteur dans la table. Pour ça, j'ai ajouté une colonne 'contact' de type boolean qui "dit" si l'interlocuteur est encore dans la société ou non. Donc, si c'est vrai la ligne s'affiche normalement, sinon, elle est barrée.

Bref, si la valeur est True le Font-Overline est à False, si c'est False le Font-Overline est à True

Je pensais faire un truc de ce genre :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 <asp:TemplateColumn HeaderText="Nom"> <ItemStyle Font-Overline="<%# Not DataBinder.Eval(Container.DataItem, "Contact") %>" HorizontalAlign="Center" Width="5%"></ItemStyle> <ItemTemplate> <asp:Label Runat="server"> <%# DataBinder.Eval(Container.DataItem, "Nom") %> </asp:Label> </ItemTemplate> <EditItemTemplate> ... </EditItemTemplate> <FooterTemplate> <asp:DropDownList ID="ddlNomInsert" Runat="server"></asp:DropDownList> </FooterTemplate> </asp:TemplateColumn>
Mais j'ai un message d'erreur : Le contenu littéral ('<ItemStyle Font-Overline="') n'est pas autorisé dans un 'System.Web.UI.WebControls.TemplateColumn'.

Tout mon code est bon si je mets <ItemStyle HorizontalAlign="Center" Width="5%"></ItemStyle>

Quelqu'un a une idée ?

Merci

Je suis sous VS.NET

Dans l'ASPX :

Code:

1
2
3
4
5
6
7
8
9
10
11
<asp:DataGrid id="dg" runat="server">
    <Columns>
        <BoundColumn DataField="Champ1" Visible=false/>
        <BoundColumn DataField="Champ2" Visible=false/>
        <TemplateColumn>
            <ItemTemplate>
                <asp:Label id="lbl" runat="server" onload="ChargeLabel"/>
            </ItemTemplate>
        </TemplateColumn>
    </Columns>
</asp:DataGrid>

Dans le CS :

Code:

1
2
3
4
5
6
7
public void ChargeLabel(object o, EventArgs e)
{
    Label lbl=(Label)o;
    DataGridItem dgi=lbl.Parent.Parent;
    lbl.Text=dgi.Cells[0].Text;
    dgi.Style="Font-Overline="+dgi.Cells[1].Text;
}

C'est un peu de la bidouille mais ca marche super bien ;)

17/06/2005, 08h51
Nesmontou

Merci de ta réponse BiMouXeTTe, je vais regarder ça et je te tiens au courant (le temps que je convertisse tout ça en VB.NET).

Mais si quelqu'un a un truc moins bidouille je suis aussi preneur. :)

Bon, raté. Voilà ce que j'ai tapé :

Dans l'ascx :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
	<Columns>
		<asp:BoundColumn DataField="Nom" Visible="False"></asp:BoundColumn>
		<asp:BoundColumn DataField="Contact" Visible="False"></asp:BoundColumn>
        ...
		<asp:TemplateColumn HeaderText="Nom" ItemStyle-Width="10%">
			<ItemTemplate>
				<asp:Label Runat="server" OnLoad="Interlocuteurs_Barre">
					<%# DataBinder.Eval(Container.DataItem, "Nom") %>
				</asp:Label>
			</ItemTemplate>
			<EditItemTemplate>
				<asp:TextBox ID="txtNom" Runat="server" text='<%# DataBinder.Eval(Container.DataItem, "Nom") %>'>
				</asp:TextBox>
			</EditItemTemplate>
			<FooterTemplate>
				<asp:TextBox ID="txtNomInsert" Runat="server"></asp:TextBox>
			</FooterTemplate>
		</asp:TemplateColumn>
	</Columns>

Et dans le .vb :

Code:

1
2
3
4
5
6
    Public Sub Interlocuteurs_Barre(ByVal o As Object, ByVal e As EventArgs)
        Dim lbl As Label = CType(o, Label)
        Dim dgi As DataGridItem = lbl.Parent.Parent
        lbl.Text = dgi.Cells(0).Text
        dgi.Style.Add("Font-OverLine", dgi.Cells(1).Text)
    End Sub

Voilà, je ne sais pas si j'ai bien "traduit" du c# au vb.
Je continue à chercher, mais toute aide est la bienvenue :wink:

17/06/2005, 11h11
BiM

Ta traduction a l'air bonne, cependant dans c'est dans l'aspx et non l'ascx qu'il faut écrire.

Autre chose, remplace OnLoad par OnPreRender
17/06/2005, 11h26
Nesmontou

En fait, j'ai une page index.aspx dans laquelle je fait appel à des user controls : menu, interlocuteurs...

Je ne sais pas si je fais bien :oops: , j'ai voulu faire un peu comme en php avec des include.

Donc la manip que je souhaiterai faire est sur le user controle interlocuteurs.ascx qui est appelé dans index.aspx

Je ne sais pas si j'ai été clair :?:

J'ai trouvé ce qu'il me fallait, finalement, j'ai conservé ton idée BiMouXeTTe mais j'ai attribué une class css pour les champs et c'est OK. Je donne le code pour ceux que ça intéressent :

Dans le .acsx :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
	<Columns>
		<asp:BoundColumn DataField="Contact" Visible="False"></asp:BoundColumn>
...
		<asp:TemplateColumn HeaderText="Nom" ItemStyle-Width="10%">
			<ItemTemplate>
				<asp:Label Runat="server" OnPreRender="Interlocuteurs_Barre">
					<%# DataBinder.Eval(Container.DataItem, "Nom") %>
				</asp:Label>
			</ItemTemplate>
			<EditItemTemplate>
				<asp:TextBox ID="txtNom" Runat="server" text='<%# DataBinder.Eval(Container.DataItem, "Nom") %>'>
				</asp:TextBox>
			</EditItemTemplate>
			<FooterTemplate>
				<asp:TextBox ID="txtNomInsert" Runat="server"></asp:TextBox>
			</FooterTemplate>
		</asp:TemplateColumn>
...
	</Columns>

Dans le .vb :

Code:

1
2
3
4
5
6
7
8
    Public Sub Interlocuteurs_Barre(ByVal o As Object, ByVal e As EventArgs)
        Dim lbl As Label = CType(o, Label)
        Dim dgi As DataGridItem = lbl.Parent.Parent
        Dim barre As Boolean = Not CType(dgi.Cells(0).Text, Boolean)
        If barre Then
            lbl.CssClass = "InterlocuteurBarre"
        End If
    End Sub

Et dans le .css :

Code:

1
2
3
4
.InterlocuteurBarre
{
	text-decoration: line-through;
}

Et voilà, le tour est joué :D

Merci à toi BiMouXeTTe pour ton idée astucieuse :wink:

17/06/2005, 11h51
BiM

De rien ;)