Discussion :

[medchennani]

Bonjour a tous: mon problème est le suivant:
j'ai une serie d'images dans un repertoire et j'aimerais ecrire du texte en bas sur chaque image (la date et autre chose et ce en fonction de leur taille) sans les ouvrire bien sur, seulement un traitement en arriere plans.
si vous avez des idees merci.

[jambonstar]

Salut, tu peux les charger dans un TBitmap par la fonction LoadFromFile.

Ensuite tu utilise la propriété Canvas :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
var
MonBmp : TBitmap;
 
begin
 
MonBmp := TBitmap.Create;
MonBmp.LoadFromFile(CheminImage);
MonBmp.Canvas.Pen.Color := clRed // écrira en rouge.
MonBmp.Canvas.TextOut(X,Y, "Blabla Tructruc"); // écrit le text à la position X,Y
 
MonBmp.SaveToFile(CheminImage);
 
MonBmp.Free;
end;

Voilou

[edisson81]

Bonjour,

//il faut déclarer TPicture

Code :

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

1
2
3
4
5
6
7
8
Image : TPicture; 
 
//pour ouvrir une image
Image.LoadFromFile(nomfichier);
//pour écrire
Image.Bitmap.Canvas.TextOut(x, y, text);
//pour enregistrer
Image.SaveToFile(nomfichier);

Attention il faut que les images soit sous format bmp.

j'ai oublié le create

Code :

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

Image := TPicture.Create;

[jambonstar]

Juste pour dire que l'appel de TPicture ne sert à rien dans sont cas, il peut directement passer par TBitmap.

Par contre, si tu utilise des JPeg, il te faudra utiliser la même technique, mais en passant par un TJPEGImage, et ajouter à tes uses l'unite JPEGImage.

Après je te laisse regarder dans l'aide pour trouver les bons taux de compression que tu souhaite.

[medchennani]

merci pour vos réponses, je sais maintenant comment faire.
je vous aime.

[medchennani]

le jpeg n'a pas de canvas j'ai du faire une transformation d'une image jpeg en bmp, faire le traitement ensuite transformation en jpeg et ensuite l'enregistrement avec un taux de compression.
pouvez vous me dire si je doit faire autrement ?

mon application traite une centaine de photos avec un temps acceptable, sauf la perte de qualité.
//---------merci