Page 1 sur 4
Tiny Slide Show 1.1
Publié : mer. 31/déc./2014 17:39
par Ar-S
Hello,
Je vous invite découvrir mon petit Tiny Slide Show (défilé d'images).
Il me sert d'économiseur d’écran. L’écran graphique est un Canvas. Décidément j'adore ce gadget.
TÉLÉCHARGEMENT
Version Dual Screen compatible http://pb.ldvmultimedia.com/sildeshow1.1-dualscreen.exe
-- Evolution --
V1.1
- Ajout Effet négatif
- Ajout d'icones dans le menu pour une meilleur lisibilité
V1.0
- Correction du fade out (fondue)
- Refonte du popup menu
- Ajout d'effets noir & blanc / sepia ou aléatoire
- Possibilité de modifier la durée de la vitesse des transitions
V0.9
- Correction de bugs
- Réécriture complète des routines du diaporama, lecture casi instantanée des images. (Utile pour les gros dossiers de photos).
V0.8
- Accélération de la préparation du slideshow
V0.7
- Ajout d'une icone à l'exe
- Ajout d'un menu "don" ^^
- Ajout du contenu du menu "A Propos"
- bugfixe : Taille des bordures pour certaines images extrèmement large et peu haute (raven si tu veux retester)
- BugFix : Changement de dossier qui se cumulait avec le précédent
V0.6
- Ajout des noms de fichiers pendant le chargement pour plus de clarté
- Centrage des textes
- Correction affichage en dual screen
V0.5 + Ajout de la gestion de 2 écrans
- Ajout d'un message pendant le chargement du diaporama
V0.4
- ajout de la possibilité de changer de dossier via le clic droit
- création d'un fichier pref pour se souvenir du dernier dossier utilisé
- possibilité de supprimer ce fichier pref.
V0.3
- Bordure des images
- Clic droit pour faire apparaitre le menu qui donne la possibilité de changer de dossier ou de quitter
V0.1
- Les images sont affichées en boucle les unes après les autres
- Redimensionnement des images auto
- FadeOut pour faire disparaitre les images
- image toujours cadrée dans le bureau mais affichée en position aléatoire X/Y
- Échappe pour quitter
Re: Tiny Slide Show (Alpha) 0.3
Publié : sam. 03/janv./2015 13:27
par Ar-S
V0.3
- Bordure des images
- Clic droit pour faire apparaitre le menu qui donne la possibilité de changer de dossier ou de quitter
Re: Tiny Slide Show (Alpha) 0.3
Publié : sam. 03/janv./2015 13:36
par falsam
Fonctionne parfaitement bien:)
Puis je abuser en te demandant de gérer le multi-moniteurs ? (C'est mon cas)
Petite contrainte : Une image ne doit pas chevaucher deux moniteurs.
Merci Ar-S
Re: Tiny Slide Show (Alpha) 0.3
Publié : sam. 03/janv./2015 13:38
par Ar-S
Je veux bien tester mais j'ai pas 2 écrans de branchés sur mon zouzou donc tu me diras.
Re: Tiny Slide Show (Alpha) 0.3
Publié : sam. 03/janv./2015 13:41
par falsam
Ar-S a écrit :Je veux bien tester mais j'ai pas 2 écrans de branchés sur mon zouzou donc tu me diras.
Pas de souci
Re: Tiny Slide Show (Alpha) 0.3
Publié : sam. 03/janv./2015 14:51
par Ar-S
1ere question
Peut-on ouvrir une seule fenetre sur les 2 ecrans, à savoir un truc du genre
openwindow(0,0,0,LargeurDestop(0)+LargeurDestop(1), HauteurDesktop(0),0)
Re: Tiny Slide Show (Alpha) 0.3
Publié : sam. 03/janv./2015 15:11
par falsam
Ar-S a écrit :Peut-on ouvrir une seule fenetre sur les 2 ecrans
Oui tu peux. La hauteur de la fenêtre devrait être celle du desktop le plus haut.
Re: Tiny Slide Show (Alpha) 0.3
Publié : sam. 03/janv./2015 15:25
par Ar-S
Tu peux me dire si ça ça fonctionne bien:
Code : Tout sélectionner
Macro G
Global
EndMacro
Macro DebugInClipboard (m1)
Debug m1
SetClipboardText(m1)
EndMacro
G NbrBureau = ExamineDesktops()
Debug Str(NbrBureau) + " bureau(s)"
G W = DesktopWidth(0), H = DesktopHeight(0)
G Wmax = W/2, Hmax = H/2, PosX, PosY
If NbrBureau = 2
G W2 = DesktopWidth(1), H2 = DesktopHeight(1)
G Wmax2 = W2/2, Hmax2 = H2/2, PosX2, PosY2
Wfull = W + W2
If H>H2 : Hfull = H : Else : Hfull = H2 : EndIf
Else
Wfull = W
EndIf
DebugInClipboard("Wfull : " + Wfull + " x " + H)
Re: Tiny Slide Show (Alpha) 0.3
Publié : sam. 03/janv./2015 15:28
par falsam
Debug
2 bureau(s)
Wfull : 3360 x 900
Re: Tiny Slide Show (Alpha) 0.3
Publié : sam. 03/janv./2015 17:46
par Ar-S
Ajoute ça au code précédent et dis moi si tout s'ouvre bien.
Je file ce soir donc je poursuivrais plus tard.
Code : Tout sélectionner
If OpenWindow(0,0,0,Wfull,H,"test bi ecran", #PB_Window_SystemMenu)
Debug "ok"
Repeat
Ev = WaitWindowEvent(30)
Until Ev = #PB_Event_CloseWindow
EndIf
Re: Tiny Slide Show (Alpha) 0.3
Publié : sam. 03/janv./2015 23:13
par falsam
la fenêtre s'ouvre bien sur toute la largeur des deux moniteurs mais pas sur la largeur du moniteur le plus grand.
j'ai modifié
Code : Tout sélectionner
OpenWindow(0,0,0,Wfull,H,"test bi ecran", #PB_Window_SystemMenu)
par
Code : Tout sélectionner
OpenWindow(0,0,0,Wfull,Hfull,"test bi ecran", #PB_Window_SystemMenu)
Je pense que c'est ce que tu as voulu faire
Re: Tiny Slide Show (Alpha) 0.3
Publié : dim. 04/janv./2015 6:43
par microdevweb
Bonjour Ars,
Je teste ton exe, il me demande un dossier je sélectionne le bureau mais rien ne se passe?
Re: Tiny Slide Show (Alpha) 0.3
Publié : dim. 04/janv./2015 7:39
par Micheao
Bonjour Ar-S
j'ai testé ton programme
dommage qu'il centre pas les images quand elles sont petites il les mets soit à gauche ou à droite mais pas au centre .
Re: Tiny Slide Show (Alpha) 0.3
Publié : dim. 04/janv./2015 11:39
par Ar-S
@microdevweb Il y a des images sur ton bureau ?
@Micheao : Il les positionne de façon aléatoire, c'est voulu. (je verrai peut être à ajouter cette option au menu.)
@Falsam
C'est étrange ça. La résolution que tu as copiée est bien le cumule de tes 2 largeurs d'écran ? (3360)
Re: Tiny Slide Show (Alpha) 0.3
Publié : dim. 04/janv./2015 13:41
par microdevweb
Non