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 !

ÉDITEUR D'IMAGES


Information sur la source

Catégorie :Graphique Niveau : Débutant Date de création : 03/01/2003 Date de mise à jour : 03/01/2003 04:03:16 Vu / téléchargé: 4 166 / 669

Note :
9 / 10 - par 1 personne
9,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (7)
Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale
Ceci est un petit programme d'édition d'images (saver en jpeg,bmp). Il possède les fonctions habituelles de dessin(sauf loupe et undo(pour la loupe, si quelqun peut m'aider...)). Ce prog possède aussi des fonctions d'effets sur image(inverser les couleurs, filtres etc...) J'en ai traduit 3 ou 4 du prog d'effets vb de black wizzard. Merci de laisser vos commentaires.
 

Source

Conclusion

Je vais le continuer car j'ai l'intention de le publier sur internet alors si vous avez des conseils ou trucs, merci de me laisser des commentaires.
ps:J'ai fait le prog en anglais car, comme cité en haut, je voudrais le publier un jour
pps:ce prog utilise le composant TXpmenu, je l'ai inclu dans le zip. Pour l'installer, faites
-Composant
  -installer un  composant
     -dans le champ "nom d'unité", indiquez le fichier xpmenu.pas
 

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 !
  •   Star
    • effects.~pasTélécharger ce fichier [Réservé aux membres club]8 730 octets
    • effects.dcuTélécharger ce fichier [Réservé aux membres club]7 203 octets
    • effects.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier8 730 octets
    • func.~pasTélécharger ce fichier [Réservé aux membres club]888 octets
    • func.dcuTélécharger ce fichier [Réservé aux membres club]1 986 octets
    • func.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier1 783 octets
    • mainico.icoTélécharger ce fichier [Réservé aux membres club]Voir ce fichier766 octets
    • Star.~dprTélécharger ce fichier [Réservé aux membres club]673 octets
    • Star.cfgTélécharger ce fichier [Réservé aux membres club]Voir ce fichier754 octets
    • Star.dofTélécharger ce fichier [Réservé aux membres club]Voir ce fichier1 794 octets
    • Star.dprTélécharger ce fichier [Réservé aux membres club]Voir ce fichier750 octets
    • Star.resTélécharger ce fichier [Réservé aux membres club]876 octets
    • ufabout.~dfmTélécharger ce fichier [Réservé aux membres club]12 944 octets
    • ufabout.~pasTélécharger ce fichier [Réservé aux membres club]905 octets
    • ufabout.dcuTélécharger ce fichier [Réservé aux membres club]4 029 octets
    • ufabout.dfmTélécharger ce fichier [Réservé aux membres club]21 859 octets
    • ufabout.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier868 octets
    • ufeffects.~dfmTélécharger ce fichier [Réservé aux membres club]32 285 octets
    • ufeffects.~pasTélécharger ce fichier [Réservé aux membres club]3 300 octets
    • ufeffects.dcuTélécharger ce fichier [Réservé aux membres club]7 021 octets
    • ufeffects.dfmTélécharger ce fichier [Réservé aux membres club]32 285 octets
    • ufeffects.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier3 300 octets
    • ufmain.~dfmTélécharger ce fichier [Réservé aux membres club]34 471 octets
    • ufmain.~pasTélécharger ce fichier [Réservé aux membres club]11 448 octets
    • ufmain.dcuTélécharger ce fichier [Réservé aux membres club]14 942 octets
    • ufmain.dfmTélécharger ce fichier [Réservé aux membres club]34 471 octets
    • ufmain.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier11 448 octets
    • ufnew.~dfmTélécharger ce fichier [Réservé aux membres club]3 695 octets
    • ufnew.~pasTélécharger ce fichier [Réservé aux membres club]1 217 octets
    • ufnew.dcuTélécharger ce fichier [Réservé aux membres club]4 922 octets
    • ufnew.dfmTélécharger ce fichier [Réservé aux membres club]2 986 octets
    • ufnew.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier1 371 octets
    • uftext.~dfmTélécharger ce fichier [Réservé aux membres club]3 006 octets
    • uftext.~pasTélécharger ce fichier [Réservé aux membres club]1 692 octets
    • uftext.dcuTélécharger ce fichier [Réservé aux membres club]5 507 octets
    • uftext.dfmTélécharger ce fichier [Réservé aux membres club]3 006 octets
    • uftext.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier1 692 octets
    • uftool.~dfmTélécharger ce fichier [Réservé aux membres club]46 443 octets
    • uftool.~pasTélécharger ce fichier [Réservé aux membres club]4 219 octets
    • uftool.dcuTélécharger ce fichier [Réservé aux membres club]8 456 octets
    • uftool.dfmTélécharger ce fichier [Réservé aux membres club]46 309 octets
    • uftool.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier4 019 octets
    • ufzoom.~dfmTélécharger ce fichier [Réservé aux membres club]327 octets
    • ufzoom.~pasTélécharger ce fichier [Réservé aux membres club]314 octets
    • ufzoom.dcuTélécharger ce fichier [Réservé aux membres club]3 242 octets
    • ufzoom.dfmTélécharger ce fichier [Réservé aux membres club]489 octets
    • ufzoom.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier349 octets
  • XPMENU.PASTélécharger ce fichier [Réservé aux membres club]Voir ce fichier55 863 octets

Télécharger le zip

Commentaires et avis

signaler à un administrateur
Commentaire de bgK le 03/01/2003 11:40:55

Pas mal ton prog !!! Par contre, il manque un peu d'optimisation. Par exemple, pour la fonction invert, il faut utiliser TBitmap.ScanLine, qui est beaucoup plus rapide que GetPixel(x,y). Il est plus long pour le CPU de faire r := 255 - r; que r := not r;, ce qui donne le même résultat. Voici ta fonction un peu optimisée :

procedure invert(buffer:TBitmap);
Type
TRGBTripleArray = array[Word] of TRGBTriple;
  PRGBTripleArray = ^TRGBTripleArray;
var color: TRGBTriple;
    h,w,a:integer;
begin
    for h:=0 to buffer.height - 1 do begin
        for w:=0 to buffer.Width - 1 do begin
            Move(PRGBTripleArray(buffer.ScanLine[h])^[w],Color,3);

            Color.rgbtRed   := not Color.rgbtRed;
            Color.rgbtGreen := not Color.rgbtGreen;
            Color.rgbtBlue  := not Color.rgbtBlue;

            Move(Color,PRGBTripleArray(buffer.ScanLine[h])^[w],3);

            application.ProcessMessages ;
        end;
    end;
end;

Avec cette fonction, pour une image en 800x600, sur mon PC, le temps de calcul est passé de 2s à 700ms, ce qui n'est pas rien !!

Il est possible d'utiliser les API InvertRgn ou InvertRect pour faire ça encore plus rapidement, mais ce n'est pas interessant ...

signaler à un administrateur
Commentaire de Dalamar le 03/01/2003 16:39:15

merci beaucoup pour la suggestion. Je ne savais pas utiliser scanline. Je vais optimiser les autres fonctions aussi...

signaler à un administrateur
Commentaire de Delphiprog le 03/01/2003 22:49:21 administrateur CS

Pour réaliser une loupe sur une partie de l'écran, regardes sur le site de Nono40 (http://nono40.fr.st), rubriques sources.

signaler à un administrateur
Commentaire de Dalamar le 04/01/2003 04:09:21

Merci beaucoup DelphiProg!

signaler à un administrateur
Commentaire de max12 le 06/01/2003 21:51:19 administrateur CS

Cool :D

signaler à un administrateur
Commentaire de ilyes2275 le 26/01/2003 15:58:35

Salut Dalamar,
je bosse sur un prog qui resemble au tien, j'ai inclu quelque fonctionalités que tu n'a pas mis dans le tien, si tu veut on peut travailler a deux sur ce prog, et sortir une bonne mouture sur le net.
Si t'es interessé, envoie moi un mail sur : iox@fr.st
Salut et @+

signaler à un administrateur
Commentaire de Comfort le 03/08/2006 18:37:14

Bravo

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,374 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é.