Codes sources Delphi353 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

Voici une fonction qui permet de faire "beeper" le haut-parleur de votre unité centrale.

Résolution du jeu du mot mystérieux.

Pour cet exemple je me suis servi de tuto déjà existants que j'ai bricolé pour avoir mon résultat.
Le seul morceau de bravoure a été de récupérer le nom du Static text dans lequel WS met son résultat
Par simplicité j'ai modifié les scripts pour ajouter un séparateur, WS en utilise un mais c'est l'espace et dans cet exemple le nom du processeur contient des espaces.
Pour ce qui est du fichier il suffit de demander à WS de renvoyer les résultats dans un fichier txt.
Voir la modification apportée au Script.

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.

Fonction DayOfTheYear pour Delphi 1 à 5.
C'est pour ceux qui n'ont pas Delphi 6-7. Car à partir de cette version, cette fonction, comme beaucoup d'autres, est contenue dans l'unité DateUtils.

Tous les alignements, déplacements et modifications de tailles sont effectués sans l'écriture d'une seule ligne de code. Tout est basé sur les propriétés suivantes diponibles sur tous les composants visuels :
- Anchors : permet de fixer indépendamment les quatre cotés d'un composant sur le bord correspondant de la fiche. Tous les cotés fixés conservent leur distance par rapport au coté correspondant de la fiche. Par défaut les cotés haut et gauche sont fixés, ainsi le composant reste toujours à la même distance du coin haut-gauche de la fiche. En ne fixant que deux cotés formant un angle, le contrôle garde sa taille mais se déplace afin de conserver les distances par rapport à l'angle équivalent de la fiche. Si deux cotés opposés sont ... Voir la suite

Ce source complète ce code source. L'objet enregistré est ici un TFrame plutôt qu'un TPanel. Cette différence est importante car le TFrame contient le code des évènements. Il est ainsi possible de sauvegarder dans le fichier la liaison entre les évènements des composants et le code associé. Pour que ceci fonctionne, les codes des évènements doivent être déclarés dans la partie publiée du TFrame.
Notez aussi que les méthodes présentées ici sont WriteComponentRes et ReadComponentRes, elles permettent d'enregistrer directement dans un fichier sans passer par un flux. Si vous utilisez les méthodes décrites dans Voir la suite

Copie des propriétés publiées d'un composant.
A noter que cette méthode ne copie pas les évènements.
Seules les propriétés publiées ( section published ) sont enregistrées.

Cette méthode permet d'appeler que des méthodes publiées (section published), mais elle est trés pratique pour changer le traitement d'un programme en fonction des choix utilisateur.

Voir ici pour une description complète de cette méthode : Utilisation de la classe NotifyIcon.

Création d'un composant permettant d'afficher l'aperçu d'un économiseur d'écran dans un programme Delphi.

• Projet ScreenSaverPreview

Les économiseurs d'écran sont des exécutables qui doivent respecter quelques contraintes simples. Ils doivent particulièrement supporter certains paramètres en ligne de commande. Celui qui nous intéresse est le paramètre /p. Celui-ci indique à l'économiseur qu'il ne doit pas s'afficher en plein écran mais dans une fenêtre dont le handle est fourni comme second paramètre.
Reste à savoir comment l'arrêter. Il nous suffit d'envoyer un message WM_CLOSE à la fenêtre de l'économiseur. Pour notre composant, nous ... Voir la suite

Source montrant comment modifier certains paramètres du système et notamment ici les couleurs et polices d'affichage.

Table de conversion pour les caractères spéciaux sous forme de .inc à inclure dans votre source.
Version simplifiée ici.

Ce source montre comment activer le mode veille.

Ce source ne fonctionne qu'avec Windows 2000 serveur et Windows Xp.
Ceci ne tient pas compte non plus d'un système multi-processeurs.

Exemple d'utilisation de l'objet TMatchCollectionEnumerator de l'unité RegularExpressions.

Version simplifiée d'un exemple trouvé dans la documentation de Delphi :

http://docwiki.embarcadero.com/CodeExamples/XE2/en/TMatchCollectionCount_(Delphi)

L'objet TMatchCollectionEnumerator permet de parcourir une collection de correspondances.

Compilation testée avec Delphi 10.1.

Comment détecter et appliquer les thèmes sombres ou foncés selon l'environnement de la cible.

Voici quelque jeux en flash. Pour compiler l'exe, il vous faut installer l'ocx fournit dans le zip. J'ai également placé l'exe pour ce qui ne veulent pas installer l'ocx.

Jeu tout simple dans lequel il faut toujours cliquer sur le plus grand nombre de la liste afin de le faire disparaître.

• Téléchargez l'exécutable.

Voici un petit casse-tête où il s'agit de deviner quelle règle régit le passage d'une ligne à l'autre.

Dans l'exemple de l'image jointe, la réponse est la suivante : par exemple, pour trouver le contenu de la 5ème ligne il suffit d'énumérer ce qui se trouve sur la 4ème ligne. A savoir "1 1, suivi de 1 2, suivi de 2 1".

• Téléchargez l'exécutable.