Delphi & Pascal798 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

Pour créer ce lien il faut suivre les étapes suivantes :
1 - Ajouter un label sur une fiche ;
2 - Définir un police avec le style souligné ( Label1.Font.Style=[fsUnderline] ) ;
3 - Modifier le curseur du label ( Label1.Cursor=crHandPoint ) ;
4 - Ajouter un Hint sur le label ( Label1.ShowHint=True et Label1.Hint='Visitez mon site :' ) ;
5 - Sur le OnClick ajouter le code ci-dessous :

Procedure TForm1.Label1Click(Sender: TObject);
Begin
ShellExecute(Handle,'OPEN','http://nono40.fr.st',Nil,Nil,SW_SHOW);
End;

Il faut ajouter ShellApi dans le Uses pour que le code fonctionne.

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

Table de conversion pour les caractères spéciaux sous forme de .inc à inclure dans votre source.
Version simplifiée ici.

Exemples montrant comment dessiner avec la bibliothèque Cairo dans une fenêtre ptcGraph.

Voici quelques routines pour vous simplifier la vie dans la gestion des chaînes multiples de type C/C++.

Une chaîne multiple contient n chaînes à zéro terminal. Un double zéro indique la fin de la chaîne multiple.

Cette unité contient un "Class Helper for TPopupMenu" qui ajoute la propriété "Size" au composant "TPopupMenu" de FireMonkey.
Elle calcule les dimensions (Height & Width) qu'aura le popup menu à l'affichage.

Elle duplique une partie du code de l'unité FMX.Menu de Delphi car celui-ci se trouve dans la partie Implémentation et est donc innaccessible.
Le calcule duplique partie de la méthode TPopupMenu.Popup qui calcule ces valeurs

Programme permettant de jouer au jeu des Allumettes (ou jeu de Nim). Le joueur qui prend la dernière a perdu.

• Téléchargez l'exécutable

ODBC Reg permet de générer du code Delphi à inclure dans une application pour créer des sources ODBC. Le code est généré à partir des sources ODBC se trouvant dans la base de registre.

Fonctionnalités :

1. affichage des sources de données Système et Utilisateur ;
2. affichage des pilotes ODBC présents ;
3. génération de code Delphi pour la création des sources ODBC.

Voila un jeu tout simple réalisé avec la SDL, un jeu de labyrinthe où Donkey Kong doit aller manger les bananes (j'ai volé l'idée sur un TP du sdz).
C'est un code commenté (150 lignes de commentaires sur 200 lignes de code), afin de proposer une initiation à la SDL sur un exemple concret.
Les images sont dans le zip, le code est compilé avec Free-Pascal.
Pour le faire marcher, assurez-vous de posséder les librairies de la SDL (les .dll sous Windows et les .so sous Linux).
Bonne lecture et faites moi part de vos avis.

Durandal est un très simple programme d'échecs, avec une interface UCI, capable de jouer aux échecs traditionnels, aux échecs aléatoires de Fischer et aux échecs Capablanca.

Il joue quasi instantanément et n'est pas fort du tout, mais joue des coups relativement sensés.

Il a sa propre interface graphique intégrée, permettant de jouer aux échecs Capablanca. L'interface graphique est un projet Lazarus.

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

Jimi est un petit insecte qui apparaît de temps en temps sur l'écran de votre ordinateur.

Le programme est un exemple d'utilisation de la bibliothèque BGRABitmap. Ne fonctionne que sous Windows.

Pour arrêter Jimi, vous devez passer par le gestionnaire de tâches.

FLRE (Fast Light Regular Expressions) est une bibliothèque pour l'utilisation des expressions régulières, écrite en Pascal. Ses atouts sont, outre son étonnante rapidité, le fait qu'elle soit compatible aussi bien avec Delphi (ancienne et nouvelle génération) qu'avec Free Pascal.

La bibliothèque tient dans deux unités, [b]FLRE.pas[/b] et [b]FLREUnicode.pas[/b]. Elle peut également être compilée en bibliothèque dynamique, auquel cas on peut s'en servir dans un programme écrit dans un autre langage que le Pascal.

FLRE supporte à la fois les styles Perl et POSIX.

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.

Programme qui convertit automatiquement le contenu du presse-papiers lorsqu'il s'agit de l'URL d'une discussion ou d'un post du forum. L'URL est alors remplacé par sa forme courte.
À défaut d'avoir une utilité réelle, le programme est surtout un exemple d'utilisation d'expressions régulières alternatives avec l'unité RegExpr. Attention au nombre total de parenthèses !

Bien que les procédés de la sécurisation d'une application restent plus ou moins efficaces, cet essai propose un
qui est pratique et facile d'utilisation vous trouverez un fichier 'aide.txt' qui explique son utilisation.

Un ensemble de petits programmes pour aborder et comprendre l'interpréteur d'expression des [b]LiveBindings [/b]
Ces exemples sont utilisés dans le deuxième volet de mon tutoriel sur les LiveBindings : Effets de Bord, à paraitre prochainement

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

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

Dérivé d'un exemple du manuel de référence Freepascal, voici une procédure d'analyze d'un objet Lazarus à des fins de debug:

Exemple d'usage:

analyzeObject([items], 'items');

items (TJSONObject) = { variable0 : "[wan=adsl]", start0 : 1, stop0 : 10 }

analyzeObject([lastOptions], 'lastOptions');

lastOptions (TStringList) =
[ 0]: 3
[ 1]: "[wan=adsl]"