IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Delphi Discussion :

changer l'imprimante par défaut


Sujet :

Delphi

  1. #1
    Membre éclairé
    Homme Profil pro
    Responsable d'une MOE bancaire
    Inscrit en
    Juillet 2003
    Messages
    261
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Responsable d'une MOE bancaire

    Informations forums :
    Inscription : Juillet 2003
    Messages : 261
    Par défaut changer l'imprimante par défaut
    bonjour,

    en fait je cherche à imprimer une page web sur une imprimante de mon choix, et puisque le code de la FAQ imprime tjs sur l'imprimante par défaut :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    WB.ControlInterface.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER, vaIn, vaOut);
    bein vous imaginez que j'ai pensé à déclarer mon imprimante comme celle par défaut. Alors apres une bonne recherche, j'ai découvert que dans ce cas précis, il faut changer la base de registre!!
    Bon, c la première fois que je touche au registre, mais j'ai fais ce code :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    if Registre.KeyExists('HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\PageSetup\printer') = False then
        Registre.CreateKey('HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\PageSetup\printer');
      Registre.WriteString('HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\PageSetup\printer', 'monImprimante');
    quand je l’exécute ce code ne fonctionne pas! et ne retourne rien!!!

    Si quelqu'un connaît comment réparer ca ou comment imprimer sans toucher au registre je suis preneur!

    merci d'avance

  2. #2
    Modérateur
    Avatar de tourlourou
    Homme Profil pro
    Biologiste ; Progr(amateur)
    Inscrit en
    Mars 2005
    Messages
    3 903
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Biologiste ; Progr(amateur)

    Informations forums :
    Inscription : Mars 2005
    Messages : 3 903
    Billets dans le blog
    6
    Delphi 5 Pro - Delphi 11.3 Alexandria Community Edition - CodeTyphon 6.90 sous Windows 10 ; CT 6.40 sous Ubuntu 18.04 (VM)
    . Ignorer la FAQ Delphi et les Cours et Tutoriels Delphi nuit gravement à notre code !

  3. #3
    Membre éclairé
    Homme Profil pro
    Responsable d'une MOE bancaire
    Inscrit en
    Juillet 2003
    Messages
    261
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Responsable d'une MOE bancaire

    Informations forums :
    Inscription : Juillet 2003
    Messages : 261
    Par défaut
    Parfait!!!

    merci bcp tourlourou pour ton aide

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 4
    Dernier message: 17/06/2010, 12h39
  2. Changer l'imprimante par défaut
    Par magicseb007 dans le forum C++Builder
    Réponses: 5
    Dernier message: 12/04/2010, 14h52
  3. Changer l'imprimante par défaut
    Par micoudic dans le forum Delphi
    Réponses: 2
    Dernier message: 07/05/2007, 22h04
  4. changer l'imprimante par défaut
    Par LeXo dans le forum API standards et tierces
    Réponses: 6
    Dernier message: 26/01/2007, 16h39
  5. Réponses: 2
    Dernier message: 10/05/2006, 10h22

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo