Codes sources Pascal345 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

Compilateur : Turbo pascal.

Tennis Tournament Organizer 1.20 : un programme complet de gestion de tournoi de tennis de table sous MS-DOS. Attention, vu l'ancienneté du programme, les règles modernes du tennis de table ne sont pas supportées. L'image de la disquette d'installation, ainsi que le source de programme d'installation, sont également fournis.

Sujets intéressants :

- Menus déroulants et fenêtrage en mode texte,
- Gestion de la souris en mode texte à l'aide des interruptions du BIOS,
- Programmation d'un screen-saver (avec un timer),
- Sauvegarde automatique,
- Système complet d'aide contextuelle,
- Gestion de fichiers texte de très grande taille,
- Impressions,
- ... Voir la suite

Code source extrait du livre J'apprends à programmer en Pascal Objet avec l'environnement de développement Lazarus.

Qu’est-ce qu'un caractère et quelles sont les fonctions les plus courantes permettant de les manipuler.
L'application d'exemple est un petit utilitaire affichant, par blocs de 256, tous les caractères Unicode au format UTF-16, avec la possibilité de copier l'un d'entre eux dans le presse-papier (image 1).
Dans le laboratoire, vous êtes invité(e) à créer trois routines outils pour l'analyse des caractères (image 2) :

• une fonction qui détermine si le caractère fourni en entrée est un chiffre ;
• une fonction qui détermine s ... Voir la suite

Superbe effet avec de l'eau.

Compilateur : Borland Pascal.

Carnet d'adresses et répertoire téléphonique. Le programme peut servir de serveur DDE pour une autre application (un modèle de document WinWord 6 accompagne d'ailleurs le source).

Sujets intéressants : Dialogues Windows standard de choix de police de caractères et de choix de couleurs, impression de listings et d'étiquettes.

Une unité bien pratique qui contient les fonctions

function StringToInt(s : string) : integer;
function IntToString(i : integer) : string;
procedure fenetre(X1 : integer; Y1 : integer; X2 : integer; Y2 : integer); (fenetre a double bordure)
procedure dec(i : integer; a : integer); decrementer
procedure centrer(s : string; y : integer); centre une chaine pour un y donné
procedure instcolorln(i :string;e : byte;b : byte); couleur sur une ligne e=nouvelle couleur et b = ancienne couleur
procedure instcolor(i :string;e : byte;b:byte); la même chose sans aller à la ligne
procedure pleinecran;
function on_click_button(x1,y1,x2,y2:integer):boolean; a faire marcher ^^
pr ... Voir la suite

Un jeu du Snake banal avec la SDL et compilé avec Lazarus sous Win XP.

Points Positifs :

• Gestion des événements, du son et de la SDL (pointeurs...) et algorithme du Snake;
• Programme structuré (je m'étais lancé dans la POO au début mais sans succès);
• Graphique pas mal :) fait sous Paint ^^ (c'est pas évident du 16x16 pixels sous Paint);
• La SDL est portable donc, logiquement, le code est portable.

Points à finir :

• Quand vous perdez, obligation de quitter pour relancer le jeu;
• Pas de gestion du score;
• Pas de gestion d'erreurs (s'il y a un problème, le programme se plante en utilisant les messages classiques de Windows);
• Pas de gestion du temps (au début, ... Voir la suite

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Ce programme permet de calculer le plus grand commun diviseur (PGCD) et le plus petit commun multiple (PPCM) de plusieurs nombres entiers.

Ref.: "Mathématiques en Turbo-Pascal" de M. Ducamp et A. Reverchon, Eyrolles, Paris, 1988.

Fonction qui convertit un nombre entier (de un à 4 294 967 295) en mots français.

Code source extrait du livre J'apprends à programmer en Pascal Objet avec l'environnement de développement Lazarus.

Comment construire des expressions numériques, en maîtrisant l’ordre de priorité des opérations.
L'exemple d'application résout une équation du type AX² + BX + C = 0.

Voilà les sources ainsi que les exécutables du Tetris developpé dans le cadre du défi pascal 2011.
(règlement)

Cette mini-application pour Android affiche le temps restant entre une date de référence et maintenant. Elle a éré réalisée avec le framework LAMW sous Lazarus.
Il est possible de moduler le compte à rebours selon son envie, du nombre d'années au nombre de secondes, de choisir la couleur de l'affichage et la taille de la police de caractères. Si les heures ou minutes ou secondes sont affichées, un timer en affiche le décompte.

Cette application sert de prétexte pour présenter l'utilisation du composant jPreferences, qui permet de sauvegarder des données de configuration un peu à la manière d'un fichier INI sous Windows, mais sans devoir gérer aucun fichier.

Composants utilisés :

• jMen ... Voir la suite

Le sujet du défi 2009 était de réaliser un résolveur de grilles de Sudoku pouvant être compilé au minimum pour Windows et Linux.

Bonjour.
Vous trouverez deux composants dans l'unité ThColorspal :

TThPalette : palette de couleurs sous forme de grille.

• ajout et suppression de couleurs
• ordonnancement des couleurs par drag and drop
• sauvegarde et chargement des palettes créées

TThColorCreator : création de nouvelles nuances, composant contenant une barre de plage de couleurs, une barre de luminosité, 3 barres RGB

Testé sous Win7, Win8, Linux mint

Les deux composants peuvent être utilisés conjointement pour se confectionner un dialogue de couleurs personnalisé.
Le zip contient un programme demo (rien à installer, les composants sont créés dynamiquement) ainsi qu'un programme "p ... Voir la suite

TextView est une application permettant de visualiser rapidement le contenu des fichiers texte d'un dossier.

Ceci est un logiciel de dactylographie que j'ai créé pour que je puisse faire de " Fast and the furious " non pas avec des voitures mais avec des claviers.

Compilateur : Turbo Pascal.

Une calculatrice en mode graphique, avec gestion de la souris. Il faudra éventuellement modifier le chemin vers les fichiers BGI dans le source.

Compilateur : Turbo Pascal.

Jeu du Serpent, jusqu'à 4 joueurs. Le but est d'esquiver les obstacles en blanc, la trace des autres joueurs ainsi que sa propre trace.

Formatage de code source en Pascal. Outil en ligne de commande dérivé de DelForExp d'Egbert van Nes.

PASHeader permet d'insérer des en-têtes dans des fichiers Pascal, individuellement ou par lot. Il offre une panoplie d'outils pour automatiser et/ou simplifier les processus de choix des fichiers à traiter, de création et de gestion des en-têtes et de modèles, ainsi que d'exécution des insertions et substitutions.

Les fichiers qui font partie de projets ou de paquets Lazarus et Delphi sont automatiquement extraits pour être traités. Si elles existent, les informations de version des projets et paquets Lazarus peuvent elles aussi être extraites automatiquement.

Entièrement écrit en Pascal à partir de Lazarus, le programme fonctionne sous Linux et Windows, en anglais ou en français. En plus du code source, le proj ... Voir la suite

Jeu d'échecs en Pascal d'Evgeniy Korniloff. Originellement écrit pour Turbo Pascal, adapté pour Free Pascal et l'unité ptcGraph.