NOTIFYICON QUI CLIGNOTE
PCPT
Messages postés
13272
Date d'inscription
lundi 13 décembre 2004
Statut
Membre
Dernière intervention
3 février 2018
-
3 sept. 2007 à 19:41
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 - 4 sept. 2007 à 18:01
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 - 4 sept. 2007 à 18:01
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/43956-notifyicon-qui-clignote
https://codes-sources.commentcamarche.net/source/43956-notifyicon-qui-clignote
4 sept. 2007 à 18:01
(ici pour econs : http://www.vbfrance.com/code.aspx?ID=43828)
effectivement tu n'y es pour rien, ma mémoire m'a joué un tour ;)
(fallait déjà s'en souvenir non? ^^)
4 sept. 2007 à 17:55
il y a moins d'une semaine, un timer, 4 images et voilà....
bref, mes excuses pour la mégarde éventuelle.
pas de changement néanmoins pour la conclusion
ps : levg -> ne prend évidemment pas mal ma remarque, on te souhaite tous d'apprendre et d'aimer le code. et compte sur nous pour le décortiquer quand tu le posteras, lorque ce code le demandera ;)
4 sept. 2007 à 16:21
4 sept. 2007 à 15:35
4 sept. 2007 à 15:24
4 sept. 2007 à 06:48
CodeS-SourceS est un site te partage, pas un vide bureau....
c'est pourtant pas la première fois, loin de là. je ne te préviendrai pas pour les prochaines sources.
apprend puis poste. pas l'inverse
suppression dans la soirée!
==========================
# Public Class Form1
#
# Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
# Timer2.Enabled = True
# Timer3.Enabled = False
# End Sub
#
# Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
# NotifyIcon1.Icon = My.Resources.Penguin_2
# Me.Icon = My.Resources.Penguin_2
# End Sub
#
# Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
# NotifyIcon1.Icon = My.Resources.Penguin_4
# Me.Icon = My.Resources.Penguin_4
# End Sub
#
# Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
# TextBox1.Text = ""
# End Sub
#
# Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
# OpenFileDialog1.ShowDialog()
# End Sub
#
# Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
# SaveFileDialog1.ShowDialog()
# End Sub
#
# Private Sub OpenFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk
# Dim fileContents As String
# fileContents = My.Computer.FileSystem.ReadAllText(OpenFileDialog1.FileName)
# TextBox1.Text = fileContents
# End Sub
#
# Private Sub SaveFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles SaveFileDialog1.FileOk
# My.Computer.FileSystem.WriteAllText(SaveFileDialog1.FileName, TextBox1.Text, False)
# End Sub
# End Class
3 sept. 2007 à 23:37
3 sept. 2007 à 19:41
si le traitement de texte est inutile, pourquoi ne pas juste faire une classe traitant ton notify icon?
rassure-moi, ton code ne contient pas juste un timer avec quelques icônes? le code récent qui se simplifiait en 4lignes?....