ListView Affichage Date en format francais et certaine ligne en couleur ? [Résolu]

Shindaraa 41 Messages postés mercredi 22 juin 2011Date d'inscription 22 juillet 2012 Dernière intervention - 24 févr. 2012 à 15:37 - Dernière réponse : Shindaraa 41 Messages postés mercredi 22 juin 2011Date d'inscription 22 juillet 2012 Dernière intervention
- 27 févr. 2012 à 11:44
Bonjour,


J'ai une listView qui affiche des alarmes entres une date de debut et de fin.
Alarmes active ou inactive. (alarmes stockai dans un fichier binaire)

Mon affichage des dates est en format anglais et je n'arrive pas a le changer même avec "ToString"
Ensuite j'ai besoin de mettre certaine ligne en rouge pour les alarmes active??

Voici mon code:
Si quelqu'un peut m'aider...
Merci.
Class MainWindow
Private ListeAlarme As ObservableCollection(Of LogAlarme) = New ObservableCollection(Of LogAlarme)
Private Sub Window_Loaded(sender As System.Object, e As System.Windows.RoutedEventArgs) Handles MyBase.Loaded, Button1.Click
Try
            ListeAlarme = ReadFileBinaryAlarme(TheFile, LogDateDebut, LogDateFin)
        Catch ex As Exception
        End Try

        Me.DataContext = ListeAlarme
    End Sub

End Class

Public Class LogAlarme

    Dim MId As Int64
    Dim MDefaut As String
    Dim MDateDebut As DateTime
    Dim MDateFin As DateTime

    Public Sub New()
        MId = 0
        MDefaut = "Guillaume"
        MDateDebut = DateTime.Now
        MDateFin = DateTime.Now
    End Sub

    Public Property id() As Int64
        Get
            Return MId
        End Get
        Set(value As Int64)
            MId = value
        End Set
    End Property

    Public Property defaut() As String
        Get
            Return MDefaut
        End Get
        Set(value As String)
            MDefaut = value
        End Set
    End Property

    Public Property apparition() As DateTime
        Get
            Return MDateDebut
        End Get
        Set(value As DateTime)
            MDateDebut = value
        End Set
    End Property

    Public Property disparition() As DateTime
        Get
            Return MDateFin
        End Get
        Set(value As DateTime)
            MDateFin = value
        End Set
    End Property

End Class


<Window x:Class="MainWindow"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Title="MainWindow" Height="400" Width="995">
    <Grid>
        <DatePicker Height="30" HorizontalAlignment="Left" Margin="103,80,0,0" Name="dp_debut" VerticalAlignment="Top" Width="194" />
        <DatePicker Height="30" HorizontalAlignment="Left" Margin="103,167,0,0" Name="dp_fin" VerticalAlignment="Top" Width="194" />
        
        <ListView Height="329" HorizontalAlignment="Left" Margin="505,18,0,0" Name="ListView1" VerticalAlignment="Top" Width="446" ItemsSource="{Binding}">
            <ListView.View>
            <GridView>
                    <GridViewColumn Header="ID" DisplayMemberBinding="{Binding Path=id}"/>
                    <GridViewColumn Header="Defaut" DisplayMemberBinding="{Binding Path=defaut}"/>
                    <GridViewColumn Header="Apparition" DisplayMemberBinding="{Binding Path=apparition}" />
                    <GridViewColumn Header="Disparition" DisplayMemberBinding="{Binding Path=disparition}"/>
            </GridView>
            </ListView.View>
        </ListView>
    </Grid>
</Window>

Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
Shindaraa 41 Messages postés mercredi 22 juin 2011Date d'inscription 22 juillet 2012 Dernière intervention - 27 févr. 2012 à 08:52
3
Merci
Bonjour,

Voici la réponses pour colorer une ligne en rouge en fonction de l’état du défaut:
<Window.Resources>
        <Style x:Key="ListeAlarme" TargetType="{x:Type ListViewItem}">
            <Style.Triggers> 
                <DataTrigger
                Binding="{Binding Path=disparition}" Value="1/1/2000 1:00:00 PM">
                    <Setter Property="Background" Value="OrangeRed" />
                    <Setter Property="Foreground" Value="White" />
                </DataTrigger>       
            </Style.Triggers>  
        </Style>
    </Window.Resources>


Il me reste a trouver pour l'affichage de la date en francais...

Merci Shindaraa 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 104 internautes ce mois-ci

Commenter la réponse de Shindaraa
Meilleure réponse
Shindaraa 41 Messages postés mercredi 22 juin 2011Date d'inscription 22 juillet 2012 Dernière intervention - 27 févr. 2012 à 11:44
3
Merci
Voici pour résoudre le probléme d'affichage,


Poste terminai



Public Class LogAlarme

    Dim MId As Int64
    Dim MDefaut As String
    Dim MDateDebut As DateTime
    Dim MDateFin As DateTime

    

    Public Sub New()
        MId = 0
        MDefaut = "Guillaume"
        MDateDebut = DateTime.Now
        MDateFin = DateTime.Now

    End Sub

    Public Property id() As Int64
        Get
            Return MId
        End Get
        Set(value As Int64)
            MId = value
        End Set
    End Property

    Public Property defaut() As String
        Get
            Return MDefaut
        End Get
        Set(value As String)
            MDefaut = value
        End Set
    End Property

    Public Property apparition() As DateTime
        Get
            Return MDateDebut
        End Get
        Set(value As DateTime)
            MDateDebut = value
        End Set
    End Property

    Public Property disparition() As DateTime
        Get
            Return MDateFin
        End Get
        Set(value As DateTime)
            MDateFin = value
        End Set
    End Property

    Public Property apparitionString() As String
        Get
            Return MDateDebut
        End Get
        Set(value As String)
            MDateDebut = value
        End Set
    End Property

    Public Property disparitionString() As String
        Get
            If (MDateFin = "1/1/2000 1:00:00 PM") Then
                Return "0"
            Else
                Return MDateFin
            End If
            Return MDateFin
        End Get
        Set(value As String)
            MDateFin = value
        End Set
    End Property

    

End Class

Merci Shindaraa 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 104 internautes ce mois-ci

Commenter la réponse de Shindaraa

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.