Codes sources Pascal

Sources Pascal, tous compilateurs et toutes plateformes.
Ajouter un nouvel élément

    Conversion des bases dans le système de numération

    Licence : Autre - 24/10/2015 - Téléchargé 3 x
    Ce programme convertit les bases 2, 3, 4, 5, 6, 7, 8, 9, 10 et l'hexadécimal.

    Exemples : base 3 > base 7 - base 5 > hexadécimal - hexadécimal > base 2, etc.

    DonkeyKong, Code commenté sur la SDL

    Licence : Autre - 24/09/2013 - Téléchargé 3 x
    Voila un jeu tout simple réalisé avec la SDL, un jeu de labyrinthe où Donkey Kong doit aller manger les bananes (j'ai volé l'idée sur un TP du sdz).
    C'est un code commenté (150 lignes de commentaires sur 200 lignes de code), afin de proposer une initiation à la SDL sur un exemple concret.
    Les images sont dans le zip, le code est compilé avec Free-Pascal.
    Pour le faire marcher, assurez-vous de posséder les librairies de la SDL (les .dll sous Windows et les .so sous Linux).
    Bonne lecture et faites moi part de vos avis.

    Jimi

    Éditeur : Xirax +
    Jimi est un petit insecte qui apparaît de temps en temps sur l'écran de votre ordinateur.

    Le programme est un exemple d'utilisation de la bibliothèque BGRABitmap. Ne fonctionne que sous Windows.

    Pour arrêter Jimi, vous devez passer par le gestionnaire de tâches.

    Light LCL

    Licence : Autre - 06/12/2015 - Téléchargé 3 x
    La bibliothèque Light LCL permet de produire sous Windows des exécutables sensiblement plus petits que ceux produits avec la bibliothèque standard de Lazarus.

    Pour utiliser la bibliothèque Light LCL, il suffit d'indiquer le chemin de la bibliothèque dans les options de votre projet. Il est à noter toutefois que seule une petite partie des composants de la LCL est disponible.

    La bibliothèque Light LCL est dérivée de la Light VCL d'Arnaud Bouchez, elle-même dérivée de la Light VCL de Paul Toth.

    Défi Pascal 2011 - Tetris - Projet de Paul TOTH

    Licence : Autre - 30/01/2013 - Téléchargé 3 x
    Compilateur : Delphi.

    Le code source complet d'un jeu librement inspiré du Tetris.
    (règlement)

    iCyberi@ 1.0

    Le programme iCyberi@ est une petite démo de logiciel de gestion de cyber-café.

    Il s'occupe de la gestion des Photocopies , Telephonie et du Surf puis totalise automatiquement les montants consommés et payés puis imprime (HP ,EPSON ,etc...) pour permettre au gérant de voir les dépenses et les gains.

    Edité sous Unix\Ubuntu 2.xx \gedit et compilé avec le paquet FPC (peut être aussi compilé avec Turbo 7 , Free Pascal, Lazarus, etc...)

    Objectif :
    ============================
    Utilisation de la table ASCII uniquement pour la construction graphique
    (il est mis de côté les unites Graph, GLUT (OpenGL), etc...)

    KEYS:
    ============================
    -- Appuyer sur (ENTRER) pour Avanc ... Voir la suite

    PASInfos - Projet du défi Pascal/Delphi 2016

    Licence : GPL - 12/04/2016 - Téléchargé 3 x
    Qui n’a jamais eu à parcourir un répertoire où s’accumulaient les fichiers sources divers en regrettant de ne pas avoir un aperçu de leur contenu et un minimum de renseignements sur leurs attributs ? PASInfos est un petit utilitaire entièrement autonome et portable qui permet justement, par simple glisser/déposer, d’afficher le contenu de fichiers sources issus de différents langages de programmation, ainsi que des informations sur ces fichiers.

    S'il est particulièrement adapté aux paquets et projets Lazarus et Delphi, PASInfos accepte de nombreux formats pour l’affichage avec coloration syntaxique : fichiers Pascal, C, C++, Java, Javascript, Perl, HTML, XML, CSS, PHP, TeX, SQL, Python, Batch, Basic, INI, PO, texte brut e ... Voir la suite

    Pascal Wizard Library 2.0

    Éditeur : Thomas G. Hanlin + 108 Ko
    Compilateur : Turbo Pascal.

    Une compilation d'unités diverses, écrites par Tom Hanlin :

    Unit Archives : routines de visualisation du contenu de fichiers de plusieurs formats d'archives
    Unit BCD : opérations sur les nombres BCD (Binary-Coded Decimal)
    Unit Equipmt : routines de détermination de l'environnement matériel et logiciel
    Unit ExtMath : fonctions mathématiques étendues
    Unit Joystick : routines de gestion du joystick
    Unit Keyboard : routines de gestion du clavier
    Unit Mouse : routines de gestion de la souris
    Unit Music : langage permettant de jouer de la musique plus simplement que les fonctions de base du Pascal
    Unit Strings : routines de compression, cryptage, recherches, ... Voir la suite

    Récupération de données sur une disquette défectueuse

    Licence : Gratuit - 16/11/2010 - Téléchargé 3 x
    Compilateur : Borland Pascal.

    Ce programme (sous Windows) permet de récupérer des données sur une disquette défectueuse. Il peut combiner les portions valides des deux copies de la FAT pour reconstituer la séquence des secteurs d'un fichier ou d'un répertoire.

    Sujets intéressants :
    - Parcours d'une FAT 12 bits,
    - Utilisation de fenêtres enfants et de dialogues non modaux,
    - Dialogues Windows standard d'enregistrement de fichier, de choix de police de caractères et de choix de couleurs.

    Algorithme A Star

    Licence : Gratuit pour usage non commercial - 07/04/2014 - Téléchargé 3 x
    Permet la recherche d'un chemin sur une grille pouvant contenir différents obstacles, plus ou moins franchissables.
    Exploite un des algorithmes les plus puissants dans ce domaine : l'algorithme A* ("A star").
    Compatible Dos et Windows.

    Très puissant, le A* a néanmoins ses faiblesses : il consomme une quantite non négligeable de mémoire, et le calcul d'un itinéraire peut prendre du temps sur les cartes vastes.
    L'unité n'a ete adaptée que pour fonctionner sur une carte découpée en cases carrées ; elle peut toutefois être modifiée pour l'étude de cases hexagonales.

    Configuration minimale nécessaire :
    • Processeur 8086/8088 ou supérieur
      Turbo Pascal 7.0+ ou Borland Pascal 7.0+
      Package objet d ... Voir la suite

    Tri TStringList

    Licence : Autre - 17/06/2016 - Téléchargé 3 x
    Bonjour à tous.

    Le tri alphabétique ne se fait pas correctement dans un TStringList lorsque des chaines contiennent des caractères accentués.
    En attendant une implémentation dans une version ultérieure de Lazarus, voici de quoi vous dépanner.
    Deux manières :
    a) utiliser TLatinStringList (dans le zip) qui est dérivé de TStringList avec simplement un override de la fonction DoCompareText : remplacement, pour le tri, des caractères accentués par leur correspondant non accentué. L'avantage est que, pour une liste triée, l'ajout de nouvelles chaines va directement se faire au bon endroit. L'inconvénient est que les fonctions Find et IndexOf (qui utilisent DoCompareText) ne vont plus distinguer "élève" de "élevé". Ce qui ... Voir la suite

    Défi Pascal 2010 - Un système de chat : projet de mick605

    Licence : Gratuit - 19/12/2014 - Téléchargé 3 x
    Le sujet du défi Pascal 2010 est de réaliser un système de chat.
    Le choix de la technologie, des outils et même de la plateforme sont entièrement libres.

    Système de Chat, en mode Serveur-Client
    Développé sous Delphi 2005, à l'aide d'Indy 10. Composants principaux : TIdTCPClient et TIdTCPServer. TJvRichEdit utilisé pour l'affichage du texte formatté et des smileys.
    Contient les sources

    Fonctionnalités
    - Echange de texte contenant des smileys
    - Changement de statuts
    - Personnalisation de la couleur du texte
    - Liste d'amis avec possibilité d'ignorer des membres
    - Possibilité d'envoyer des messages à partir du serveur

    A venir :
    - Mode multi salons, et conversati ... Voir la suite

    Nombres premiers

    Éditeur : Jean-Pierre Moreau +
    Compilateur : Turbo Pascal for Windows.

    Catégorie : problèmes arithmétiques.
    Ce programme teste si un nombre entier est premier ou pas.

    Ref.: "Mathématiques par l'informatique individuelle" de H. Lehning et D. Jakubowicz, Masson, Paris, 1982.

    Défi Pascal 2011 - Tetris - Projet de Mick605

    Licence : Gratuit - 30/01/2013 - Téléchargé 3 x
    Le sujet du défi Pascal 2011 est de réaliser un Tetris.

    Développé a l'aide du logiciel Delphi 2005. Compatible Windows.
    Contient les sources.

    Fonctionnalités :
    - Plusieurs modes de jeu :
      * Classic : Jeu normal avec les pièces de base. Bonus activés et possibilité de mettre des pièces en réserve.
      * Extended : Jeu sur une grille plus grande, avec plus de pièces. Bonus activés et possibilité de mettre des pièces en réserve.
      * Retro : Jeu avec les pièces de base et le gameplay des premiers Tetris. Bonus et réserve désacti ... Voir la suite

    Saisie de texte en mode graphique

    Licence : Gratuit - 11/11/2010 - Téléchargé 2 x
    Compilateur : Turbo Pascal.

    Procédures permettant de saisir du texte en mode graphique, avec effacement dynamique en cas d'erreur.

    Triangle de Pascal

    Éditeur : Jean-Pierre Moreau +
    Compilateur : Turbo Pascal for Windows.

    Catégorie : problèmes arithmétiques.
    Ce programme construit un triangle de Pascal.

    Ref.: "Exercices en Turbo Pascal" de Claude Delannoy, Eyrolles, 1997.

    Masque bgrabitmap

    Licence : Autre - 02/11/2015 - Téléchargé 2 x
    Voici un petit exemple de dessin d'un masque avec un pinceau à bords doux et opacité variable.

    Dans la démo, ce masque sert à retoucher localement une photo (luminosité, contraste, saturation).
    Il s'agit d'un masque noir, donc les corrections ne seront visibles qu'avec une opacité de pinceau supérieure à zéro.

    La bibliothèque bgrabitmap n'est pas fournie dans le zip.
    Si vous rencontrez un problème de compilation, supprimez "bgrabitmappack" dans le fichier project1.lpr

    Merci aux programmeurs et auteurs de tutoriels pour cette bibliothèque.

    Merci d'avance pour vos remarques.

    Thierry

    Changer le motif de fond d'une fenêtre Windows

    Licence : Autre - 05/06/2011 - Téléchargé 2 x
    Compilateur : Virtual Pascal.

    Le programme ChgFond illustre la création et l'utilisation des ressources en permettant à l'utilisateur de changer le motif de fond de la fenêtre. Types de ressources : menu, table d'accélérateurs, bitmap, curseur, icône.

    Jeu du morpion utilisant l'algorithme Negamax

    Licence : Autre - 09/02/2016 - Téléchargé 2 x
    Simple jeu de morpion utilisant l'algorithme Negamax. Traduction en Pascal d'un programme de Bernard Helmstetter.

    Jeu du serpent

    Licence : Autre - 26/02/2016 - Téléchargé 2 x
    Simple jeu du serpent utilisant l'unité WinGraph.

    Dirigez le serpent avec les flèches gauche et droite. Appuyez sur Echap pour quitter le programme.

    Compilation : Delphi 7, Free Pascal 3.0.0.

227 éléments

Responsables bénévoles de la rubrique Pascal : Gilles Vasseur - Alcatîz -