SCREENPRO - CHANGER DE FOND D'ÉCRAN AUTOMATIQUEMENT
Adn56
Messages postés
1172
Date d'inscription
jeudi 24 mai 2007
Statut
Membre
Dernière intervention
28 septembre 2013
-
5 août 2010 à 20:27
Adn56 Messages postés 1172 Date d'inscription jeudi 24 mai 2007 Statut Membre Dernière intervention 28 septembre 2013 - 26 août 2010 à 12:36
Adn56 Messages postés 1172 Date d'inscription jeudi 24 mai 2007 Statut Membre Dernière intervention 28 septembre 2013 - 26 août 2010 à 12:36
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/52141-screenpro-changer-de-fond-d-ecran-automatiquement
https://codes-sources.commentcamarche.net/source/52141-screenpro-changer-de-fond-d-ecran-automatiquement
26 août 2010 à 12:36
Un peu comme pour l'écran de vieille, mais pour le bureau. voili voilou @++
26 août 2010 à 10:09
car si le fichier n'existe pas, il est crée.
ADN56, comment ça native sous Windows ?
@+
6 août 2010 à 13:56
Quel est le soucis avec l'édition du point exe ? ton texte ne protége rien du tout ?
Ex de try catch sur l'ouverture d'un fichier :
Public Function load(ByVal fichier As String) As Boolean
Dim myFileStream As Stream = Nothing
Try
myFileStream = File.OpenRead(fichier)
Dim deserializer As New BinaryFormatter()
Dim lecture As New ce_que_tu_veux
lecture = CType(deserializer.Deserialize(myFileStream), ce_que_tu_veux)
myFileStream.Close()
Return True
Catch e As Exception
Affiche_erreur("erreur d'accés au fichier", e.Message)
Return False
Finally
If Not myFileStream Is Nothing Then myFileStream.Close()
End Try
End Function
@ plus
6 août 2010 à 11:37
y'a deux fois Randomize() on ne sais jamais...
Des fois je suis tombé sur des fonctions dans Form_Load,
je mettais Randomize() et à chaque lancement du programme le nombre généré
était à peu près le même...
Au début, j'ai mis on error car une erreur apparaissait
quand le fichier n'existait pas. Celà permet que si une erreur
se produit, le programme est quitté et il ne reste pas actif
dans Windows.
Avec les fichiers png, ça ne marche pas, l'écran devient tout
noir ou tout blanc selon la couleur de fond je pense.
J'ai pas encore testé avec gif.
On doit lancer le programme deux fois que pour que les
deux images soient sauvegardées dans le fichier (2 lignes).
Le titre de la fenêtre est établi deux fois pour protéger (un peu ?)
le fichier exe, qu'il soit un peu plus dur de l'éditer,
je pense que le titre de la fenêtre établi par défaut puis
dans le code sont à deux endroits différents.
Merci pour tes commentaires @+
5 août 2010 à 20:27
1-pourquoi deux fois Randomize() ?
2-On error goto erreur, la quelle ? juste end, le soft se ferme à l'arrache s'en que l'user ne sache pourquoi (pas glop) un try catch et un me.close serait plus net.
3-pourquoi que bmp (le plus lourd) et jpg ? png, gif etc... ?
4-Sur le laod form : Me.Text &" par Raffika" '' Titre de la fenêtre, puis If Me.Text "ScreenPRO par Raffika" Then, voila pourquoi il faut le lancer deux fois ? étrange un bool ou autre pourrais faire l'affaire, non ?
5-Si le fichier 'ancien-back.txt' n'est pas présent alors le créer , sinon -> erreur, ben non pas erreur juste quitter à l'arrache CF point 2
6-Je ne vois pas comment tu change le texte : Me.Text &= " par Raffika" '' Titre de la fenêtre
(bon pas testé, juste lu le code de la form1, mais j'en vois pas d'autre ^^)
PS : Vire les .ico que tu n'utilse pas ;-)
Bonne continuation et bonne prog. @dn