Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

ALBUM PHOTO


Information sur la source

Description

Ce petit programme comme son nom l'indique, permet de se faire un album photo. En effet, il permet de sélectionner des photos et d'y mettre des commentaires, il enregistre le tout dans un fichier typé ( dans lequel on met les chemins d'accès aux photos ainsi que leur commentaire ).
De plus il posède un système de slideshow ( un diaporama ) pour pouvoir voir son album.
Le programme n'est pas complet, une mise à jour sera bientot disponible, dans laquelle un menu options va être ajouté, comme le réglage du timer pour le diaporama, le renomage automatique des photos, le déplacement des photos d'un album dans un même dossier, la mise en place d'un dossier dit de sauvegarde dans l'optique d'être gravé sur un cd  ( si je veux pouvoir lire avec le programme l'album, il faut que je change le fichier de sauvegarde puisqu'il garde en mémoire l'emplacement des photos sur le DD et comme la lettre du cd-rom peut changé,  ce système ne convient plus )
 

Conclusion

J'ai utlisisé le composant GraphicEx pour pouvoir lire les jpeg.
Pour la liste des bugs, quand on clic deux fois sur l'emplacement théorique où se trouve l'image et qu'il n'y en a pas, ba cela met quand même le pleine écran.
A la fin du diaporama, les infos dans le statusbar ne sont pas corrects.
Je mets cette sources non fini pour avoir des commentaires afin la finalisation du programme, afin d'avoir d'autres avis ue le mien sur ce qu'il pourrait être interressant de faire, alors laissé des commentaire et attendez la mise à jour avant de noter :p
 

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
  • Album_Photo.dprTélécharger ce fichier [Réservé aux membres club]Voir ce fichier535 octets
  • commentaire.bmpTélécharger ce fichier [Réservé aux membres club]Voir ce fichier5 318 octets
  • GraphicColor.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier162 930 octets
  • GraphicCompression.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier83 911 octets
  • GraphicConfiguration.incTélécharger ce fichier [Réservé aux membres club]2 856 octets
  • GraphicEx.chmTélécharger ce fichier [Réservé aux membres club]226 199 octets
  • GraphicEx.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier295 832 octets
  • GraphicStrings.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier5 530 octets
  • GraphicStringsDE.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier6 046 octets
  • GraphicStringsFR.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier6 078 octets
  • GraphicStringsRU.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier5 174 octets
  • JCAPIMIN.OBJTélécharger ce fichier [Réservé aux membres club]1 520 octets
  • JCAPISTD.OBJTélécharger ce fichier [Réservé aux membres club]1 159 octets
  • JCCOEFCT.OBJTélécharger ce fichier [Réservé aux membres club]2 750 octets
  • JCCOLOR.OBJTélécharger ce fichier [Réservé aux membres club]2 329 octets
  • JCDCTMGR.OBJTélécharger ce fichier [Réservé aux membres club]2 337 octets
  • JCHUFF.OBJTélécharger ce fichier [Réservé aux membres club]3 751 octets
  • JCINIT.OBJTélécharger ce fichier [Réservé aux membres club]1 015 octets
  • JCMAINCT.OBJTélécharger ce fichier [Réservé aux membres club]930 octets
  • JCMARKER.OBJTélécharger ce fichier [Réservé aux membres club]2 659 octets
  • JCMASTER.OBJTélécharger ce fichier [Réservé aux membres club]3 471 octets
  • JCOMAPI.OBJTélécharger ce fichier [Réservé aux membres club]765 octets
  • JCPARAM.OBJTélécharger ce fichier [Réservé aux membres club]4 324 octets
  • JCPHUFF.OBJTélécharger ce fichier [Réservé aux membres club]3 575 octets
  • JCPREPCT.OBJTélécharger ce fichier [Réservé aux membres club]1 980 octets
  • JCSAMPLE.OBJTélécharger ce fichier [Réservé aux membres club]2 991 octets
  • JCTRANS.OBJTélécharger ce fichier [Réservé aux membres club]2 375 octets
  • JDAPIMIN.OBJTélécharger ce fichier [Réservé aux membres club]2 347 octets
  • JDAPISTD.OBJTélécharger ce fichier [Réservé aux membres club]1 658 octets
  • JDATADST.OBJTélécharger ce fichier [Réservé aux membres club]865 octets
  • JDATASRC.OBJTélécharger ce fichier [Réservé aux membres club]884 octets
  • JDCOEFCT.OBJTélécharger ce fichier [Réservé aux membres club]4 954 octets
  • JDCOLOR.OBJTélécharger ce fichier [Réservé aux membres club]2 094 octets
  • JDDCTMGR.OBJTélécharger ce fichier [Réservé aux membres club]1 702 octets
  • JDHUFF.OBJTélécharger ce fichier [Réservé aux membres club]3 601 octets
  • JDINPUT.OBJTélécharger ce fichier [Réservé aux membres club]2 005 octets
  • JDMAINCT.OBJTélécharger ce fichier [Réservé aux membres club]2 350 octets
  • JDMARKER.OBJTélécharger ce fichier [Réservé aux membres club]7 865 octets
  • JDMASTER.OBJTélécharger ce fichier [Réservé aux membres club]2 838 octets
  • JDMERGE.OBJTélécharger ce fichier [Réservé aux membres club]2 142 octets
  • JDPHUFF.OBJTélécharger ce fichier [Réservé aux membres club]4 491 octets
  • JDPOSTCT.OBJTélécharger ce fichier [Réservé aux membres club]1 363 octets
  • JDSAMPLE.OBJTélécharger ce fichier [Réservé aux membres club]2 449 octets
  • JDTRANS.OBJTélécharger ce fichier [Réservé aux membres club]978 octets
  • JERROR.OBJTélécharger ce fichier [Réservé aux membres club]6 422 octets
  • JFDCTFLT.OBJTélécharger ce fichier [Réservé aux membres club]1 435 octets
  • JFDCTFST.OBJTélécharger ce fichier [Réservé aux membres club]1 197 octets
  • JFDCTINT.OBJTélécharger ce fichier [Réservé aux membres club]1 573 octets
  • JIDCTFLT.OBJTélécharger ce fichier [Réservé aux membres club]1 760 octets
  • JIDCTFST.OBJTélécharger ce fichier [Réservé aux membres club]1 621 octets
  • JIDCTINT.OBJTélécharger ce fichier [Réservé aux membres club]2 078 octets
  • JIDCTRED.OBJTélécharger ce fichier [Réservé aux membres club]2 081 octets
  • JMEMMGR.OBJTélécharger ce fichier [Réservé aux membres club]4 006 octets
  • JMEMNOBS.OBJTélécharger ce fichier [Réservé aux membres club]874 octets
  • JPEGTRAN.OBJTélécharger ce fichier [Réservé aux membres club]4 125 octets
  • JPG.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier46 213 octets
  • JQUANT1.OBJTélécharger ce fichier [Réservé aux membres club]4 096 octets
  • JQUANT2.OBJTélécharger ce fichier [Réservé aux membres club]5 518 octets
  • JUTILS.OBJTélécharger ce fichier [Réservé aux membres club]1 100 octets
  • Logisima.icoTélécharger ce fichier [Réservé aux membres club]Voir ce fichier766 octets
  • Main.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier9 819 octets
  • MZLib.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier219 249 octets
  • pr,c,dent.bmpTélécharger ce fichier [Réservé aux membres club]Voir ce fichier3 278 octets
  • Properties.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier5 598 octets
  • suivant.bmpTélécharger ce fichier [Réservé aux membres club]Voir ce fichier3 278 octets
  • UnitFormPrincipale.dfmTélécharger ce fichier [Réservé aux membres club]20 897 octets
  • UnitFormPrincipale.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier7 976 octets
  • UnitNouvelAlbum.dfmTélécharger ce fichier [Réservé aux membres club]2 575 octets
  • UnitNouvelAlbum.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier724 octets
  • UnitPleineEcran.dfmTélécharger ce fichier [Réservé aux membres club]1 341 octets
  • UnitPleineEcran.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier1 877 octets
  • UnitVariables.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier657 octets

Télécharger le zip

Commentaires et avis

signaler à un administrateur
Commentaire de ni69 le 05/02/2005 19:32:55

Alors voilà mes commentaires :

I. Fais attention à la position de tes forms ! (elles sont en dehors de l'écran chez moi..........)
Si tu veux arranger ça, mets "Position := poDesktopCenter" dans l'inspecteur d'objets pour la form principale et pour la form de nouvel album...

II. remplace Application.Terminate par Close;

III. Tu peux aussi remplacer :
     OpenPictureDialog.Execute;
   If openpicturedialog.FileName<>'' then begin
      par :
If openDialog.Execute then begin
      c'est plus court....

IV. et encore :
concat('Photo ',inttostr(unitvariables.CompteurPhoto),' / ',inttostr(unitvariables.PhotMax));
      par :
Format('Photo %d / %d', [unitvariables.CompteurPhoto, unitvariables.PhotMax]);
      ( ça fera plaisir à JulioDelphi ;) ! )

V. La procedure TFormPleineEcran.FormDblClick(Sender: TObject); n'a aucune raison de se produire étant donné que l'image est devant le fond de la form, donc quand on Double-Clique, c'est sur l'image et pas sur la Form... Mets donc le Close dans TFormPleineEcran.Image1DblClick(Sender: TObject);

VI. Ce qui serait pas mal, c'est que quand on est au début de la série d'images, en cliquant sur "précédent", on retombe sur la dernière et réciproquement...

VII. Empêche le diaporama quand aucune image n'est chargée...

VIII. Et svp rajoute un S à en courS : "il n'y a pas d'album en cour"...

Sinon c'est une bonne idée de prog ! A compléter ! ;)

Voilà !
@+
Nico

signaler à un administrateur
Commentaire de sim51 le 06/02/2005 12:49:06

Au bout de 128 affichages de cette pages, enfin un commentaire. Merci beaucoup Ni69 !!!!
Comme je l'ai dit je vais faire une mise à jour d'ici peu de temps, dans laquelle toutes tes propositions y seront car elles me sembent correctes (  tu peux m'expliquer le IV Format ....??).
Mais tout ce que tu me dis c'est par rapport au code ce qui est bien, mais tu n'aurais des idées pour complèter ce programme ( car j'aimerai faire quelque chose de complet ).
En tout cas MERCI MERCI de t'interresser à mon prog
A++
Sim51

signaler à un administrateur
Commentaire de ni69 le 09/02/2005 12:34:37

La commande :
Concat('Photo ' , inttostr unitvariables.CompteurPhoto) , ' / ' , inttostr(unitvariables.PhotMax));
Revient à faire :
'Photo ' + inttostr(unitvariables.CompteurPhoto) + ' / '  + inttostr(unitvariables.PhotMax));
Mais aussi à :
Format('Photo %d / %d', [unitvariables.CompteurPhoto, unitvariables.PhotMax]);

La fonction Format renvoie une chaîne à partir de plusieurs données passées en params entre des [ ] (string, int, hexa.....)
%d : décimal (ça marche donc avec un integer)
%s : string
%x : hexa
[...] Pour en savoir plus, va dans l'aide de delphi

Le temps d'exécution de Format est largement inférieur à Concat ou a la méthode des +, donc mieux vaut l'utiliser !

Si tu veux vraiment faire quelque chose de complet, tu peux rajouter la gestion des vidéos, l'édition des photos, la compression en jpg, les captures d'écran...
@+
Nico

signaler à un administrateur
Commentaire de tahab le 27/04/2006 15:24:30

Merci pour ce programme, j'ai qques commentaires:
- comment puis-je supprimer une image de l'album
- pour annuler l'action d'enregistrement et lorsqu'on clique sur le bouton "Annuler"  le programme nous affiche un message d'erreur

merci d'avance pour ton aide

signaler à un administrateur
Commentaire de LeGuepard le 15/12/2006 23:18:29

Salut,

Je viens de télécharger ta source pour voir un peu ce que ca donnait. Lorsque je lance ton soft, tout naturellement je fais "Fichier->Nouvel album" pour en créer un nouveau et là... Super Plantage de ton programme, plus rien ne répond, impossible de le quitter même, comme si la fenêtre principal avait perdu sa modalité au profit d'une autre qui n'apparait pas à l'écran.
Est-ce du au problème de positionnement de tes Form comme en parlait NI69? Non lo so! Mais si tu pouvais regarder à ce petit bug, ce serait sympa pour les autres qui s'intéresseraient à ta source.

Merci.

Julien.

Ajouter un commentaire



Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,312 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.