Codes sources Pascal334 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

Recherche et suppression de doublons sous Windows.

Par doublons on entend des fichiers identiques, même avec des noms différents (mais avec la même extension toutefois).

Le programme DEMO1.PAS recherche des doublons dans un dossier donné pour un fichier donné.
Le programme DEMO2.PAS recherche des doublons dans un dossier donné pour un ensemble de fichiers.
Le programme DEMO3.PAS recherche des doublons pour un ensemble de fichiers et les envoie à la corbeille.
Le programme DEMO4\DEMO.LPR est une application fenêtrée qui permet de rechercher les doublons pour un ensemble de fichiers avec en option la possibilité de les envoyer aussitôt à la corbeille.
Le programme DEMO5\DEMO.LPR fait la même chose que ... Voir la suite

LazPaint est un logiciel opensource de dessin utilisant la librairie BGRABitmap. Le dessin se fait avec transparence et antialiasing.

Il est possible de faire des sélections de n'importe quelle forme, d'effectuer une rotation de la sélection, et de dessin à l'intérieur. La sélection est aussi en antialiasing, ce qui permet par exemple de dessiner une ellipse avec un bord non crénelé à l'aide d'une sélection.

Des filtres sont inclus, comme des flous et le dessin des contours.

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

Soyez capable d’identifier et d’utiliser des enregistrements étendus, une forme plus moderne des enregistrements simples. Les enregistrements sont éléments très utiles dès qu’il s’agit de rassembler des données de types différents dans une même structure.
L'exemple d'application permet de créer des nombres complexes et de leur appliquer des opérations mathématiques.

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

Un programme de gestion de bibliothèque en mode graphique : gestion des livres, suivi des prêts, fonctions de recherche.

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

Apprenez à créer, modifier et sauvegarder des fichiers quelconques en utilisant les méthodes offertes par les différents composants de Lazarus - mais aussi en dehors de ces méthodes, avec une approche résolument moderne de la gestion de fichiers : les flux de données (« streams » en anglais). Les routines classiques du Pascal sont succinctement abordées.
l'application d'exemple permet d'analyser des fichiers MIDI (image 1).
Dans le laboratoire, vous êtes invite(e) à réaliser les applications suivantes :

• un convertisseur d ... Voir la suite

MATER - Un programme simple de recherche de mat. Valentin Albillo, 1998.

MATER est un programme simple de recherche de mat, implémenté comme une commande MS-DOS. Etant donné 1° une position légale notée au format FEN, 2° la couleur qui a le trait et 3° un nombre de coups, le programme cherche un coup qui aboutit à un mat en un nombre de coups inférieur ou égal à la limite prescrite.

J'avais téléchargé il y a quelques mois le code source de ce programme, ainsi que la page de présentation au format HTM. Or je viens de constater que la page en question est devenue indisponible.
C'est pourquoi je me suis permis d'ajouter le code source et la page de présentation originale dans les sources de developpez.com.

Voir la suite

Hex est un éditeur hexadécimal à code source ouvert, doté de fonctionnalités utiles pour l'analyse des fichiers binaires.

La fonction NumericViewer permet de considérer une séquence d'octets (commençant à partir de l'octet se trouvant sous le curseur) comme une donnée correspondant à un type numérique standard (byte, shortint, word, single, double, real48...), donnée dont on peut alors connaître la valeur.

La fonction RecordViewer permet, suivant le même principe, d'afficher la valeur d'une donnée de type enregistrement.

Enfin, la fonction ObjectViewer permet d'afficher une image.

Il s'agit d'un mini-éditeur de texte réalisé avec le framework LAMW sous Lazarus.

Il permet de créer un nouveau fichier, ouvrir un fichier existant et le modifier et permet d'enregistrer le fichier modifié éventuellement sous un autre nom et dans un autre dossier. Il est possible de changer la taille des caractères affichés.

Composants utilisés :

• jMenu (menu principal) ;
• jOpenDialog (pour sélectionner un fichier à ouvrir) ;
• jSelectDirectoryDialog (pour sélectionner un nouveau dossier) ;
• jDialogYN (pour confirmer la sauvegarde du fichier) ;
• jEditText (l'éditeur, configuré comme un TMemo) ;
• jPanel (panneau au bas de l'é ... Voir la suite

uEControls 6.1.2 - 04/02/2018

uEControls est une bibliothèque de contrôles d'instrumentation (boutons, jauges, leds...) open source qui fonctionne aussi bien sous Windows que sous Linux.

Elle s'appuie sur la bibliothèque graphique BGRABitmap.

Cette archive contient tous les programmes réalisés par Haypo, disponibles sur son site Turbo Pascal. La plupart d'entre eux nécessitent de télécharger les unités personnelles de Haypo.

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.

Il s'agit d'un petit organiseur personnel réalisé avec le framework LAMW sous Lazarus.

Cet organiseur vous permet de créer des projets et de lier ceux-ci à différentes catégories prédéfinies. Pour chaque projet, vous pouvez créer des actions à réaliser, fixer leur importance, leur attribuer une deadline ; vous pouvez les mettre en pause et les réactiver à volonté. Vous pouvez également créer des rappels et des notes. Le SGBD utilisé est SQLite.

Composants utilisés :

• jMenu (menu principal) ;
• jsViewPager (pour feuilleter les onglets de l'écran principal comme un livre) ;
• jListView (les listes de projets, d'actions, etc.) ;
• jsFloatingButton ... Voir la suite

TGIFViewer 👀
TGIFViewer composant visuel pour l'affichage d'animations au format GIF (Graphic Interchange Format) avec Free Pascal et Lazarus

Compatibilité : Windows, Linux et MacOS

Capacités de TGIFViewer :

• Chargement depuis un stream, un fichier ou une ressource (fonctions LoadFromStream, LoadFromFile, LoadFromResource)
• Extraction des images brutes (**fonction DisplayRawFrame)
• Extraction des images pré-calculées de l'animation (fonction DisplayFrame )
• Affichage avec ou sans transparence (Transparent)
• Gestion silencieuse de certaines données mal encodées pour permette l'affichage des images sans perturber l'utilisateu ... 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.

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

Comment reconnaître et employer une énumération, une structure très utile pour rendre le code plus lisible et plus sécurisé.
L'exemple complet consiste en la création d'une calculatrice (image 1).
Dans le laboratoire, vous êtes invité(e) à réaliser une petite application dans laquelle un contrôle peut être déplacé à volonté à l'exécution, dans la fenêtre principale (image 2).

Soundex est un algorithme phonétique d'indexation de noms par leur prononciation en anglais britannique. Pour un mot, il génère un code sur 4 caractères (1 lettre et 3 chiffres) qui permet de comparer des mots sur un critère phonétique. Plus d'informations sur Wikipédia.

L'algorithme a été un peu compliqué pour prendre en charge le français en plus de la langue anglaise d'origine. Une étape préalable de conversion des voyelles accentuées est donc ajoutée.

La fonction est libre : vous pouvez donc l'exploiter à votre guise. Si vous découvrez un bogue, merci de m'en faire part. Elle est développée avec Free Pascal mais peut être facilement portée sur un aut ... Voir la suite

Paquet Lazarus YHTML permettant d'écrire des applications HTML5 en Pascal Objet.

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

Quels sont les types de chaînes de caractères les plus courants et quelles procédures et fonctions permettent de les manipuler.
L'application d'exemple découpera une phrase en mots ; l'utilisateur aura le choix entre un découpage programmé à la main et un découpage assisté par les routines de l'unité StrUtils (image 1).
Dans le laboratoire, voici les applications à réaliser :

• supprimer les espaces en début ou en fin d’une chaîne (image 2) ;
• classer des chaînes (image 3) ;
• un scrutateur de chaînes de cara ... Voir la suite

Compilateur : Turbo Pascal.

Un superbe programme de dessin, en mode graphique (jusqu'en 1024x768) s'utilisant à la souris. Permet de gérer des images haute définition. Nécessite un vrai DOS ou un bon émulateur pour tourner de manière optimale.