Discussion :

[phobik]

Bonjour,

Je n'ai pas utilisé lazarus depuis très longtemps. Je souhaiterais créer une sorte de jeu de cartes/réussite afin de me familiariser avec la gestion des images.
Du genre avoir les 32 cartes en miniatures sur un côté, pouvoir les placer à leur véritable taille sur des emplacements puis les déplacer, les enlever, les interchanger.
(Avec TImage, j'ai ce genre de chose : "Picture.Data = {0A544A706567496D616765A...(très très long)...0DB25CEA3772CC5007FFD9} " pour chaque image) .

Ma question : existe-t-il un composant particulier pour gérer les images, les intégrer dans l'exécutable pour qu'elles soient utilisables à volonté ? Je précise que je n'ai pas besoin de les retoucher modifier.
(j'ai longuement recherché l'information en vain)
Merci beaucoup d'avance pour votre aide.
Bonne journée.

[Jipété]

(Avec TImage, j'ai ce genre de chose : "Picture.Data = {0A544A706567496D616765A...(très très long)...0DB25CEA3772CC5007FFD9} " pour chaque image) .

Ma question : existe-t-il un composant particulier pour gérer les images, les intégrer dans l'exécutable pour qu'elles soient utilisables à volonté ?

TImageList ? Mais ça sera encooooooooooooooooore plus looooooooooooooooooooooooong puisque ça devra contenir les datas des 32 images, et, je dirais même plus, 2 TImageLists : 1 pour les miniatures, 1 pour les images en taille réelle.

[phobik]

TImageList ? Mais ça sera encooooooooooooooooore plus looooooooooooooooooooooooong puisque ça devra contenir les datas des 32 images, et, je dirais même plus, 2 TImageLists : 1 pour les miniatures, 1 pour les images en taille réelle.

J'ai essayé avec TImageList mais ça me ne me paraissait guère concluant. Je vais essayer de creuser, je l'utilise sans doute mal. Je pensais qu'il y avait plus adapté, tant pis...

Merci pour ta réponse

[tourlourou]

Tout est une question de taille ! Pour ne pas gonfler celle de l'exécutable, il peut être judicieux de les placer en dehors.

Pour les miniatures, on peut les disposer comme des tuiles dans un seul grand fichier image (jpg, par ex.) qu'on lira au démarrage, en phase d'initialisation, pour les placer dans les TImage correspondants en y copiant le Rect concerné (c'est comme ça que font certains jeux pour les textures, sauf les Timage bien sûr).

Pour les cartes individuelles, je dirais bien un fichier par carte, ou tout mettre dans un stream, et lire carte par carte...

Ces initialisations peuvent éventuellement se faire en arrière-plan, pendant que l'application affiche un écran d'accueil ou que l'utilisateur fait des réglages avant de lancer une partie.

[phobik]

Tout est une question de taille ! Pour ne pas gonfler celle de l'exécutable, il peut être judicieux de les placer en dehors.

Pour les miniatures, on peut les disposer comme des tuiles dans un seul grand fichier image (jpg, par ex.) qu'on lira au démarrage, en phase d'initialisation, pour les placer dans les TImage correspondants en y copiant le Rect concerné (c'est comme ça que font certains jeux pour les textures, sauf les Timage bien sûr).

Pour les cartes individuelles, je dirais bien un fichier par carte, ou tout mettre dans un stream, et lire carte par carte...

Ces initialisations peuvent éventuellement se faire en arrière-plan, pendant que l'application affiche un écran d'accueil ou que l'utilisateur fait des réglages avant de lancer une partie.

OUPS... visiblement je suis vraiment à la ramasse. J'ignore ce qu'est le "Rect" et je ne sais pas ce que c'est que de "tout mettre dans un stream".
En tout cas merci pour votre aide, je vais voir ce que je peux faire, sinon je laisserai tomber. Bonne soirée.

[tourlourou]

L'intérêt d'un forum est bien de chercher des solutions qu'on ne trouvait pas, voire n'imaginait pas !

Soit l'image d'un jeu de cartes complet (https://www.ibisc.univ-evry.fr/~than...TD4/cartes.png) : on peut la charger dans un TImage, et facilement calculer le rectangle correspondant à chacune. Ensuite, on peut recopier ce rectangle sur le canevas d'un Bitmap à affecter à un TImage. Procédure pas toujours aussi simple qu'il faudrait, cf. Jipété !

Les images des différents cartes (toutes, ou seulement les grandes) peuvent être chacune dans un fichier, à lire au moment choisi pour initialiser son TImage correspondant. On peut aussi si elles ont toutes la même taille (Bitmaps) les enregistrer à la queue-leu-leu dans un seul fichier, qui sera lu dans un flux (TStream). Chaque portion de ce flux servira à charger le TImage correspondant.

Après, il faut voir en termes de rapidité ce qui convient le mieux à ton cas, et ne complique pas trop le code ni l'installation de l'application (distribuer le seul exécutable est pratique...) !

[phobik]

L'intérêt d'un forum est bien de chercher des solutions qu'on ne trouvait pas, voire n'imaginait pas !

Soit l'image d'un jeu de cartes complet (https://www.ibisc.univ-evry.fr/~than...TD4/cartes.png) : on peut la charger dans un TImage, et facilement calculer le rectangle correspondant à chacune. Ensuite, on peut recopier ce rectangle sur le canevas d'un Bitmap à affecter à un TImage. Procédure pas toujours aussi simple qu'il faudrait, cf. Jipété !

Les images des différents cartes (toutes, ou seulement les grandes) peuvent être chacune dans un fichier, à lire au moment choisi pour initialiser son TImage correspondant. On peut aussi si elles ont toutes la même taille (Bitmaps) les enregistrer à la queue-leu-leu dans un seul fichier, qui sera lu dans un flux (TStream). Chaque portion de ce flux servira à charger le TImage correspondant.

Après, il faut voir en termes de rapidité ce qui convient le mieux à ton cas, et ne complique pas trop le code ni l'installation de l'application (distribuer le seul exécutable est pratique...) !

Oui OK je comprends mieux ce que tu m'expliquais. Cependant il est évident que j'ai beaucoup trop de lacunes pour m'en sortir sans reprendre plein de choses à zéro.
J'imaginais qu'il existait une sorte de gestionnaire d'images qui permette de charger x images dans le programme, puis "d'appeler" l'une ou l'autre de ces images (img1, img2, img3 ou autre), afin qu'elle apparaisse où l'on veut et quand on veut sur l'interface.
En tout cas, merci encore.

[Jipété]

J'imaginais qu'il existait une sorte de gestionnaire d'images qui permette de charger x images dans le programme, puis "d'appeler" l'une ou l'autre de ces images (img1, img2, img3 ou autre), afin qu'elle apparaisse où l'on veut et quand on veut sur l'interface.

En fait tu décris deux choses bien différentes, là :
- le gestionnaire de cartes en stock, si je puis dire (récupération des cartes depuis un [ou des] fichier[s] pour présentation, premières initialisations, etc.) et
- le gestionnaire de la partie, qui va gérer les déplacements et leur validité, les prises, les coups, les points, etc.

Un projet comme ça, il faut le diviser et travailler sur les deux parties l'une après l'autre comme deux projets séparés. Ensuite tu raccordes.

[tourlourou]

Il me semble plus pertinent d'avoir un tableau de cartes = de TImage, à 2 dimensions : valeur et couleur :

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
Type
  TCartes = array[1..13, 1..4] of TImage;
 
Var
  Cartes : TCartes;
 
procedure ChargeImages(aParentForm: TForm); // et prévoir un LibereImages pour les détruire
Var
  i, j : integer;
begin
  for j:=1 to 4 do
    for i:=1 to 13 do
  begin
    Cartes[i, j]:=TImage.Create(self);  
    with Cartes[i, j] do
    begin
      LoadFromFile(... nom à déduire des i et j !)
      Parent:=aParentForm;
      Visible:=False; // on pourra la montrer quand on voudra
      Left:=100*j; // et où on voudra
      Top:=50*i;
    end;  
  end;
end;

[mm_71]

Mais est-ce bien nécessaire de compliquer les choses avec une inclusion des images dans le code ou dans des streams ? Si les images ne pèsent que quelques centaines de Ko. les laisser sur le disque dur et utiliser un loadfromfile ? C'est ce qu'utilise le programme que j'ai bricolé ( Image ci-dessous ), la grille contient les thumbs et chaque déplacement ou clic charge l'image voulue dans le timage central. Le temps d'affichage est imperceptible.
Pour un jeu de cartes il faudra bien sur enchaîner plusieurs loadfromfile mais pour tenir toutes sur l'écran les images ne pourront pas avoir une taille démesurée, en .jpg ça ne devrait pas dépasser 30 / 50 Ko. la carte donc la latence devrait être plutôt négligeable.
Quitte à améliorer par la suite la méthode permet de se remettre en tête le système sans s'exploser le citron.



PS: Capture un peu ratée, j'ai un morceau de Gimp qui lui monte dessus.

[phobik]

Mais est-ce bien nécessaire de compliquer les choses avec une inclusion des images dans le code ou dans des streams ? Si les images ne pèsent que quelques centaines de Ko. les laisser sur le disque dur et utiliser un loadfromfile ? C'est ce qu'utilise le programme que j'ai bricolé ( Image ci-dessous ), la grille contient les thumbs et chaque déplacement ou clic charge l'image voulue dans le timage central. Le temps d'affichage est imperceptible.
Pour un jeu de cartes il faudra bien sur enchaîner plusieurs loadfromfile mais pour tenir toutes sur l'écran les images ne pourront pas avoir une taille démesurée, en .jpg ça ne devrait pas dépasser 30 / 50 Ko. la carte donc la latence devrait être plutôt négligeable.
Quitte à améliorer par la suite la méthode permet de se remettre en tête le système sans s'exploser le citron.

Finalement j'arrive à quelque chose en laissant les images dans un dossier en dehors de l'exécutable... Pour le reste je ne suis pas assez calé, je ne trouve rien de compréhensible pour mes compétences. Dommage, faire tout tenir dans un simple exe aurait été pratique.
Merci à tous pour votre aide.

[M.Dlb]

Autre option : placer les images dans le fichier ressource et les charger avec la bonne fonction (à priori http://lazarus-ccr.sourceforge.net/d...sresource.html).

C'est équivalent à charger des fichiers, sauf que l'on charge des ressources depuis un fichier qui sera intégré à la compilation.

[phobik]

Autre option : placer les images dans le fichier ressource et les charger avec la bonne fonction (à priori http://lazarus-ccr.sourceforge.net/d...sresource.html).

C'est équivalent à charger des fichiers, sauf que l'on charge des ressources depuis un fichier qui sera intégré à la compilation.

Bonsoir,
Je reviens après une petite interruption...
J'ai donc réussi (non sans mal ) à utiliser un fichier resource.
J'indique ce que j'ai fait pas à pas si ça peut servir à quelqu'un ou si quelqu'un trouve quelque chose à corriger.
- J'ai utilisé LRS Explorer pour créer le fichier resource .lrs
- J'y ai inclu une image "2.jpg" et l'ai enregistré dans le dossier du projet comme "test.lrs"
- Il faut ajouter "LResources" dans les uses

Code :

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

1
2
3
4
5
interface

uses
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
  LResources, ExtCtrls;

- Juste avant le "end" final, ajouter "initialization {$I test.lrs}"

Code :

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

1
2
3
initialization
  {$I test.lrs}
end.

- après avoir placé une TImage sur la fiche (ici "Image1"), coder la procédure comme suit :

Code :

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

1
2
3
begin
  Image1.Picture.LoadFromLazarusResource('2');
end;

("2" est suffisant, l'extension .jpg n'a pas besoin d'être ajoutée)
Une fois la procédure lancée, l'image 2.jpg s'affiche dans Image1. Les images peuvent ainsi être incorporées à l'exécutable.

Un peu fastidieux pour pas grand chose, mais une épine dans le pied en moins pour le novice que je suis
Merci à tous

PS : Petit problème (mais qui ne me dérange pas outre mesure) je n'arrive pas à réduire la taille de mes exe, même en suivant les instructions trouvées sur le net (comme ici).