Codes sources Delphi353 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

Configurer un curseur personnel.

Si MSN se lance à chaque émarrage et que vous ne le voulez pas, voici un simple code pour fermer MSN et enlever la ligne de lancement au démarrage de celui ci, des reg.
Mais des que vous utilisez Outlook, MSN se remet.

Il s'agit juste d'obtenir la couleur d'un point de l'écran...

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.

Le résultat de la commande est converti en caractères Windows ou lieu de caractères DOS.

Dessin à l'aide d'un StringGrid

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

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.

Dégradé entre deux couleurs.

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.

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

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.

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.

Petite démo pour montrer le principe d'utilisation de TBitMap.ScanLine.
Ce programme montre aussi un exemple simple de thread auxiliaire afin de rendre fluide une animation sans avoir recours à DoubleBuffered qui ralentit énormément les animations.
L'utilisation de GetTickCount permet d'avoir une vitesse d'animation à peu près constante suivant les PC.

Pour pallier au fait que les aperçus ne sont que des images fixes... Voici la version compilée du programme : source0069.exe.zip [200Ko].

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

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.

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.

Jeu de mémoire de Mateusz Janda.

Version française par Roland Chastain.

Compilé avec Delphi 10.1 Berlin.