Codes sources Delphi353 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

Programme de présentation de la fonction API ShFileOperation() NOTES : Cette fonction est très utile pour toutes les fonctions groupées de fichiers. Il est possible de copier/suprimer/décplacer des répertoires complets, de gérer les collisions de noms, la création automatique des sous-répertoire en une seule opération. Cette fonction permet aussi de renommer des groupes de fichiers

Et autre avantage, elle accepte les caractères génériques * et ?.

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

Voici le code permettant de changer la couleur d'un TProgressBar

TSystemInfo est une classe qui centralise la collecte d’informations système Windows (Windows 10/11) en combinant WMI et API Windows.

Compatible avec Delphi 2009 et versions ultérieures (Delphi XE2 … Delphi 10.x / 11.x / ...)

Manipulation simple de Liste.

Utiliser FindFirst en récursif pour scruter les sous-répertoires PRÉSENTATION : Utiliser FindFirst en récursif pour scruter les sous-répertoires

ZIP : Téléchargez le zip : miroir 1 , miroir 2 APERÇUS : NOTES : Cette exemple montre l'utilisation des procédures FindFirst, FindNext et Find close de manière recursive pour compter les fichiers d'un répertoire.

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.

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

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

Programme d'exemple de l'utilisation des notifications de modification de Windows. NOTES : Ce programme montre l'utilisation des notifications de modification de répertoire. C'est utile pour suivre les modifications apportées aux fichiers dans un répertoire.

Par exemple si vous affichez la liste de certains fichiers dans une ListBox ou un TreeView, il est possible de mettre la liste à jour seulement quand un fichier est ajouté et/ou supprimé.

La surveillance est effectuée dans un autre Thread afin de ne pas bloquer l'application principale.

Cette unité permet au programme de s'effacer lui-même.

Tout est dans le titre. Voici une unitée qui ne rajoute que très peu d'octets à votre application et qui sert à extraire une ressource vers un fichier. en utilisant les API.

C'est un composant libellé dont le texte est orientable et étirable NOTES : Installation:

Installer le composant TOrLabel contenu dans le fichier UOrLabel.PASUtilisation: comme un label mais avec quelques changements :

- la propriété Font n'existe pas, utilisez OrFont

- OrFont.Orient définit la rotation par pas de 0,1 degré

- OrLabel ne fonctionne qu'avec des polices TrueType

- Alignement/WordWarp etc n'existent pas...Remarques:

TOrFont n'est pas descendante de TFont, elle ne peut donc pas être assignée à un autre composant. Mais vous pouvez l'utiliser dans vos propres composants : voir la méthode Paint du TOrLabel pour l'utilisation du TOrFont.

TOrFont et TOrLabel ... Voir la suite

Indy est une bibliothèque de composants réseau pour Delphi, C ++ Builder, Delphi.NET et FreePascal.


Cette bibliothèque est incluse dans l’installation par défaut de RAD Studio depuis 2006.

Exemple de zoom simple (sans problèmes dans les bords de l'écran).

Destiné aux débutants en Delphi (ou aux débutants en aide chm !).
HelpnDoc est gratuit pour une utilisation personnelle. Il permet à partir du même projet de générer l'aide aux formats chm, hlp, pdf, Kindle...
L’intégration de l’aide chm à une application est valable pour tout fichier chm qu’il ait été créé avec HelpNdoc ou non.
Le code source pour Delphi 7 et XE est fourni.

Objet de la mise à jour de Février 2015 :
Récriture complète de la procédure de création de l’unité des constantes de l’aide.
Mises au point mineures.

Comment limiter les entrées d'un TEdit à des chiffres.

Jeu de Casse Briques.

Cette petite application montre comment utiliser la fonction MAPISendMail pour envoyer (grâce au client mail par défaut du système) un mail avec pièce(s) jointe(s).

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.