HOROSCOPE GAULOIS

Signaler
Messages postés
3793
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
-
Messages postés
4
Date d'inscription
vendredi 27 avril 2007
Statut
Membre
Dernière intervention
17 février 2008
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/50854-horoscope-gaulois

Messages postés
4
Date d'inscription
vendredi 27 avril 2007
Statut
Membre
Dernière intervention
17 février 2008

Bonjour,
J'ai essayé un ImageList
mais apparement on ne peut pas dépasser 255 x 255 pixels
en plus dans mon exemple les images se superposent
et si je mets toutes les images le programme plante
j'ai joint un exemple ci-dessous

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, ImgList;

type
TForm1 = class(TForm)
Image1: TImage;
ImageList1: TImageList;
procedure Image1Click(Sender: TObject);

private
{ Déclarations privées }

public
{ Déclarations publiques }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Image1Click(Sender: TObject);
var d:integer;
begin
Image1.Picture.Bitmap := nil;
for d := 0 to 2 do
ImageList1.GetBitmap(d,Image1.Picture.Bitmap);
end;
end.
Messages postés
2527
Date d'inscription
jeudi 15 janvier 2004
Statut
Membre
Dernière intervention
16 octobre 2019
13
Bein oui c'est bien ^^
Originale et pédagogique.

@MicZ
Si tu regardes l'Aide Delphi sur TStringList, tu t'apercevras qu'à chaque String de la liste, on peut associer un objet. Un Bitmap, par exemple. Ne dirait-on pas que TStringList a été créé pour toi ? ^^
Attention avec TImageList. Les images doivent toutes avoir la même taille et être des Bitmaps. Un fichier de jpeg n'est peut-être pas une si mauvaise idée que ça... ;)
Messages postés
2226
Date d'inscription
dimanche 5 octobre 2003
Statut
Modérateur
Dernière intervention
18 novembre 2010
13
Pour un projet de débutant, de premiers pas en Delphi, je le trouve sympa, bien loin des calculettes de vomi de chat ou autre notepade inutile.

Pouvons nous attendre une nouvelle version de ce projet avec des optimisations ? :)
Messages postés
4
Date d'inscription
vendredi 27 avril 2007
Statut
Membre
Dernière intervention
17 février 2008

Ok ,merci pour les tuyeaux, je débute en delphi je vais amèliorer le code au mieux.
Pour les images, j'ai utilisé PhotoPhiltre, mais je n'ai pas voulu pousser la compression,
je vois que c'est une fausse idée (hélas bien ancrée!)pour les photos de petit format,
Pour la correspondance Solaire Lunaire, je me suis fié à ce que j'ai lu sur des bouquins
traitant le sujet, de toute façon cet horoscope est juste un premier pas vers nos ancêtres,
en faisant une recherche sur le net avec Horoscope Gaulois onen apprends beaucoup plus.
je me disais aussi pour le Hêtre...
Afficher les 14 commentaires