Codes sources Pascal346 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

Gestionnaire de procédures appellées à intervalles réguliers (procédures d'arrière-plan).

Fichiers requis :

• BGPH.PAS
  L'unité contenant toutes les déclarations des procédures/fonctions externes gérant la procédure d'arrière plan.
• BGPH.ASM
  Contient le code des procédures/fonctions utilisés par l'unité BGPH.PAS.
• BGPH.OBJ
  Résultat de la compilation du fichier BGPH.ASM utilisé par l'unité BGPH.PAS.

Exemple de code :

• BGPDEMO.PAS
  Simple démonstration des procédures et fonctions de géstion de procédures appelées à intervalles réguliers.

Développé à l'aide de :

< ... Voir la suite

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.

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Il s'agit d'une calculatrice effectuant des opérations sur des entiers longs sous forme de chaînes, utilisant l'unité PCalcFun.

Ref.: "Turbo Pascal for Windows - Techniques and Utilities" de Neil J. Rubenking, PC Magazine & ZD Press, 1992.

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

==== VALISOA MORPION 1.0 ====

L'objectif du jeu est d'aligner trois pions de même couleur sur la ligne horizontale ou verticale ou diagonale. Le premier joueur à avoir aligné
ses trois pions est le vainqueur.

Type : jeu de morpion
Développeur : Valisoa Jean Hervé
Version : 1.0
Date de sortie : 15/01/2018
Langage de programmation : Pascal
Compilateur : FreePascal 3.0.4
OS : Windows
Profondeur de calcul : 7 demi-coups
Algorithme utilisé : MinMax

Écrit en Lazarus 3.6. 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.

Pour Turbo Pascal 7.0 ou autre compilateur compatible. Nécessite le package objet de Turbo Pascal (contenant les unités Objects, Strings et Memory).

Cette unité définit le type TList, afin de gérer une liste chaînée d'objets quelconques (ceci inclut l'ajout, la suppression, le remplacement et la recherche d'éléments).
Elle définit également le type TStringList, dérivé de TList, pour gérer une liste de chaînes de caractères. En plus des fonctionnalités précédentes, le type TStringList est en mesure de trier la liste et de vérifier si les chaînes ajoutées ne sont pas déjà présentes dans la liste. Il est également possible d'associer à chaque chaîne un objet quelconque.

Attention : les éléments ajoutés ... Voir la suite

Unité permettant d'accéder à la mémoire XMS :

• Gestion d'un tas XMS pour une utilisation plus aisée ;
• Ajout du type flux TXMSStream compatible avec tous les autres flux présents dans l'unité Objects ;
• Gestion avancée des erreurs pour éviter au maximum les plantages ;
• Support des langues française et anglaise pour les erreurs.

Le verrouillage des blocs XMS peut se révéler très aléatoire et doit de ce fait être surveillé de très près.
Il est impossible de verrouiller des blocs d'une taille supérieure à un mégaoctet. En effet, le verrouillage a pour but de ramener en mémoire basse un bloc de mémoire étendue, donc dans le premier mégaoctet. Il est donc évidemment impossible de placer un bloc ... Voir la suite

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

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

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.

Compilateur : Turbo Pascal.

Unité regroupant diverses fonctions de gestion de fichiers.

Compilateur : Turbo Pascal.

Unité implémentant l'objet TIniFile de Delphi permettant de gérer les fichiers ini.

Compilateur : Turbo Pascal.

Il s'agit d'une unité complète de gestion d'écran en mode texte. Cette unité peut est utilisée en lieu et place de l'unité CRT de Turbo Pascal.

Sujets intéressants :
- Routines de bas niveau de gestion du mode texte,
- Fenêtrage avec possibilité de sauvegarde en mémoire et de restauration du contenu d'une fenêtre,
- Routines de lecture au clavier avec possibilités de filtrage de caractères,
- Activation et désactivation du Ctrl-Break et du Ctrl-C,
- Simulation par le BIOS d'une touche pressée au clavier,
- Réglage du typematic du clavier,
- Possibilité de dessiner sa propre police de caractères,
- Modification du curseur.

Compilateur : Turbo Pascal.

Un magnifique solitaire en mode graphique se jouant à la souris. Nécessite un vrai DOS pour tourner de manière optimale.

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.

Compilateur : Borland Pascal.

Une unité permettant à un programme Windows 16 bits d'appeler des fonctions de l'API Windows 32 bits grâce à la technique du thunking générique.

Voir à ce sujet ce tutoriel sur le thunking générique.

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.

Unité permettant d'utiliser la bibliothèque SDL_bgi.

Compatible avec Delphi et avec Free Pascal.

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