Codes sources Delphi353 ressources dans cette catégorie Retrouvez ici tous les meilleurs téléchargements
Codes sources Delphi
Liste des 353 ressources de cette catégorie
|
|
|
|
Ce programme permet à l'utilisateur de dessiner des rectangles et/ou des ellipses sur la fenêtre du programme. Ensuite il supprime l'intérieur des figures spécifiées et la fenêtre devient transparente à ces emplacements.
|
Licence : Non renseignée
- Publié le 18/02/2013
- Taille 7,3 Ko
- Auteur : jca
|
|
|
|
|
Comment obtenir les coordonnées et l'état des boutons de la souris sans utiliser un hook système.
|
Licence : Non renseignée
- Publié le 21/02/2013
- Taille 195 Ko
- Auteur : Sub0
|
|
|
|
|
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.
|
Licence : Non renseignée
- Publié le 21/02/2013
- Taille 3,4 Ko
- Auteur : Nono40
|
|
|
|
|
Comment exécuter les fichiers CPL de votre système.
|
Licence : Non renseignée
- Publié le 23/02/2013
- Auteur : DelphiCool
|
|
|
|
|
Le résultat de la commande est converti en caractères Windows ou lieu de caractères DOS.
|
Licence : Non renseignée
- Publié le 23/02/2013
- Taille 2,9 Ko
- Auteur : Nono40
|
|
|
|
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.
J'ai également intégré un projet dénommé MicroDemo qui ne contient que le code de détection.
Téléchargez MicroDemo.
|
Licence : Non renseignée
- Publié le 23/02/2013
- Auteur : Pierre Castelain
|
|
|
|
|
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".
|
Licence : Non renseignée
- Publié le 23/02/2013
- Taille 245 Ko
- Auteur : Chaps
|
|
|
|
Unité permettant d'utiliser la bibliothèque SDL_bgi.
Compatible avec Delphi et avec Free Pascal.
|
Logiciel -
Licence : Non renseignée
- Publié le 31/01/2023
- Éditeur : Ioulianos Kakoulidis
|
|
|
|
|
Ce source présente une fonction simple de mise à l'heure du PC à partir d'une application Delphi. Elle utilise la fonction API SetSystemTime, l'heure passée en paramètre de cette fonction doit être celle de Greenwich. Elle est donc corrigée à l'aide de la fonction API GetTimeZoneInformation afin de déterminer le décalage horaire dû au fuseau, et le décalage dû à la période été/hiver.
|
Licence : Non renseignée
- Publié le 08/02/2013
- Taille 2,5 Ko
- Auteur : Nono40
|
|
|
|
Afficher le nom des constantes de définition d'un type énuméré.NOTES : C'est un truc tout simple pour afficher les nom de constante utilisés dans un type énuméré. Il permet aussi de déterminer l'indice dans le type en ne connaissant que le nom.Par exemple si on définit un type enuméré du style TMonTypeEnum=(mtUN,mtDEUX,mtTROIS), Delphi traite les variables de ce type comme des variables de type ordinal. Il n'est pas directement possible d'en afficher le nom comme on affiche un entier avec IntToStr. Le plus souvent on utilise un Case Of pour donner les noms :
Var t:TmonTypeEnum;
...
Case t Of
mtUn:LeNom:='mtUN';
mtDeux:LeNom:='mtDEUX';
mtTrois:LeNom:='mtTROIS';
End; ... Voir la suite
|
Licence : Non renseignée
- Publié le 08/02/2013
- Taille 2 Ko
- Auteur : Nono40
|
|
|
|
|
Dégradé, fixe et animé, dans un StringGrid.
|
Licence : Non renseignée
- Publié le 31/01/2013
- Auteur : jca
|
|
|
|
|
Éléphant schématisé (avec de bien plus jolies défenses).
|
Licence : Non renseignée
- Publié le 08/02/2013
- Taille 2Ko
- Auteur : jca
|
|
|
|
|
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.
|
Licence : Freeware
- Publié le 21/04/2018
- Auteur : gbegreg
|
|
|
|
|
Softice est un débogueur (pour détecter les bugs d'une application. Il permet d’exécuter une application (plus précisément Windows) pas à pas.
Cela permet de savoir précisément où l'erreur existe.
Il permet aussi de voir le contenue de la mémoire et des registres à un moment d’arrêt.
Il est utile de s'avoir si Softice est en route, pour éviter les abus sur votre création par exemple.
SoftIce n'est pas à mettre entre toutes les mains, novice s'abstenir.
|
Licence : Non renseignée
- Publié le 03/02/2013
- Taille 10Ko
- Auteur : DelphiCool
|
|
|
|
|
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.
|
Licence : Non renseignée
- Publié le 09/02/2013
- Taille 1,6 Ko
- Auteur : Nono40
|
|
|
|
|
Le Caret est le petit curseur clignotant situé dans les composants EDIT de windows. Ce curseur indique la position d'insertion des caractères saisis au clavier. Il est possible de modifier ce curseur.
|
Licence : Non renseignée
- Publié le 09/02/2013
- Taille 2,9 Ko
- Auteur : Nono40
|
|
|
|
|
Ceci est pour corriger le problème de Delphi sur TRadioGroup.SetFocus, car dans ce cas le focus n'est pas placé sur un des boutons du composant. Le clavier n'est donc ensuite pas utilisable pour changer la valeur du RadioGroup.
Le code présenté ici permet de mettre le focus directement sur l'un des boutons du groupe.
|
Licence : Non renseignée
- Publié le 09/02/2013
- Taille 1,8 Ko
- Auteur : Nono40
|
|
|
|
|
Un utilitaire console Delphi qui fournit une aide interactive en indexant automatiquement une FAQ et en répondant par similarité sémantique. Le programme normalise les questions, génère des tokens et des bigrams, construit des vecteurs TF‑IDF (IDF légèrement renforcé) et recherche la meilleure réponse via similarité cosinus.
Il inclut une génération automatique d’une table de synonymes à partir des questions, un fallback basé sur tokens uniques et bigrams pour les requêtes courtes ou mal formulées, un menu de suggestion quand aucune réponse n’est trouvée.
L’affichage utilise des couleurs console pour distinguer prompt, question, réponse et erreurs.
|
Code source -
Licence : Non renseignée
- Publié le 08/11/2025
- Auteur : XeGregory
|
|
|
|
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.
|
Licence : Non renseignée
- Publié le 23/02/2013
- Auteur : Nono40
|
|
|
|
|
L'unité WinGraph de Stefan Berinde, retouchée pour être compatible avec Delphi XE et versions suivantes.
Le dossier .\original contient le paquetage original de WinGraph 1.1.
Le dossier .\demo\chessboard contient un échiquier basé sur l'unité WinGraph.
|
Licence : Non renseignée
- Publié le 31/10/2017
- Éditeur : Stefan Berinde
|
|