Codes sources Delphi353 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

Comment lister toutes les extensions connues de votre PC dans un ListView.

Utilisation d'un StringGrid pour afficher les diverses polices de caractères, ainsi que le code ASCII des caractères.

Ce programme montre comment dessiner sur tou l'écran depuis Delphi. Et par la même occasion, comment copier une partie de l'écran dans le programme.

Comment limiter la souris dans son déplacement à l'écran.

Cet exemple montre l'utilisation des fonctions FindFirstPrinterChangeNotification et FindNextPrinterChangeNotification afin de surveiller les évènement liés à un serveur d'impression.
Pour l'instant le source montre comment surveiller le serveur local. Je n'ai pas eut pour le moment la possibilité d'essayer sur un serveur distant.

Ce source ne fonctionne que sous Windows NT/2000/XP ou supérieur.

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.

Comment rafraîchir le bureau.

Ce source ne fonctionne qu'avec Windows 2000 serveur et Windows Xp.
Ceci ne tient pas compte non plus d'un système multi-processeurs.

La question initiale était de savoir comment détecter qu'un changement est intervenu dans le presse papier. Après avoir cherché un peu dans les documentations de Microsoft, il apparait que la chose est techniquement assez simple car une API a été concue pour ça.

• Projet Clipboard Viewer

J'ai également intégré un projet dénommé MicroDemo qui ne contient que le code de détection.
Téléchargez MicroDemo.

Je vous propose un petit tour en forêt autour d'un feu de camp. Le tout en 3D avec Firemonkey et avec moins de 90 lignes de codes !
Je n'utilise pas de moteur de particules pour gérer les flammes mais simplement des TPlane que je déplace, réduis et fais tourner pour donner une illusion de flamme.

Petit bonus, le trackbar en bas de a fenêtre permet de simuler la présence du vent plus ou moins fort sur l'axe X. Pour de plus amples informations, j'ai commenté le code source fourni.

A part la piteuse texture utilisée pour les flammes (je ne suis pas graphiste), les autres textures ne sont pas de moi : elles proviennent d'images libres trouvées sur internet.

Ce programme donne en plus la liste des groupes auxquels l'utilisateur appartient.
Ces informations sont celles enregistrées dans le profil local.

Bien sûr, comme c'est des informations sur une session NT, ce programme ne fonctionne qu'avec Window NT, Windows 2000 et Windows XP.

Cette démonstration propose deux solutions permettant de charger une page HTML dans le TWebbrowser. Via ces solutions le chemin d'accés des resources associées aux éléments html (src="...") est contrôlé par le programme.

Exemple :
< img src="foo.jpg" > est chargé dans le webbrowser.
L'image n'est pas affichée (chemin d'accés relatif à la ressource).

Via ces deux solutions, il est possible de passer au webbrowser un chemin d'accés (ex: d:\Data\ ) à la ressource "foo.jpg".

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.

Voici un programme permettant de jouer au "Jeu de la vie".

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

Ce programme est une adaptation d'un programme de Earl F. Glynn disponible ici : Lyapunov Exponents.

Ce programme reste à compléter dans ces fonctionnalités surtout dans la coloration. Il reste aussi à réaliser l'aide en ligne ou au moins les Hint.

Il sera certainement mis à jour dans le futur... De même, si vous trouver des dessins intéressants, vous pouvez m'envoyer les caractéristiques par mail en donnant la séquence, et les intervalles pour a et b. (ne pas m'envoyer d'images SVP).
Une gallerie sera aussi ouverte dans le futur avec les exemples les plus marquants.

L'itinéraire du Cavalier.

Démonstration d'un algorithme pour trouver un chemin passant sur toutes les cases du damier, sans jamais passer deux fois sur la même case. Adapté d'un script Lua.

https://rosettacode.org/wiki/Knight%27s_tour#Lua

Exemple d'utilisation de la bibliothèque Cairo.

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.

Ce source complète ce code source. L'objet enregistré est ici un TFrame plutôt qu'un TPanel. Cette différence est importante car le TFrame contient le code des évènements. Il est ainsi possible de sauvegarder dans le fichier la liaison entre les évènements des composants et le code associé. Pour que ceci fonctionne, les codes des évènements doivent être déclarés dans la partie publiée du TFrame.
Notez aussi que les méthodes présentées ici sont WriteComponentRes et ReadComponentRes, elles permettent d'enregistrer directement dans un fichier sans passer par un flux. Si vous utilisez les méthodes décrites dans Voir la suite

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

Une fonction relativement utile quand on veut connaître le chemin d'une dll, en particulier s'il s'agit d'une dll COM.

Cette fonction gère correctement les 2 types de système d'exploitation possibles (Win9x et WinNT).