Codes sources Delphi344 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

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]"

Exemple d'utilisation de l'objet TMatchCollectionEnumerator de l'unité RegularExpressions.

Version simplifiée d'un exemple trouvé dans la documentation de Delphi :

http://docwiki.embarcadero.com/CodeExamples/XE2/en/TMatchCollectionCount_(Delphi)

L'objet TMatchCollectionEnumerator permet de parcourir une collection de correspondances.

Compilation testée avec Delphi 10.1.

Jouez à "Puissance 4" contre l'ordinateur.

Le jeu de l'adversaire artificiel est basé sur une évaluation instantanée de la position après le coup, au moyen d'expressions régulières.

Ce programme affiche la liste des moniteurs NOTES :

Attention : ne fonctionne pas avec Windows95.

Réserver une partie de la mémoire en mémoire physique et non virtuelle. NOTES : ATTENTION : Se source ne fonctionne qu'avec Windows 2000 Pro et Windows XP Pro. D'autre part si vous êtes débutant ne l'utilisez pas, car des erreurs dans l'utilisation des fonctione AWE peut avoir des conséquences graves.Cet exemple est la traduction de celui de MSDN situé ici :

http://msdn.microsoft.com/en-us/library/Aa366531Pour que la réservation fonctionne, il faut que l'utilisateur est le droit de verrouiller des pages en mémoire. Ce n'est jamais le cas par défaut même pour les sessions administrateurs. Pour ajouter ce droit, il faut procéder comme suit ( Windows 2000 ... Voir la suite

Lecture des informations contenues dans les fichiers CDA de Windows. Ces fichiers sont visibles dans l'explorateur lorsque l'on ouvre un CD audio.

Générations de soustractions imprimées à effectuer à la main. Le programme imprime également les résultats.

Ce source montre comment activer le mode veille.

Tester si les instructions SSE SSE2 ou 3DNow sont disponibles sur le processeur.

Voici quelque jeux en flash. Pour compiler l'exe, il vous faut installer l'ocx fournit dans le zip. J'ai également placé l'exe pour ce qui ne veulent pas installer l'ocx.

Voici un petit jeu très connu, qui en est pour le moment à la première version, avec certainement encore beaucoup de bugs.

Voici un petit casse-tête où il s'agit de deviner quelle règle régit le passage d'une ligne à l'autre.

Dans l'exemple de l'image jointe, la réponse est la suivante : par exemple, pour trouver le contenu de la 5ème ligne il suffit d'énumérer ce qui se trouve sur la 4ème ligne. A savoir "1 1, suivi de 1 2, suivi de 2 1".

• Téléchargez l'exécutable.

La fonction logique PosExact est dérivée de Posex. elle présente l'avantage de ne pas explorer inutilement la chaine, car elle abandonne dès qu'il y a un écart.
elle est donc beaucoup plus rapide.
Elle est très utile dans un serveur car par exemple PosExact('GET', Str1) renvoie TRUE uniquement si la chaine commence par 'GET'
De même PosExact(url,Str1,6) renvoie TRUE pour la chaine 'GET /url'.
[codeinline]function PosExact(const SubStr, S: string; Offset: Integer = 1): Boolean;
asm
test eax, eax
jz @Nil
test edx, edx
jz @Nil
dec ecx
jl @Nil

push esi
push ebx

mov esi, [edx-4] //Leng ... Voir la suite

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

Les versions de DELPHI STARTER ne comportent pas de formateur de code intégré.
Mais heureusement un formateur en ligne de commande "Formatter.exe" est disponible dans le répertoire \bin.

Trois méthodes sont indiquées pour le lancer depuis l’EDI et formater le projet en cours :
- avec un lanceur (Delphi) en mode graphique ;
- avec un lanceur (Delphi) en mode console ;
- directement.


Ces trois méthodes sont détaillées dans un fichier d’aide Windows « FormaterCode DelphiStarter.chm ». Les exécutables et le code source des deux programmes sont fournis.

Petite démonstration d'une course de voiture en 3D que j'ai réalisée pour le Congrès Delphi 2019 organisé qui s'est tenu à Paris le 19/11/2019.

Il n'y a pas de moteur physique mais la démonstration est jouable et permet de voir :
- la création d'un décor extérieur en 3D (heightmap);
- utilisation d'un cubemap;
- gestion des collisions en 3D.

Le tout est multi plateformes et a été réalisé avec Delphi Rio et Firemonkey.

Le code est disponible sur mon Github : https://github.com/gbegreg/FMXRace
Les binaires sont disponibles sur mon site : http://gbesoft.fr/jeux.php#fmxrace

Pilotage d'un moteur UCI.

Projet Delphi basé sur le composant TConsoleIO d'Andrey Sevast'yanov.

Personnellement je me sers de cette petite application pour déboguer mon moteur UCI, mais en fait elle peut servir dans d'autres contextes, pour dialoguer avec une application console qui fonctionne de la même façon qu'un moteurs d'échecs, c'est-à-dire qui reçoit plusieurs commandes successives et répond au fur et à mesure. Je crois qu'ExifTool, par exemple, fonctionne de cette façon.

En fait ce qui est intéressant c'est le composant TConsoleIO lui-même. Je l'ai retouché pour qu'il soit compatible avec Delphi XE. La version originale du composant, pour Delphi, se trouve dans le dossier composant\archive.