Roland Chastain

Rédacteur/Modérateur

Je vous propose un programme en Pascal qui fournit la date et l'heure des éclipses solaires jusqu'en 2099. Le programme utilise l'unité Moon d'Andreas Hörstemeier.

Code Pascal :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
program Eclipses;
 
{ Date of solar eclipses }
 
uses
  SysUtils, Classes,
  Moon; { https://github.com/wp-xyz/delphimoon }
 
const
  CSolarEclipse = TRUE; { Uniquement les éclipses solaires }
 
{$DEFINE FRENCH}
{$IFDEF FRENCH}

En lire plus...

Envoyé par Roland Chastain

Bonjour,

Je vous propose un nouvel élément à utiliser : Dessin d'une fleur de lys

Ensemble de programmes en Pascal qui accomplissent les opérations suivantes :

1. Lire un fichier SVG (l'image d'une fleur de lys), en extraire les données et fabriquer une unité en Pascal les contenant.
2. Recréer des images au moyen de ces données (l'image de la fleur de lys, l'image des points seuls, l'image des point reliés par des droites).
3. Superposer les images

En lire plus...

Un exemple de code intéressant pour comprendre les problèmes relatifs à l'encodage. Merci Thierry !

Un coup d'œil sur la page suivante peut être utile.

UTF-8 Basic Latin

Envoyé par ThWilliam

Bonjour,

Voici la fonction que j'utilise (posté dans sources/tri stringlist)

Code :

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

1
2
3
function RemoveAccent(S: string): string;
{remplacement des caractères accentués dans la table UTF8 LATIN BASIC}
{En UTF8, les caractères accentués sont codés

En lire plus...

Envoyé par Roland Chastain

Bonjour ! Je souhaitais partager avec vous une trouvaille que j'ai faite, un jeu de dames avec son code source. J'ai trouvé le lien avec une certaine peine dans une page en russe. Pour vous épargner cette peine je donne le lien direct vers le fichier à télécharger.

Code :

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

{ marisoft.ru/Chess/freecheckers.rar }

Chose amusante, si je lance la version déjà compilée, les boutons et les menus sont remplis de points d'interrogation. Si j'ouvre le projet dans Delphi 10.2 les caractères

En lire plus...

Ed Schröder, bien connu de ceux qui s'intéressent à la fois à la programmation et aux échecs, propose sur son site un paquetage de vieux jeux d'échecs. Le paquetage inclut un émulateur et une interface graphique. En un clic, vous jouez sous Windows à Battle Chess, Cyrus ou Fritz (pour citer mes favoris). Merci Ed !

More DOS Oldies