Codes sources Pascal345 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Résolution d'équation diophantienne ax+by = c (a,b,c,x,y étant des nombres entiers).

Ref.: "Mathématiques en Turbo-Pascal" de M. Ducamp et A. Reverchon, Eyrolles, Paris, 1988.

L'équation ax + by = c, où les coefficients a, b, et c, sont trois entiers relatifs et où les inconnues x et y sont entiers relatifs, est une des équations diophantiennes les plus simples à résoudre. Sa résolution s'appuie sur l'algorithme d'Euclide, le théorème de Bachet-Bézout et le théorème de Gauss. Dans l'ensemble des entiers relatifs, une telle équation possède, ou bien aucune solution, ou bien une infinité de solutions. Lorsque les coefficients et ... Voir la suite

Exemple d'utilisation de la bibliothèque BGRABitmap. Animation représentant le mouvement d'un corps sur une trajectoire elliptique.

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Ce programme teste si un nombre entier est premier ou pas.

Ref.: "Mathématiques par l'informatique individuelle" de H. Lehning et D. Jakubowicz, Masson, Paris, 1982.

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Ce programme construit un triangle de Pascal.

Ref.: "Exercices en Turbo Pascal" de Claude Delannoy, Eyrolles, 1997.

Calendrier perpétuel par Frédéric Hardy.

Programme qui affiche le calendrier de l'année courante (y compris les fêtes catholiques mobiles), et éventuellement des années précédentes ou suivantes.

Le programme permet également de créer et d'éditer pour chaque année un fichier personnel des événements importants.

Le programme, originellement publié en 1993, dans le magazine Réponse Micro, a été retouché pour être compatible avec l'unité ptcGraph.

Compilateur : Turbo Pascal for Windows.

Catégorie : nombres complexes.
Programme de démonstration de comptage de racines complexes.

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

Compilateur : MIDlet Pascal

J'ai developpé avec MIDlet Pascal le jeu des Tours de Hanoï, une première version avec 4 disques totalement jouable sur téléphones portables.

Pour ceux qui veulent tester le jeu directement sur leur téléphone, vous pouvez télécharger directement les fichiers JAD et JAR.

Unité permettant d'accéder à la mémoire LIM/EMS.

L'utilisation de EMSFreeMem ne doit se faire qu'avec des handles qui ont ete attribués par EMSGetMem. Si vous perdez ces handles, alors la mémoire allouée sera perdue jusqu'au redémarrage de l'ordinateur. Il est impossible de la récupérer. Ne le tentez sous aucun prétexte !
Ne tentez jamais d'utiliser EMSFreeMem avec des handles fictifs, sous peine de pertes mémoires et matérielles, notamment au niveau des disques durs !
L'utilisation de cette unité avec un environnement protégé n'a aucun sens et ne doit pas être tentée, pour eviter tout conflit avec l'interface DPMI.

Configuration minimale nécessaire :

• Processe ... Voir la suite

C'est une extension non autonome de l'unité Vbe2.

Elle apporte de nouvelles fonctions pour une gestion encore plus élaborée des graphismes :

• Affichage de figures géometriques avec texture ;
• Support plus évolué des formats d'images Bitmap, Icones, Targa, Gif, Pcx ;
• Détection automatique du type d'image ;
• Possibilité de suivi dans l'avancement du chargement des images ;
• Ajout de fonctions de copie d'images de grande taille ;
• Support de la transparence ;
• Gestion des entrées clavier (ReadLnGr, ...) avec arriere-plan.

Un mode graphique doit etre initialisé avant l'appel d'une des fonctions de cette uni ... Voir la suite

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.

Projet MSEide+MSEgui d'Alexander Artyomov.

Très simple application qui permet de noter des anniversaires dans une grille, en face du jour de l'année. Les données sont enregistrées automatiquement quand on ferme l'application.

Exemple intéressant d'utilisation de la classe TStringGrid de MSEgui.

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

Deux animations pour patienter.

Les animations sont dessinées au moyen de la bibliothèque Cairo.

Projet Lazarus 1.6.

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

Introduction à la bibliothèque Cairo.

Dessiner un cœur avec 4 courbes de Bézier.

https://www.dil.univ-mrs.fr/~regis/CM-CAIRO/

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.

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.

Compilateur : Borland Pascal.

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

Le programme iCyberi@ est une petite démo de logiciel de gestion de cyber-café.

Il s'occupe de la gestion des Photocopies , Telephonie et du Surf puis totalise automatiquement les montants consommés et payés puis imprime (HP ,EPSON ,etc...) pour permettre au gérant de voir les dépenses et les gains.

Edité sous Unix\Ubuntu 2.xx \gedit et compilé avec le paquet FPC (peut être aussi compilé avec Turbo 7 , Free Pascal, Lazarus, etc...)

Objectif :
============================
Utilisation de la table ASCII uniquement pour la construction graphique
(il est mis de côté les unites Graph, GLUT (OpenGL), etc...)

KEYS:
============================
-- Appuyer sur (ENTRER) pour Avanc ... Voir la suite

Programme pour l'exécution automatisée de l'outil TOUCH.EXE livré avec le compilateur Borland C++ 5.5.1.

Modifie la date de tous les fichiers du répertoire dans lequel le programme est exécuté ou, le cas échéant, de tous les fichiers du dossier passé en paramètre. La nouvelle date est la date courante.

Compilation : Free Pascal, Virtual Pascal.

Testé sous Windows 8.1.

Mise à jour du 20/07/2016.
Le programme a été entièrement réécrit. Il est désormais conçu pour être utilisé avec l'outil TOUCH.EXE livré avec le compilateur Embarcadero C++ 7.20.