Codes sources Delphi353 ressources dans cette catégorie Retrouvez ici tous les meilleurs téléchargements
Codes sources Delphi
Liste des 353 ressources de cette catégorie
|
|
|
|
Enregistrer/Lire le contenu d'un TStringGrid dans un fichier .INI NOTES : Pour enregistrer le contenu il faut appeler la procédure EcritureGrille avec les paramètres :
Grille : composant de type TStringGrid à sauvegarder
NomFichier : nom du fichier .INI
CasesVides : Indique si les cellules vides sont enregistrées dans le fichier .INI. A False les cellules vides ne sont pas enregistrées, ceci réduit la taille du fichier .INI si la grille contient beaucoup de cellules vides. Par défaut CasesVides est à True.Pour lire le contenu il faut appeler la procédure LectureGrille avec les paramètres :
Grille : composant de type TStringGrid à sauvegarder
NomFichier : nom du fichier .INI
|
Licence : Non renseignée
- Publié le 08/02/2013
- Taille 2,7 Ko
- Auteur : Nono40
|
|
|
|
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
|
Licence : Non renseignée
- Publié le 08/02/2013
- Taille 2 Ko
- Auteur : Nono40
|
|
|
|
|
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.
|
Licence : Non renseignée
- Publié le 08/02/2013
- Taille 1,9 Ko
- Auteur : Nono40
|
|
|
|
|
Dessin à l'aide d'un StringGrid
|
Licence : Non renseignée
- Publié le 31/01/2013
- Auteur : jca
|
|
|
|
|
Dégradé, fixe et animé, dans un StringGrid.
|
Licence : Non renseignée
- Publié le 31/01/2013
- Auteur : jca
|
|
|
|
|
Comment ouvrir une form dans un conteneur, comme un TPanel par exemple.
|
Licence : Non renseignée
- Publié le 31/01/2013
- Auteur : Sub0
|
|
|
|
|
L'unité WinGraph de Stefan Berinde, retouchée pour être compatible avec Delphi XE et versions suivantes.
Le dossier .\original contient le paquetage original de WinGraph 1.1.
Le dossier .\demo\chessboard contient un échiquier basé sur l'unité WinGraph.
|
Licence : Non renseignée
- Publié le 31/10/2017
- Éditeur : Stefan Berinde
|
|
|
|
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.
J'ai également intégré un projet dénommé MicroDemo qui ne contient que le code de détection.
Téléchargez MicroDemo.
|
Licence : Non renseignée
- Publié le 23/02/2013
- Auteur : Pierre Castelain
|
|
|
|
|
Comment activer ou désactiver l'autorun d'un lecteur CD.
|
Licence : Non renseignée
- Publié le 03/02/2013
- Taille 2Ko
- Auteur : DelphiCool
|
|
|
|
|
Approximation de la valeur de pi par la méthode de Monte-Carlo.
|
Licence : Non renseignée
- Publié le 03/02/2013
- Taille 8Ko
- Auteur : jca
|
|
|
|
|
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.
|
Licence : Non renseignée
- Publié le 03/02/2013
- Taille 10Ko
- 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
|
|
|
|
|
Sources pour l'intégration d'image BMP dans un RxRichEdit.
|
Licence : Non renseignée
- Publié le 09/02/2013
- Taille 276 Ko
- Auteur : Sub0
|
|
|
|
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].
|
Licence : Non renseignée
- Publié le 23/02/2013
- Taille 5,4 Ko
- Auteur : Nono40
|
|
|
|
|
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
|
|
|
|
|
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);
|
Licence : Non renseignée
- Publié le 13/02/2013
- Taille 2,2 Ko
- Auteur : Nono40
|
|
|
|
|
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.
|
Licence : Non renseignée
- Publié le 18/02/2013
- Auteur : Nono40
|
|
|
|
|
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.
|
Licence : Non renseignée
- Publié le 18/02/2013
- Taille 7,3 Ko
- Auteur : jca
|
|
|
|
|
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.
|
Licence : Non renseignée
- Publié le 14/02/2017
- Auteur : Roland Chastain
|
|
|
|
|
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.
|
Licence : Non renseignée
- Publié le 23/02/2013
- Auteur : DelphiCool
|
|