Codes sources Delphi346 ressources dans cette catégorie Retrouvez ici tous les meilleurs téléchargements
Codes sources Delphi
Liste des 346 ressources de cette catégorie
|
|
Un truc tout simple pour créer des boutons et des labels sur plusieurs lignes au moment de la conception.
Voici la méthode à suivre :
- Faire un clic droit sur la fiche ;
- Choisir "Voir comme texte" ;
- Chercher le composant dont vous voulez modifier le caption ;
- Modifier la propriété Caption comme indiqué ci-dessous dans le code en ajoutant des #13 ( caractère retour chariot ) ;
- Faire de nouveau un clic droit ;
- Choisir "Voir comme fiche".
Cette méthode ne fonctionne pas avec TButton ou TEdit.
|
Licence : Non renseignée
- Publié le 09/02/2013
- Auteur : Nono40
|
|
|
Ce source présente une méthode simple pour enregistrer et lire des composants dans un fichier.
La description de la méthode employée est dans les commentaires du source.
Attention : dans le cas de sauvegarde de composants personnalisés, seules les propriétés ( au sens POO ) sont enregistrées.
Pour tester la méthode, il suffit de lancer l'application. De créer un panneau avec le bouton "créer". Puis de l'enregistrer dans un fichier avec le bouton "sauver...". Ensuite pour relire le fichier il suffit de détruire le panneau actuel, ou de fermer/relancer l'application. Le bouton "Charger" permet alors de lire une sauvegarde du panneau avec tous ses boutons.
|
Licence : Non renseignée
- Publié le 09/02/2013
- Taille 3,7 Ko
- Auteur : Nono40
|
|
|
Pour le défi Pascal 2012, il s'agit de réaliser un jeu librement inspiré d'un célèbre jeu de plateau créé par Max Kobbert : le Labyrinthe.
Il en existe plusieurs variantes mais rien ne vous empêche de créer la vôtre !
Le défi 2012 n'a aucune contrainte de plateforme ni de compilateur. Il est accessible tant aux débutants qu'aux développeurs confirmés : l'originalité et la créativité peuvent compenser le côté purement technique.
Règlement du défi
Téléchargez l'exécutable seul
|
Licence : Libre
- Publié le 10/02/2013
- Taille 8,6 Ko
- Auteur : Paul TOTH
|
|
|
Démonstration de l'utilisation de scanline. Par exemple rendre une image floue, supprimer une composante de couleur ou la faire "glisser".
|
Licence : Non renseignée
- Publié le 11/02/2013
- Auteur : jca
|
|
|
Création d'un composant WinForm personnalisé dérivant du type System.Windows.Forms.UserControl. Ce composant est une horloge analogique avec ou sans l'aiguille des secondes.
La méthode proposée ici est l'adaptation à Delphi 8 de l'article de CGI : Création d'un contrôle WinForm pour .Net.
|
Licence : Non renseignée
- Publié le 13/02/2013
- Taille 15 Ko
- Auteur : Nono40
|
|
|
Associer une extension à son application.
|
Licence : Non renseignée
- Publié le 13/02/2013
- Auteur : DelphiCool
|
|
|
Comment énumérer les clés et valeurs des registres.
|
Licence : Non renseignée
- Publié le 13/02/2013
- Auteur : DelphiCool
|
|
|
Ce programme montre comment obtenir la liste des polices disponibles, plus quelques petits gadgets.
|
Licence : Non renseignée
- Publié le 18/02/2013
- Taille 7,1 Ko
- Auteur : jca
|
|
|
Comment avoir un curseur personnalisé dans votre application.
|
Licence : Non renseignée
- Publié le 21/02/2013
- Taille 1,7 Ko
- Auteur : DelphiCool
|
|
|
Aligner et adapter les composants d'une fiche en fonction des changements de taille.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 conserv ... Voir la suite
|
Licence : Non renseignée
- Publié le 08/02/2013
- Taille 2,8 Ko
- Auteur : Nono40
|
|
|
Je vous propose un petit tour en forêt autour d'un feu de camp. Le tout en 3D avec Firemonkey et avec moins de 90 lignes de codes !
Je n'utilise pas de moteur de particules pour gérer les flammes mais simplement des TPlane que je déplace, réduis et fais tourner pour donner une illusion de flamme.
Petit bonus, le trackbar en bas de a fenêtre permet de simuler la présence du vent plus ou moins fort sur l'axe X. Pour de plus amples informations, j'ai commenté le code source fourni.
A part la piteuse texture utilisée pour les flammes (je ne suis pas graphiste), les autres textures ne sont pas de moi : elles proviennent d'images libres trouvées sur internet.
|
Licence : Freeware
- Publié le 21/04/2018
- Auteur : gbegreg
|
|
|
Quelques manières d'utiliser l'explorateur.
|
Licence : Non renseignée
- Publié le 03/02/2013
- Auteur : DelphiCool
|
|
|
Jeu d'échecs écrit par Marcel Poots, incluant un adversaire artificiel.
Le code source a été légèrement retouché, sans conséquence sur le fonctionnement du programme, pour être compilé avec Delphi 7.
Le jeu a une option "Internet" (non testée). Cette fonctionnalité est basée sur la bibliothèque Indy.
|
Licence : Non renseignée
- Publié le 30/10/2015
- Éditeur : Marcel Poots
|
|
|
Dégradé entre deux couleurs.
|
Licence : Non renseignée
- Publié le 03/02/2013
- Taille 7Ko
- Auteur : jca
|
|
|
Comment exécuter les fichiers CPL de votre système.
|
Licence : Non renseignée
- Publié le 23/02/2013
- Auteur : DelphiCool
|
|
|
Voici une fonction pour imprimer un TBitmap
|
Licence : Non renseignée
- Publié le 21/02/2013
- Auteur : DelphiCool
|
|
|
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.
|
Licence : Non renseignée
- Publié le 09/02/2013
- Taille 1,6 Ko
- Auteur : Nono40
|
|
|
Ceci est pour corriger le problème de Delphi sur TRadioGroup.SetFocus, car dans ce cas le focus n'est pas placé sur un des boutons du composant. Le clavier n'est donc ensuite pas utilisable pour changer la valeur du RadioGroup.
Le code présenté ici permet de mettre le focus directement sur l'un des boutons du groupe.
|
Licence : Non renseignée
- Publié le 09/02/2013
- Taille 1,8 Ko
- Auteur : Nono40
|
|
|
Conversion de caractère en code ASCII.
|
Licence : Non renseignée
- Publié le 09/02/2013
- Taille 6,4 Ko
- Auteur : jca
|
|
|
Sprays de formes et de comportements divers.
|
Licence : Non renseignée
- Publié le 11/02/2013
- Auteur : jca
|
|