DOCUMENTATION EN LIGNE
DE WINDEV, WEBDEV ET WINDEV MOBILE
Aide / WLangage / Fonctions WLangage / Fonctions standard / Fonctions de gestion de Windows / Fonctions Graveur de CD et DVD
  • Effacement des fichiers d'un CD
GraveurEfface (Exemple)
Effacement des fichiers d'un CD
WINDEVWEBDEV - Code ServeurEtats et RequêtesWindowsCode Utilisateur (MCU)Ajax L'exemple suivant permet d'effacer complètement les fichiers présents sur le CD. Le tiroir du graveur s'ouvrira automatiquement à la fin de l'effacement. La procédure "ProcEffacementCD" est appelée régulièrement lors de l'effacement. Les paramètres de cette procédure sont renseignés automatiquement.
// Effacer complètement les fichiers présents sur le CD
// Le tiroir du graveur s'ouvrira automatiquement Ã  la fin de l'effacement
ResEfface est un booléen 
ResEfface = GraveurEfface(graveurEffacementComplet + graveurEjecteAuto, ProcEffacementCD)
// Erreur rencontrée ? 
SI ResEfface = Faux ALORS 
// Affichage de l'erreur 
Erreur(ErreurInfo(errMessage)) 
SINON 
// Effacement lancé
Info("Les fichiers vont Ãªtre effacés du CD")
FIN
// -- Procédure ProcEffacementCD 
// Cette procédure est appelée régulièrement lors de l'effacement
// Les paramètres sont renseignés automatiquement
PROCÉDURE ProcEffacementCD(StatutEff, MessageEff, Param1)
// Evénement rencontré ?
SELON StatutEff
// L'effacement a Ã©té annulé
CAS graveurNotificationAbandon
SI OuiNon("Voulez-vous vraiment annuler l'effacement ?") ALORS
RENVOYER Vrai
FIN
RENVOYER Faux

// Erreur détectée
CAS graveurNotificationErreur
Erreur("Une erreur a Ã©té détectée", MessageEff)

// Effacement terminé
CAS graveurNotificationFinEffacement
SI Param1 = 0 ALORS
Info("Effacement du CD terminé")
SINON
Erreur("Erreur lors de l'effacement " + MessageEff)
FIN
FIN
Version minimum requise
  • Version 10
Documentation également disponible pour…
Commentaires
Cliquez sur [Ajouter] pour publier un commentaire

Dernière modification : 25/05/2022

Signaler une erreur ou faire une suggestion | Aide en ligne locale