Discussion :

[ThWilliam]

Bonjour,

Voici un petit exemple de dessin d'un masque avec un pinceau à bords doux et opacité variable : Masque bgrabitmap

Dans la démo, ce masque sert à retoucher localement une photo (luminosité, contraste, saturation).

Il s'agit d'un masque noir, donc les corrections ne seront visibles qu'avec une opacité de pinceau supérieure à zéro.

La bibliothèque bgrabitmap n'est pas fournie dans le zip.
Si vous rencontrez un problème de compilation, supprimez "bgrabitmappack" dans le fichier project1.lpr

Merci aux programmeurs et auteurs de tutoriels pour cette bibliothèque.

Merci d'avance pour vos remarques.

Thierry

[Jipété]

Salustre, man !

La bibliothèque bgrabitmap n'est pas fournie dans le zip.
Si vous rencontrez un problème de compilation, supprimez "bgrabitmappack" dans le fichier project1.lpr

Alors on peut dire que ton projet tombe à pic, non pas pour l'aspect "graphisme" et tout ce genre de choses (gestion des couleurs, retouche d'images, etc. : je ne suis pas graphiste !) mais plutôt parce qu'aujourd'hui était le jour choisi pour tester l'installation automatique de composants, or il se trouve que :

• les compos bgra*** étaient sur ma liste ;
• quoi de mieux pour tester des compos qu'un projet qui les utilise ?

Donc ni une ni deux, j'installe en automatique avec l'ami fpcup dont je cause un peu par ailleurs, ça se déroule les fingers in the nose, ensuite je télécharge ton zip, extraction, Lazarus / ouvrir un projet et là, encore les fingers dans le nez, tout s'est déroulé à merveille !

Fermez le ban, remarquable boulot que tu as fourni là, bien joué, merci à toi

[ThWilliam]

Merci à toi, JP.

Je ne manquerai pas de consulter ton ami fpcup

[Jipété]

Yop !

Un microscopique point de détail, qui fera gagner du temps aux jeunes linuxiens :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
procedure TMainForm.FormCreate(Sender: TObject);
begin
   Origbmp:= TBGRABitmap.Create('Test.png');

L'instruction ci-dessus fonctionne très bien tant qu'on reste dans l'IDE, mais une fois le projet au point, on peut avoir envie de le tester hors IDE et sans les infos de débogage, ce qui réduit considérablement sa taille, mais patatras !, le programme ne trouve pas l'image ! Solution :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
procedure TMainForm.FormCreate(Sender: TObject);
begin
   Origbmp:= TBGRABitmap.Create(Application.Location + 'Test.png'); // Application.Location se termine par "/"

[ThWilliam]

Hello JP,

Remarque utile, pour un "jeune" linuxien comme moi.
Mais le problème ne survient-il pas uniquement lorsqu'on lance le programme en ligne de commande, sans avoir au préalable modifié le current directory ?
Avec mon Linux Mint, je lance à partir d'une fenêtre du dossier, et no problem.
Cela étant dit, j'ai l'habitude de toujours inclure le path de l'application dans le nom de fichier... toujours sauf dans cette démo (!!??).

Cordialement
Thierry

[Jipété]

Remarque utile, pour un "jeune" linuxien comme moi.

Ce qu'il y a de bien avec Linux, c'est qu'on reste jeune longtemps : il y a toujours quelque chose à apprendre, toujours, toujours !

Mais le problème ne survient-il pas uniquement lorsqu'on lance le programme en ligne de commande, sans avoir au préalable modifié le current directory ?
Avec mon Linux Mint, je lance à partir d'une fenêtre du dossier, et no problem.

Linux Debian Lxde, j'ai remarqué ce comportement depuis que j'ai installé Lazarus et compilé des progs qui vont chercher des ressources dans le dossier du prog : images, fichiers ini.
Et non, je n'utilise pas la LdC dans ce contexte, je me la joue ancien windowsien, je double-clique sur le binaire, et paf !

Je ne dois pas être le seul à m'être fait avoir, car je constate ça, dans le source de fpcup :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  if (CurrentConfigFile=ExtractFilePath(ParamStr(0))+CONFIGFILENAME)

Cela étant dit, j'ai l'habitude de toujours inclure le path de l'application dans le nom de fichier... toujours sauf dans cette démo (!!??).

Bah, ça nous fait l'occasion de papoter