Codes sources Pascal339 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

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.

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

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.

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

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

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.

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

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

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. Il s'agit du projet du vainqueur.

Unité permettant la gestion des matrices de taille quelconque, afin d'effectuer du calcul numérique réel.

Calcul matriciel standard supporte : addition, multiplication, calcul de la transposée, de l'inverse, du rang, du déterminant.
Ajout de calcul matriciel optimisé 3D sur matrices 4x4 : addition, multiplication, transposée, transformation d'un point, création des matrices de zoom, translation et rotation.

Attention : les lignes et colonnes des matrices sont indexées à partir de 1, et on indique toujours en premier l'index de la ligne. Ainsi, si M est une matrice, alors M.GetCell(3, 2) renverra la valeur placée ligne 3, colonne 2.

L'objet TMatrix est peu adapté aux calculs 3D. On lui préfèrera l ... Voir la suite

X-Parameters est une application inspirée de la discussion :
https://www.developpez.net/forums/d1756313/environnements-developpement/delphi/bases-donnees/debutant-aide-creation-table/

Elle a pour objet l'inscription de prix de vente d'un produit alimentaire selon plusieurs paramètres :

-L'année
-Le mois
-La zone (dépôt)

Les graphes permettent la visualisation des résultats par Zones, par mois et par années
mais aussi la sauvegarde des images sous forme BMP destinées à l'impression.

Outils:

Lazarus 1.8 RC5
Firebird 2.5.7
Flamerobin

Merci pour votre Intérêt.

DelForLaz est la version Lazarus de DelForEx d'Egbert van Nes. C'est un outil de formatage pour le code Pascal. Il s'intègre à Lazarus, sous la forme d'une commande "Pretty-Format File" dans le menu "Source".

Ce composant est d'autant plus intéressant qu'il est livré avec son code source complet.

Cette petite application permet de chronométrer le temps d'infusion de votre thé. Il est possible de chronométrer jusqu'à 5 thés simultanément. Selon le thé choisi, l'application enverra un signal sonore et visuel dès que le temps minimal d'infusion puis le temps maximal seront atteints.

Les composants suivant ont été utilisés :

• un jToneGenerator, permettant de produire deux sortes de bips ;
• 5 jTimer, produisant un tic d'horloge chaque seconde ;
• 5 jPanel identiques, contenant respectivement :
• un jSwitchButton, permettant d'activer le chronomètre associé ;
• un jTextView, affichant le chronomètre ;
• un jToggleButton, permettant de déma ... Voir la suite

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

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

Initiation au graphisme.
L'application d'exemple est la réalisation de l'animation d'un attelage écossais, c'est-à-dire un mécanisme roratif doté d'un ergot qui permet de transformer un mouvement circulaire en mouvement rectiligne.
Dans le laboratoire, il s'agit d'apporter des améliorations à cette application.

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

Comment manipuler les nombres réels représentés par la technique de la virgule flottante.
L'application d'exemple illustre le calcul approché du nombre Π à partir de la somme 1 - 1/3 + 1/5 - 1/7 + 1/9 etc. (méthode de Leibniz-Grégory), avec dessin d'un graphique (image 1).
Dans le laboratoire, vous êtes invité(e) à réaliser :

• une application similaire à l'exemple mais utilisant la méthode de calcul de Nilakantha ;
• une application calculant la puissance entière d'un nombre réel (image 2) ;
• une application d ... Voir la suite

Écrit en Lazarus 3.6, testé sur Windows. Ne devrait pas poser de problème pour l'adapter en Free Pascal ou Delphi.
C'est un compteur digital, avec ses fonctions classiques permettant d'interrompre le comptage précis à tout moment, de le reprendre ou de le réinitialiser.
1. Affichage digital d'un compteur avec des images pour les digits.
2. Un comptage du temps de rafraîchissement de l'affichage est précis et utilise l'horloge interne.
3. Les commandes Start, Pause et Stop sont basées sur une gestion des interruptions du compteur : la solution choisie est Application.ProcessMessages dans la boucle de temporisation pour permettre à l'application de rester réactive.

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

Que sont les booléens et les expressions booléennes ? Comment les utiliser dans vos programmes ?
L'application d'exemple est un évaluateur d'expressions logiques. Les fonctionnalités RAD de Lazarus sont bien mises en évidence.

Compilateur : Turbo Pascal.

Ce programme réalise la compression par l'algorithme de Huffman dynamique. L'intérêt est donc qu'il n'y a qu'un seul parcours du fichier source et pas de dictionnaire transmis dans le fichier compressé.

Simple application pour faciliter l'usage de youtube-dl, l'outil de téléchargement de vidéos YouTube.