Discussion :

[jv2759]

Bonjour.

J'aimerais crées un composant graphique et inclure des images png dans le composant lui même. Éventuellement que l'on puisse remplacer les images par la suite lorsque l'on utilise le composant. Mais je n'est pas réussit à faire cela et je n'est rien trouver concernant une telle possibilité.

Si quelqu'un avait une piste.

Merci.

[Charly910]

Bonjour,

regarde sur :

http://pngdelphi.sourceforge.net/

il y a un composant PNG

@+

Charly

[Thierry Laborde]

Bonjour,

Ce lien ne marche pas. tout simplement car le composant PNGDelphi a été intégré dans Delphi depuis D2009.
Sur quelle version de Delphi cherches tu des composants PNG ?

Sinon tu peux trouver différentes choses ici :

http://www.thany.org/article/18/VCL

ou ici :

http://www.english.aionel.net/

[jv2759]

Désoler je me suis mal fait comprendre.

J'ai la 2009 donc je peux mettre des png dans mes pages sans problème.

En fait je voudrait crée un composant personnaliser (un trackbar) pour une application. Hors je ne veux pas utiliser les visuel par défaut de windows mais utiliser mes propre visuel, afin d'avoir quelque chose de plus graphique.

Donc je veux non pas mettre un png dans une application ce que je sais faire, mais mettre les visuel dans un composant personnaliser.

[Thierry Laborde]

Désoler je me suis mal fait comprendre.

J'ai la 2009 donc je peux mettre des png dans mes pages sans problème.

En fait je voudrait crée un composant personnaliser (un trackbar) pour une application. Hors je ne veux pas utiliser les visuel par défaut de windows mais utiliser mes propre visuel, afin d'avoir quelque chose de plus graphique.

Donc je veux non pas mettre un png dans une application ce que je sais faire, mais mettre les visuel dans un composant personnaliser.

Dans ce cas là il suffit de rajouter dans le uses de ton composant l'unité Pngimage et ensuite de déclarer un objet de type TPngImage pour manipuler les images au format PNG.

[jv2759]

Mais pour que l'image soit "dans" le composant ?

Comment je lui dit d'aller utiliser la bonne images. Car si j'utilise le même composant dans différent projet je ne veux pas devoir redéfinir les chemin des images à chaque fois.

[Thierry Laborde]

Mais pour que l'image soit "dans" le composant ?

Comment je lui dit d'aller utiliser la bonne images. Car si j'utilise le même composant dans différent projet je ne veux pas devoir redéfinir les chemin des images à chaque fois.

Dans ce cas là il faut stocker ton image dans un fichier ressource. Mais cela n'a plus rien à voir avec le fait que ça soit un PNG. c'est la même chose pour n'importe quel type d'image ou de fichier que tu veux stocker dans ton composant.

tu trouveras des infos ici :

http://delphicool.developpez.com/ressources/

[jv2759]

Parfait merci, j'avais essayer un peux mais sans réussit. En fait il faut mettre l'image en tant que RCdata, de plus je ne suis pas passer par l'éditeur de ressource de 2009 mais par un logiciel XN Ressource Editor

Si quelqu'un peux être intéresser voici ce que j'ai utiliser pour que cela marche :

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
16
17
18
19
20
21
22
23
24
25
26
 
 
implementation
 
uses
  Types;
 
{$R fichier.res}
 
 
constructor TRangeSelect.Create(AOwner:TComponent);
var
  res:TStream;
begin
inherited create(AOwner);
//Chargement Curseur
res := TResourceStream.Create(hinstance, 'CURSEUR', RT_RCDATA);
fcurseur1:=TPngImage.Create();
fcurseur1.LoadFromStream(res);
res.Free;
end;
 
procedure TRangeSelect.Paint;
begin
fcurseur1.Draw(canvas,Rect(0,0,10,10));
end;

Et encore merci pour cette aide. Notre graphiste vas pouvoir s'éclater...

[Thierry Laborde]

Pour info dans l'Objet PNGImage tu peux charger directement une image depuis un fichier ressource :

fcurseur1:= TPNGImage.Create;
fcurseur1.LoadFromResourceName(HInstance,'CURSEUR');

ça simplifie encore plus le code.

Parfait merci, j'avais essayer un peux mais sans réussit. En fait il faut mettre l'image en tant que RCdata, de plus je ne suis pas passer par l'éditeur de ressource de 2009 mais par un logiciel XN Ressource Editor

Si quelqu'un peux être intéresser voici ce que j'ai utiliser pour que cela marche :

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
16
17
18
19
20
21
22
23
24
25
26
 
 
implementation
 
uses
  Types;
 
{$R fichier.res}
 
 
constructor TRangeSelect.Create(AOwner:TComponent);
var
  res:TStream;
begin
inherited create(AOwner);
//Chargement Curseur
res := TResourceStream.Create(hinstance, 'CURSEUR', RT_RCDATA);
fcurseur1:=TPngImage.Create();
fcurseur1.LoadFromStream(res);
res.Free;
end;
 
procedure TRangeSelect.Paint;
begin
fcurseur1.Draw(canvas,Rect(0,0,10,10));
end;

Et encore merci pour cette aide. Notre graphiste vas pouvoir s'éclater...