Codes sources Delphi349 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

La stéganographie, ou l'art de dissimuler une information dans une autre. Cette source vous propose de cacher une image devant rester "secrète" dans une autre image "support".

Recherche de nombre premiers, même très grands.

Calcul d'une date plus un jour.

Coder un jeu de Taquin en utilisant le nouveau composant TControlList.
Trois versions disponibles : 10.2, 10.3.3 et 10.4.2.

Programme de pilotage du robot simplifié.

Soundex est un algorithme phonétique d'indexation de noms par leur prononciation en anglais britannique. Pour un mot, il génère un code sur 4 caractères (1 lettre et 3 chiffres) qui permet de comparer des mots sur un critère phonétique. Plus d'informations sur Wikipédia.

L'algorithme a été un peu compliqué pour prendre en charge le français en plus de la langue anglaise d'origine. Une étape préalable de conversion des voyelles accentuées est donc ajoutée.

La fonction est libre : vous pouvez donc l'exploiter à votre guise. Si vous découvrez un bogue, merci de m'en faire part. Elle est développée avec Free Pascal mais peut être facilement portée sur un aut ... Voir la suite

Création/test/supression de lecteurs réseau avec Delphi

Utilisation :

ConnecteLecteurReseau(Lecteur,Chemin,User,MotPasse:String);

Connecte le lecteur "Lecteur" au chemin réseau "Chemin" avec le compte "User"/"MotPasse". Cette procédure ne teste pas l'existance du lecteur demandé, il est préférable d'utiliser la procédure suivante :
ConnecteLecteurReseauTest(Lecteur,Chemin,User,MotPasse:String);

Connecte le lecteur "Lecteur" au chemin réseau "Chemin" avec le compte "User"/"MotPasse". Cette procédure teste l'existance du lecteur demandé, si celui-ci existe avec le chemin demandé alors le lecteur existant est conservé.Si le lecteur existe avec un chemin différent de celui demandé, ... Voir la suite

Comment mettre un TProgressBar dans une boîte de dialogue.

Petite fenêtre effectuant un zoom d'une partie de l'écran. NOTES : C'est en cherchant autour du source précédent ( obtenir la couleur d'un point de l'écran ) que j'ai vu la fonction API StretchBlt. Je me suis dit qu'en une ligne on pouvait copier et agrandir une partie de l'écran : donc faire une loupe toute simple !Utilisation :

La loupe se place par défaut en haut à droite de l'écran. Pour la déplacer il suffit de cliquer dessus et de la faire glisser là ou vous voulez. Pour fermer la loupe il faut faire un clic droit dessus. La loupe reste active même quand vous travaillez sur une autre application.

Un petit utilitaire sans prétention qui permet d'effectuer le dump hexadécimal + ASCII
de 2 fichiers et de comparer octet par octet leur contenu.
Les octets identique s'affichent en noir, ceux différents en rouge.
La navigation s'effectue par blocs de 512 octets.

Evidemment, il faut ne comparer que des fichiers à priori semblables !
On peut également s'en servir pour le dump d'un fichier unique.

Le code est très simple, il pourra aussi servir à des débutants comme exemple d'utilisation d'une TDrawGrid.

Programme de recherche de mots, palindromes, anagrammes... (dictionnaire d'env. 280 000 mots). Recherche rapide. Contient aussi un jeu du pendu.

Lancer un fichier avec ShellExecute.

Afficher le nom de volume, le numéro de série et le système de fichiers d'un disque.

Images sous forme de texte (version évoluée).

Ecriture d'un parser numérique en Delphi afin de transformer une chaîne de caractères en valeur flottante ou entière.

Le sujet du défi Pascal 2010 est de réaliser un système de chat.
Le choix de la technologie, des outils et même de la plateforme sont entièrement libres.

Système de Chat, en mode Serveur-Client
Développé sous Delphi 2005, à l'aide d'Indy 10. Composants principaux : TIdTCPClient et TIdTCPServer. TJvRichEdit utilisé pour l'affichage du texte formatté et des smileys.
Contient les sources

Fonctionnalités
- Echange de texte contenant des smileys
- Changement de statuts
- Personnalisation de la couleur du texte
- Liste d'amis avec possibilité d'ignorer des membres
- Possibilité d'envoyer des messages à partir du serveur

A venir :
- Mode multi salons, et conversati ... Voir la suite

XMLCalepin est une application d'annuaire de téléphone utilisant Mybase basée sur le composant TClientDataSet.
c'est ma première application, sachant que le mot de passe pour accéder au programme est : azerty.

Petit jeu d'échecs avec arbitre.

Voici donc un algo de quick sort en pascal, non recursif, qui permet de trier n'importe quel type de données avec la meilleur performance possible . Le quick sort étant sans contestation le tri le plus rapide dans un maximum de cas.

Deux sources qui vont de paire. Elles expliquent comment créer un système d'archives auto-extractibles et donc indépendantes, avec compression/décompression grâce à la librairie zLib.
Prenez le temps de regarder le fichier "lisez-moi.txt" pour la mise en oeuvre et le fonctionnement des sources.