Codes sources Delphi353 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

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

Différencier les touches ENTER des pavés numériques et alphabétiques NOTES : Les évènements OnKeyDown et OnKeyup, ne permettent pas de faire cette différence. Seule l'interception des messages windows permet de faire la différence. Pour plus d'information il faut regarder l'aide en ligne sur le message WM_KEYDOWN.

CmdMax est une petite application Windows permettant de maximiser la fenêtre de l'interpréteur de commandes, afin que celle-ci occupe toute la hauteur et toute la largeur de l'écran. Il est également possible de passer des paramètres à l'application pour choisir la position de la fenêtre et ses dimensions (voir exemples dans les commentaires du code source).

CmdMax a originellement été écrit en C.

La compilation de CmdMax a été testée avec Delphi 7, Delphi XE2 et Free Pascal 2.6.4.

Dessin à l'aide d'un StringGrid

Dégradé, fixe et animé, dans un StringGrid.

Comment ouvrir une form dans un conteneur, comme un TPanel par exemple.

Souvent, dans mes applications je propose à l'utilisateur le choix d'un style différent à partir d'une liste ou en recherchant un fichier d'extension style.
Il y a plusieurs manières de procéder pour appliquer le style choisi soit en chargeant le TStyleBook de la forme soit en utilisant le TSyleManager mais là n'est pas mon propos.

Je voulais montrer la dominance de couleur d'un style avant même de l'appliquer au programme. Pas si simple quand l'on se penche sur le contenu de ces fichiers de style !

Je vous propose cette solution qui va extraire la couleur de fond.

Carte de voeux de Noël intégrant un effet de neige sur un ciel en dégradé.

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.

Comment activer ou désactiver l'autorun d'un lecteur CD.

Le nom de ce programme peut être généré par le programme lui-même. Découvrez des dizaines de milliers de nouveaux mots.

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.

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.

Sources pour l'intégration d'image BMP dans un RxRichEdit.

Démonstration de l'utilisation de scanline. Par exemple rendre une image floue, supprimer une composante de couleur ou la faire "glisser".

Ce source a pour but de montrer comment modifier les droits d'un compte pour des fonctions particulières. Par exemple pour la sauvegarde d'une partie de la base de registre un compte doit avoir le droit SE_BACKUP_NAME.

L'utilsation de la fonction ci-dessous est simple :
- Pour activer un droit :
LoggedSetPrivilege(GetCurrentProcess,'SeBackUpPrivilege',True);
- Pour desactiver un droit :
LoggedSetPrivilege(GetCurrentProcess,'SeBackUpPrivilege',False);

Cette fonction retourne True si la résolution à été changée avec succès. Si le paramètre Memoriser est à True, le changement est inscrit dans le registre et est donc permanent.

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.

Configurer un curseur personnel.

EasyFindStr

Programme destiné à faciliter ou à expliquer l'utilisation de la commande FINDSTR.

La commande FINDSTR permet de chercher une chaîne dans un ensemble de fichiers. Pour connaître
toutes les options de cette commande, ouvrez l'Invite de commandes et tapez "help findstr".

Projet Delphi 10.1 Berlin.