Codes sources Pascal268 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

ZeosLib est un ensemble open source de composants de bases de données pour MySQL, PostgreSQL, Interbase, Firebird, MS SQL, Sybase, Oracle et SQLite. Ces composants fonctionnent aussi bien avec Delphi, FreePascal/Lazarus, Kylix qu'avec C++ Builder.

La bibliothèque est particulièrement intéressante pour les éditions limitées de Delphi (version Starter), ainsi que pour les EDI comme Lazarus peu dotés dans le domaine des bases de données.

Le lycéen est une application basique réalisée avec:

-Lazarus 1.8 RC5
-Firebird 2.5.7 32
-Flamerobin

-Paquets installés: LazReport, BGRA Controls.

ayant pour but la gestion des notes des élèves dans les
établissements éducatifs lycées CEMs Institues etc.

Cette gestion est l'objet de:

-Inscription des notes.
-Calcul des moyennes de ces notes.
-Affichage et impression des bulletins.

-L'établissement offre plusieurs options(spécialités).
-Chaque option contient plusieurs classes.
-Chaque classe contient plusieurs élèves.

-Afin d'établir un bulletin, on a besoin de tous ces paramètres
mais aussi de l'année de l'opération ... Voir la suite

Jeu d'échecs pour le système d'exploitation Windows.

L'application communique avec un moteur au moyen du protocole UCI.

Inclut un moteur UCI original avec son code source.

Petite application de jeu de 421 pour Windows développée avec Lazarus.
Le tirage des dés se fait de façon pseudo-aléatoire en utilisant la fonction Random.
L'image de la face des dés est montrée selon le tirage.
Le joueur bénéficie de 3 lancers maximum pour réaliser 421. Après chaque lancer, il peut sélectionner les dés qu'il désire conserver avant le prochain lancer.
Après les 3 lancers, le joueur peut rejouer en cliquant sur le bouton "Rejouer" qui apparaît à ce moment là alors que le bouton "Lancer" disparait.

C'est un "Puissance 4" écrit pour Lazarus.

Budget

C'est un logiciel que j'utilise pour gérer mes comptes sous Linux.
Sous windows,des adaptations sont à faire ,principalement sur les scripts et les fichiers.
Si vous n'avez pas de freebox,la partie put et get freebox peut être supprimée.
La documentation se trouve dans le fichier documents/aide

GLScene est une bibliothèque 3D basée sur OpenGL, proposant des composants et objets visuels pour Delphi, C++ Builder et Lazarus.

Bonjour à tous !

Il s'agit d'une bibliothèque de gestion et calcul des vecteurs 2D, 3D et 4D. Elle prend aussi en charge les matrices, quaternions, plans homogènes, "BoundingBox", etc. Elle comprend également une unité pour le calcul rapide par approximation des sinus, cosinus, arcos, atan2, etc.

Cette bibliothèque est compatible avec les environnements Linux, Windows 32 et 64 bits.

Le projet principal à compiler est fondé sur les classes "FPCUnit" de FPC et Lazarus pour des tests unitaires, ce qui nous permet de vérifier nos fonctions, mais aussi de faire des tests de performances pour différents formats de fichiers (csv, bbcode, html, markdown).

À l'heure actuelle, seules les versions SSE sont m ... Voir la suite

TGVTransition est un composant visuel pour l'affichage de transitions d'image à image.

Compatibilité : Windows et Linux

Fonctionnalités de TGVTransition :

• Plus d'une centaine de transitions déjà implémentées ;
• Contrôle de la vitesse des transitions ;
• Contrôle de l'opacité (source et destination) ;
• Lissage de l'affichage (équilibre entre qualité et vitesse) ;
• Interpolations modulables pour chaque transition ;
• Effets spéciaux sur l'image source (pixellisation, niveaux de gris, contour, ...) ;
• Gestion automatique facultative du nombre de bandes horizontales et verticales ;
• Redimensionnement automatique des images.Voir la suite

Puissance 4 de Fabien Torre.

Version Lazarus par Roland Chastain.

Compilé avec Lazarus 1.6.2.

L'intérêt de ce programme réside, d'une part, dans l'utilisation du composant TStringGrid, qu'on a détourné de sa finalité initiale, pour en faire une grille de "Puissance 4". La propriété DefaultDrawing a été réglée à FALSE, de sorte que le dessin des cellules est intégralement effectué par la méthode Redessiner. Par ce moyen on se débarrasse du carré en pointillés qui d'ordinaire marque la cellule sélectionnée. En contrepartie, il faut dessiner même les cases vides.

Mais l'intérêt du programme réside surtout dans la partie "intelligence artificielle", et dans la mise en œuvre de l'algorithme "MinMax". < ... Voir la suite

TGIFViewer 👀
TGIFViewer composant visuel pour l'affichage d'animations au format GIF (Graphic Interchange Format) avec Free Pascal et Lazarus

Compatibilité : Windows, Linux et MacOS

Capacités de TGIFViewer :

• Chargement depuis un stream, un fichier ou une ressource (fonctions LoadFromStream, LoadFromFile, LoadFromResource)
• Extraction des images brutes (**fonction DisplayRawFrame)
• Extraction des images pré-calculées de l'animation (fonction DisplayFrame )
• Affichage avec ou sans transparence (Transparent)
• Gestion silencieuse de certaines données mal encodées pour permette l'affichage des images sans perturber l'utilisateu ... Voir la suite

Ce paquetage renferme l'ensemble des unités réalisées par Haypo et disponibles sur son site Turbo Pascal. Il s'agit de la version compilée de ces unités ; les codes sources sont téléchargeables via le lien ci-dessous.

Unités hardware (matériel) :

• Clavier : Gestion du clavier (vérification de la présence d'une touche dans le tampon et lecture d'une touche dans le tampon ou à défaut attend une pression de touche).
• DrvSouris : Gestion hardware de la souris (lecture de sa position, des boutons, changement du curseur...).
• EcranTxt : Gestion de l'écran en mode texte 80x25 caractères et surtout en COULEURS (16 exactement).
• EcranVGA : Gestion de l'écran dans le mode VGA : 320x200 pixels en ... Voir la suite

Un jeu du Snake banal avec la SDL et compilé avec Lazarus sous Win XP.

Points Positifs :

• Gestion des événements, du son et de la SDL (pointeurs...) et algorithme du Snake;
• Programme structuré (je m'étais lancé dans la POO au début mais sans succès);
• Graphique pas mal :) fait sous Paint ^^ (c'est pas évident du 16x16 pixels sous Paint);
• La SDL est portable donc, logiquement, le code est portable.

Points à finir :

• Quand vous perdez, obligation de quitter pour relancer le jeu;
• Pas de gestion du score;
• Pas de gestion d'erreurs (s'il y a un problème, le programme se plante en utilisant les messages classiques de Windows);
• Pas de gestion du temps (au début, ... Voir la suite

Bonjour,
Je vous présente mon jeu de serpent développé en Pascal sous dev-pascal en utilisant l'unité graph.
Le code n'est pas optimisé.
Le but était de montrer à des élèves débutants en programmation comment créer un jeu en Pascal en travaillant un peu avec les graphiques (dessin de cercles, de rectangles...).
Je peux écrire un article explicatif si c'est demandé.
Merci pour vos remarques.

Cette archive contient tous les programmes réalisés par Haypo, disponibles sur son site Turbo Pascal. La plupart d'entre eux nécessitent de télécharger les unités personnelles de Haypo.

Un programme de gestion de bibliothèque en mode graphique : gestion des livres, suivi des prêts, fonctions de recherche.

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

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

TSlideBar est un composant semblable à TTrackBar, mais au look entièrement personnalisable et indépendant de l'OS.
Dérivé de TGraphicControl, il est donc transparent.
5 styles prédéfinis pour une utilisation rapide + style bsOwnerDraw (dessin dans événement OnPaint).
Soyez créatifs, modifiez ou créez de nouveaux styles. C'est très simple à faire, et je suis à votre disposition pour toute explication.
Le zip comprend une démo (rien à installer).
Testé sous Win7, Win8, Linux mint.

TThElementPanel est un composant visuel disposant d'un header (avec caption et petite flèche). Un simple clic sur le header réduit la hauteur du composant ou restaure la hauteur totale.
TThGroupPanels est un composant visuel conteneur de ElementPanels. Il gère automatiquement la hauteur des éléments en fonction de sa propre hauteur. Il peut aussi accepter le défilement..

Le zip contient une démo ainsi qu'un pdf explicatif. La démo ne nécessite pas l'installation des composants.

Vos commentaires sont les bienvenus.

Cordialement
Thierry