Tout est dans le zip;
Télécharger le zip
SOURCE EXCELLENT ! 10/10Inekman
IL y a un probleme avec un composant TLabelTime inutile et la recherche de project2.dpr qui n'a pas lieu d'etre.Ne pas tenir compte du commentaire ci-dessous si une mis a jour du fichier a ete faite.La solution pour ce qui sont interessé par cette source (interessante).- Avant d'ouvrir les fichiers, renommer le fichier dragdrop.dpr par project2.dpr- Apres avoir ouvert le fichier, supprimer dans la liste des uses l'unite LabelTime.
Excellent et simple. La variable globale Choix est pratique et rend le source plus lisible que l'utilisation du transtypage :TControl(Source).parent := TWincontrol(sender);// équivalent à Choix.parent := Form1;Toutefois l'utilisation du transtypage permet d'écrire le même code en divisant le nb de procédures par deux.Une seule procédure de chaque pour tous les labels (ou autres contrôle d'ailleurs). Il suffit seulement d'affecter la même procedure à tous les événements des contrôles déplaçables, puis la même à tous les c'est en fait l'utilité principale des paramètre tels que "sender" et "source".
bravoo
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 598 752 membres 19 nouveaux aujourd'hui 15 441 membres club