Petite question:
j'essai d'utiliser le .EXE directement (je n'ai pas VB6 d'installer),e til me donne une erreur de  "The Language DLL 'VB6FR.DLL' could not be found".

Cependant, j'ai télécharger la DLL du web, et je l'ai mis dans le répertoire du EXE, je l'ai copié dans C:\Windows, copié dans C:\windows\system et aussi copié dans C:\windows\system32.

J'ai toujours cette erreur.  Une petite idée ou un petit .ZIP d'installation avec les DLL à me fournir???

Merci.
  

Bravo pour la source, je suis content d'en voir des de même à l'occasion.  Je la trouve bonne, relativement simple et originale surtout.

Il manque un petit zip je crois.... ;)

Bravo pour ton source, petite et efficace comme je les aime.

Juste à titre de complément, en lien un peu avec ce jeu...

tous les figures de carte se retrouve dans une DLL de windows. CARDS.DLL

voir:
http://www.delphifr.com/code.aspx?ID=19265

See yaa!

Question:
  Est-ce qu'il y a moyen d'aller chercher toutes les propriétés de type string d'une classe?
Par exemple, la classe TFORM, aller chercher au RunTime ces propriétés de type string tel que: Caption, Hint, Name, etc...

Je ne crois pas que ma question est directement lié à cette source mais....peut-être que quelqu'un avec votre bagage d'expérience....

DelphiProg, "Pourquoi se donner tant de mal". Pour te répondre, il ne s'agit surment là  simplement de programmer pour le fun de le faire, peu importe le niveau de connaissance et de compétence, plutôt que de juger.  Il faut bien pour l'auteur du source  commencer à quelque part (même si je le connais pas) et d'encourager le monde à publié leur source, plutôt que le contraire.

Néanmoins , j'avoue que c'est intéressant de connaitre l'existance de cette fonction.

Je croyais que la bonne facon de faire les choses étaient de mettre les commentaires tout en codant notre programme, et non pas à la fin lorsqu'on aura le "temps", car on a jamais de temps pour ces choses là à la fin.. et pire.. parfois, si le code est "mal foutu" (ce qui n'est nécessairement pas "mieux"), on peut se demander pendant un bon petit bout ce qu'on a voulu faire dans tel ou tel section du source.

By the way, mon commentaire ne te vise pas toi, et ne le prends pas perso, mais bien des programmeurs je crois font l'erreur de ne pas mettre des comments que ce soit pour eux ou les autres programmeurs qui vont y retoucher par la suite, car si ton code est bon, ton code risque d'évolué et ce sera peut-être d'autres développeur que toi qui y retoucheront, et un bon programme bien structuré possède des commentaires tout aussi bien structuré.

Mais la morale de l'histoire, c'est de s'amuser alors si les commentaires vous emmerde, flusher cà....

Salut,

pour simplifier ton code, il y aurait peut-être un petit truc a faire.
En entête te déclarer deux constantes de tableau de type string dans lequel tu initialises tes mois et tes jours comme suit:

const Tbl_Jour: array[1..6] of String = ('Un', 'Deux', 'Trois', 'Quatre', 'Cinq', 'Six');

const Tbl_Mois: array[1..6] of String = ('Janvier', 'Fevrier', 'Mars', 'Avril', 'Mai', 'Juin');

Je ne l'ai pas fais pour tous les mois et jours, ceci est seulement un exemple..

Par la suite, tu prends ton chiffre indiquant le jour et tu le converti en integer pour pouvoir aller chercher la bonne position dans le tableau.

var Jour :Integer;

Jour := StrToInt(COPY(date,1,2)); //tu peux plugger la fonction directement entre les crochet du tableau [] comme j'ai fais pour le mois.

Et tu utilise ce chiffre pour aller chercher la valeur string dans le tableau à la position du chiffre.

ShowMessage(Tbl_Jour[Jour] + '    ' + Tbl_mois[StrToInt(COPY(date,4,5))]);

Il devrais afficher la valeur du tableau en position Jour, ainsi qu'un espace et le mois.

Il est aussi possible de rendre l'année plus générique, mais j'ai pas le gout de tout me tapper cà ce soir. Vive la paresse. Cependant, je crois que sa donne une petite idée pour simplifier le code au niveau des mois et des jours.
______
Patrick