Discussion :

[colorid]

Bonjour,

Je développe une "grosse application" actuellement l'exécutable fait 5 Mo...
Je travaille à partir de photos sur des bimaps de 10 millions de pixels, même si au départ (comme à l'arrivée) les images sont en JPEG.

J'utilise une routine de sélection rectangulaire d'une partie de l'image. Cette routine a besoin d'une copie de l'image (pour régéner les rectangles de sélection) ce qui implique deux bitmaps chacune de 30 Mo.

J'ai mis au point la routine de sélection rectangulaire dans une petite application qui utilise les mêmes images de même taille mais dont l'exécutable ne fait que 500 Ko. La routine de sélection utilise le même code source dans la petite application comme dans la grande.

Problème: la sélection fonctionne pafaitement dans la petite application pas dans la grande ! Quand on déplace le curseur les rectangles s'effacent dans la petite pas dans la grande !

Je pense à un problème de taille de mémoire. Faut-il augmenter les tailles de pile ? ou quelqu'un a t'il une idée pour régler ce problème ?

Nota: je travaille sur un PC de 2Go de RAM sous Vista avec Delphi 2007

[Sub0]

ce qui implique deux bitmaps chacune de 30 Mo.

Je n'ai pas la réponse au problème mais en tous les cas, ton algo me semble extrèment lourd. Je pense qu'il existe beaucoups plus simple et surtout moins gourmand en mémoire pour réaliser ce genre de fonction...

Tu es sûr de ne pas pouvoir (vouloir) faire autrement ?

[Paul TOTH]

Je n'ai pas la réponse au problème mais en tous les cas, ton algo me semble extrèment lourd. Je pense qu'il existe beaucoups plus simple et surtout moins gourmand en mémoire pour réaliser ce genre de fonction...

Tu es sûr de ne pas pouvoir (vouloir) faire autrement ?

en général on dessine une ligne en XOR pour afficher la sélection...il suffit de la redessiner pour l'effacer, c'est la magie du XOR

ceci je ne vois pas en quoi la taille de l'executation devrait influencer le code dont il est question, le problème doit être ailleurs

[colorid]

J'avais commencé avec XOR mais je ne suis pas arrivé à mettre au point cette routine...

J'ai trouvé l'exemple qui m'a servi sur le site "Special Delphi Michel" écrit en 2002 par Alexandre Morlet télécharchable dans un ZoneSelect.zip.
Mais l'image utilisée dans cet exemple tient plus du timbre poste que du grand écran !

Ou pourrais-je trouver un exemple avec XOR ?

[Gilbert Geyer]

Bonjour,

Ou pourrais-je trouver un exemple avec XOR ?

... Pour ma part je n'utilise pen.Mode:=pmXOR que pour des tracés sur un fond de canvas noir et comme j'utilise le plus souvent des fonds blancs j'utilise donc plutôt pen.mode:=pmNotXor.

Tu peux trouver ici : http://www.developpez.net/forums/sho...ur#post2927064
un exemple de code où :
- je trace des trucs (droites, rectangles, polygones, etc) sur le canvas d'un TImage,
- ensuite je les agrippe à la souris pour les déplacer, pivoter, modifier.

Dans le onMouseDown j'identifie le truc sélectionné à la souris ... et dans le onMouseMove, avant de déplacer je re-trace le truc en mode pmNotXor pour l'effacer dans sa position initiale, ensuite je corrige ses paramètres de re-positionnement, et pour terminer je re-trace le truc dans la position modifiée en mode pmNotXor pour le rendre visible.

Le code est facilement modifiable pour faire des rectangles de sélection et il est même simplifiable pour le cas de rectangles simples et non inclinés (suffit de supprimer la procedure RotatRect() qui permet de pivoter un rectangle et la procedure TraceRectBis() qui permet de tracer un rectangle à double bords épais d'un seul pixel et espacés de la valeur de epTrait alors que la procedure TraceRect() trace un rectangle à un seul bord épais de la valeur affectée à epTrait.

A+

[colorid]

Le lien "http://www.developpez.net/forums/sho...ur#post2927064" me dirige vers une "suite et fin"...

Où trouver le début ?

Dans le code sorce il manque de nombreuses définitions telles que :
- La composition de frmImgD
- la déclaration des variables MesDroitesA, MesRectangles, MesPolygones etc..
Je suppose qu'il manque en fait le lien sur le début de l'information