High-Tech
Santé-Médecine
Droit-Finances
CodeS-SourceS
Inscription
Plan
Connexion
Rechercher un code, un tuto, une réponse
Accueil
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Tous les langages
Delphi / Pascal
Java
Python
SQL
RegEx
Flash
ASM
IRC
Graphisme
PDA
ColdFusion
Foxpro
Flex
Visual Basic / VB.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
PHP
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C/C++/C++.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Javascript
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C#/.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
ASP/ASP.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Accueil
Connexion
Déposer un code
Code
Recherche
Haut
Forum
Visual Basic
Sujet Précédent
Sujet Suivant
Comment detecter le cd
cs_atchum
Messages postés
12
Date d'inscription
mardi 16 avril 2002
Statut
Membre
Dernière intervention
28 août 2003
- 14 déc. 2002 à 21:05
cs_Tresor
Messages postés
38
Date d'inscription
jeudi 24 octobre 2002
Statut
Membre
Dernière intervention
1 mai 2006
-
15 déc. 2002 à 16:29
Comment detecter l'insertion d'un cd dans le lecteur.
Afficher la suite
A voir également:
Comment detecter le cd
Python détecter touche clavier
✓
-
Forum Python
Installer delphi ds150e sans cd
-
Forum C / C++ / C++.NET
Detecter lettre
✓
-
Forum Visual Basic
Copier vers un CD/RW
-
Forum Delphi / Pascal
Détecter le clavier sans avoir le focus
-
Forum Delphi / Pascal
1 réponse
Réponse 1 / 1
cs_Tresor
Messages postés
38
Date d'inscription
jeudi 24 octobre 2002
Statut
Membre
Dernière intervention
1 mai 2006
15 déc. 2002 à 16:29
Je vais te proposer une ptite solution:
*Dans ta form, tu crée un control Timer et tu met l'interval à 3000.
*Tu crée un control Dir1 (qui permet de voir les repertoires dans un lecteur).
*tu crée enfin un label1
Et dans le code du timer, tu met ceci:
On Error GoTo GestionErreur
Dir1.path = "d:" 'ou le nom de ton lecteur cd
msgbox("Il y a un cd dans le lecteur !")
exit sub
GestionErreur:
Label1.caption = "pas de cd dans le lecteur"
Comme tu le remarque, mon code test la presence du cd chaque 3 secondes, et en cas d'erreur, il retourne le message "pas de cd dans le lecteur"
en cas de problème, repond moi et je vais te faire la source complète dans un zip ! ;)
Discussions similaires
Installation Delphi
chrisix1
-
30 mai 2007 à 17:56
Francky23012301
-
31 mai 2007 à 16:04
Installer Delphi7 avec windows7
cs_jema
-
19 janv. 2012 à 04:23
Jako
-
17 nov. 2023 à 17:49
installation delphi
ideal ima
-
30 nov. 2014 à 18:52
denisbertin
-
31 août 2020 à 14:03
Détection d'une touche clavier (ou combinaison de 2 touches)
cs_budhax
-
26 juil. 2007 à 20:20
Whismeril
-
22 juil. 2021 à 17:52
Utiliser la touche "barre d'espacement"
Shakan972
-
15 avril 2007 à 17:33
aera group
-
2 mai 2007 à 18:59
Rejoignez-nous