Codes sources Pascal346 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

Programme pour générer des engrenages au format Dxf
largement inspiré du logiciel GenDxf existant et diponible avec ses sources en rapideQ (basic objet) à l'adresse : http://technoargia.free.fr/cms2/?Techno:CFAO:GenDxf

Code source en Free Pascal - Lazarus pour windows
Bibliothèque dxf incluse

L'objectif était : Permettre de fabriquer un engrenage droit par une imprimante 3D, ou de découper un engrenage avec une fraise 3 taillles

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Ce programme crée la liste de tous les nombres premiers de 1 à N.

Compilateur : Turbo Pascal for Windows.

Catégorie : nombres complexes.
Le programme ZCircle montre un algorithme de recherche du zéro.
Ce document (en anglais) explique le programme dans tous ses détails.

Ref.: "BASIC Scientific Subroutines, Vol. II" de F.R. Ruckdeschel, BYTE/McGRAWW-HILL, 1981.

Crée un effet de bumping (livré avec l'image).

Une belle fractale. Possibilité de zoomer une partie, de changer la palette de couleur, etc.

Programme qui affiche la date et le saint du jour.

Permet l'évaluation d'expression algébrique sous forme numérique et le tracé de la représentation graphique associée.

Support des fonctions standard, trigonométriques, hyperboliques, logiques ainsi que certaines fonctions utiles.
Possibilité d'ajouter ses propres constantes et fonctions afin de rendre l'unité polyvalente.
Support des caractères spéciaux dans les noms des fonctions et constantes (notamment û, ý, ã, ò, ó, ö, ì, ÿ, etc) !

L'unité n'accepte aucune omission. Ainsi, toutes les opérations doivent figurer dans l'expression, notamment les signes de multiplication.
L'évaluation étant numérique, il convient de porter une attention toute particulière aux ensembles de définition des fonctions et aux ... Voir la suite

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

É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.

Rotation d'un donut en 3D avec un lissage Phong.

Renommer les fichiers d'un répertoire par remplacement d'un préfixe.

Exemple d'utilisation des composants TShellTreeView et TFileListBox.

Conversion d'un projet Delphi de Bob Ferguson.

Collection de petits programmes utilisant l'unité WinGraph, testés avec Free Pascal 2.6.4.

Nombre de ces programmes ont été originellement écrits pour l'unité Graph de Turbo Pascal.

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.

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.

Gestion d'images au format PCX et création d'images BGI à partir d'images PCX.

Compilateur : Turbo Pascal.

Jeu inspiré du célèbre démineur de Windows, sous MS-DOS en mode graphique, avec programmation d'un timer et détournement des interruptions.

La compilation nécessite l'unité TXT.

Dessine une carte en 3D.

Compilateur : Borland Pascal.

Un programme permettant de créer des cartes en utilisant l'effet Plasma et les fractales de Mandelbrot.

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.