Codes sources Pascal333 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

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.

Compilateur : Virtual Pascal

J'ai développé un programme d'installation de BP7 alternatif, multilingue (FR, UK, NL, DE), qui, outre l'installation des binaires et des unités standard, propose d'installer les sources de la RTL et des exemples. Le programme règle les répertoires par défaut dans les fichiers de configuration et crée un raccourci sur le bureau.

Sujets intéressants :

• Utilisation des tables de chaînes pour développer un programme multilingue ;
• Utilisation du shell Windows pour choisir un répertoire d'installation ;
• Création de raccourci sur le bureau ;
• Copie de fichiers à l'aide de l'API.

Compilateur : Virtual Pascal.

Le code source suivant utilise la fonction SHFileOperation de la bibliothèque Shell32.dll. La fonction n'étant pas déclarée par défaut dans l'unité Windows de Virtual Pascal, il faut la déclarer comme external, avec la convention d'appel StdCall.

Dans la structure de type LPSHFILEOPSTRUCT utilisée, il faut utiliser l'option FO_DELETE comme paramètre wFunc et FOF_ALLOWUNDO comme flag.

Simple jeu de morpion utilisant l'algorithme Negamax. Traduction en Pascal d'un programme de Bernard Helmstetter.

Crée l'effet d'une lentille (zoom). Contrôlé à la souris.

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

Compilation de plasmas (au nombre de 6), très colorés et très rapides.

Un superbe effet de tunnel (la texture est crée automatiquement : c'est un effet de plasma).

Un effet de tunnel avec texture.

PASHeader permet d'insérer des en-têtes dans des fichiers Pascal, individuellement ou par lot. Il offre une panoplie d'outils pour automatiser et/ou simplifier les processus de choix des fichiers à traiter, de création et de gestion des en-têtes et de modèles, ainsi que d'exécution des insertions et substitutions.

Les fichiers qui font partie de projets ou de paquets Lazarus et Delphi sont automatiquement extraits pour être traités. Si elles existent, les informations de version des projets et paquets Lazarus peuvent elles aussi être extraites automatiquement.

Entièrement écrit en Pascal à partir de Lazarus, le programme fonctionne sous Linux et Windows, en anglais ou en français. En plus du code source, le proj ... Voir la suite

Le programme ics2pas fabrique une unité en Pascal contenant les fêtes du jour pour toute une année, à partir des données extraites du fichier nominisYYYY.ics.


Usage :

ics2pas nominisYYYY.ics


Compilation :

Free Pascal


Téléchargement des fichiers ICS :

http://nominis.cef.fr/contenus/telechargement.html


Pour savoir comment utiliser l'unité nominisYYYY.pas, veuillez consulter le programme de démonstration demo.pas. Pour chaque jour il y a une ou deux fêtes, et pour chaque fête il y a deux liens vers le site Nominis.

Cute Albuma est une version améliorée de la manipulation des images faite avec les composants
du paquet 'Graphics 32'.
L'ajout d'un Timer et d'un trackBar permet de contrôler la vitesse de la diffusion automatique des images.
L'ajout d'un CheckBox permet à son tour de choisir entre le mode automatique et le mode manuel.

Essai d'une fonction permettant de déterminer si une application Windows donnée est un programme d'échecs supportant le protocole UCI et, le cas échéant, de connaître le nom du moteur et celui de son auteur.

Les forms archivés sont des forms dont les noms sont stockés dans
un Mémo après l'ouverture de chacun d'eux.

Ainsi en utilisant un bouton UpDown on pourra afficher facilement
les forms dont les nom existent déjà dans ce mémo.

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.

Compilateur : Turbo Pascal.

Package complet permettant d'utiliser les polices TrueType dans un programme MS-DOS (unité Graph). Supporte également les polices Windows vectorielles et bitmap, les polices BGI et BIOS.

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.

Compilateur : Borland Pascal.

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

Compilateur : Borland Pascal.

Il s'agit d'un utilitaire permettant de contrôler le volume du son de la carte Sound Blaster 16.

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