Codes sources Delphi353 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

L'utilisation de cette fonction nécessite des droits supplémentaires. La fonction donnée dans le source sur la modification des droits d'un compte permet d'ajouter le droit SE_BACKUP_NAME au compte en cours avant d'effectuer la sauvegarde.

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

Sous Windows NT (NT4, 2000, XP, 2003, etc) il n'est pas possible de supprimer directement une clé qui n'est pas vide. Cette fonction se charge de réaliser la suppression récursive des éléments contenus dans la clé avant de la supprimer.

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

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.

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.

Comment rafraîchir le bureau.

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.

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

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

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

Rappel : Pour répondre à Golbach, Euler lui écrit en 1742 [b]«Tout nombre Pair est somme de deux nombres premiers »[/b] (en 1742 le chiffre 1 était considéré comme étant un nombre premier)

On sait aussi que cette conjecture a été vérifiée par ordinateur pour tous les nombres pairs inférieurs à 4 x 10^18, donc ne restait plus qu'à trouver une méthode pour prouver qu'elle est vraie pour tous nombres qui dépassent les capacité d'un ordinateur.

La théorie à la base de la démonstration est logée dans :
- le pdf Goldbach_Euler_Résumé_Démo_GG_DVP.pdf
- le pdf Goldbach_Euler_Démo_Tableaux_GG.pdf qui est la démonstration complète détaillée.
- et le pdf Goldbach_Euler_Symétries_KR.pdf a été rédigé par notre ami Re ... Voir la suite

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.

une horloge binaire sur votre bureau

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.

Comment créer une fenêtre depuis un dialog de ressource comme VC++.

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

Simple éditeur de texte utilisant par défaut la page de code 850.

Le programme a été compilé avec Delphi XE2.