Sujet Précédent Sujet Suivant

ListView Affichage Date en format francais et certaine ligne en couleur ?

Résolu
Shindaraa Messages postés 41 Date d'inscription mercredi 22 juin 2011 Statut Membre Dernière intervention 22 juillet 2012 - 24 févr. 2012 à 15:37
Shindaraa Messages postés 41 Date d'inscription mercredi 22 juin 2011 Statut Membre Dernière intervention 22 juillet 2012 - 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>

2 réponses

Réponse 1 / 2
Shindaraa Messages postés 41 Date d'inscription mercredi 22 juin 2011 Statut Membre Dernière intervention 22 juillet 2012
27 févr. 2012 à 08:52
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...
3
Réponse 2 / 2
Shindaraa Messages postés 41 Date d'inscription mercredi 22 juin 2011 Statut Membre Dernière intervention 22 juillet 2012
27 févr. 2012 à 11:44
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
3

Discussions similaires

Comment écrire la date en lettre
cs_moh120 -
jmf0 -

10 réponses
Format de Date sous VB.NET
bernardbouree -
limpsilver -

20 réponses
Convertir un code hexadecimal en couleur
cs_rappeur -
Arthenius -

14 réponses
essayage en ligne des lunettes
asma -
jordane45 -

5 réponses
paiement sécurisé en ligne
payetonju -
Whismeril -

7 réponses
Rejoignez-nous