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 :

Arrêter une émission sur le port


Sujet :

Delphi

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre du Club
    Homme Profil pro
    Dessinateur industriel
    Inscrit en
    Février 2003
    Messages
    6
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 55
    Localisation : France, Loire (Rhône Alpes)

    Informations professionnelles :
    Activité : Dessinateur industriel

    Informations forums :
    Inscription : Février 2003
    Messages : 6
    Par défaut Arrêter une émission sur le port

    Bonjour,

    Au cours d’une émission sur le port avec TComPort je voudrais avoir la possibilité
    D’arrêter l’émission.
    Lorsque je ferme le port avec la procédure ComPort1.Close au milieu d’une émission mon application reste bloquer.

    Comment arrêter l’émission proprement ?
    merci.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
     
    procedure TForm1.BntTransmissionClick(Sender: TObject);
    begin
    ComPort1.Open;//Ouverture du port
     
    ComPort1.WriteStr(Memo1.Text);//Ecriture sur le port
     
    ComPort1.Close;//Fin de l’émission
     
    end;
     
    procedure TForm1.BntOuvrirClick(Sender: TObject);
    begin
    if OpenDialog1.Execute then
        Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
    end;
     
    procedure TForm1.BntAnnulerClick(Sender: TObject);
    begin
         ComPort1.Close;
    end;

  2. #2
    Membre chevronné
    Avatar de Philippe Gormand
    Inscrit en
    Mars 2002
    Messages
    330
    Détails du profil
    Informations forums :
    Inscription : Mars 2002
    Messages : 330
    Par défaut
    Salut.


    Essais la procédure "AbortAllAsync" qui appele la fonction "PurgeComm", ou bien "SetBreak(nOff : Boolean)" qui appele la fonction "EscapeCommFunction".

    Sans garantie. En étudiant le source, tu trouveras peut être un moyent.

    A+

  3. #3
    Membre Expert Avatar de edam
    Homme Profil pro
    Développeur Delphi/c++/Omnis
    Inscrit en
    Décembre 2003
    Messages
    1 894
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Maroc

    Informations professionnelles :
    Activité : Développeur Delphi/c++/Omnis
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Décembre 2003
    Messages : 1 894
    Par défaut
    Citation Envoyé par Philippe Gormand
    Salut.


    Essais la procédure "AbortAllAsync" qui appele la fonction "PurgeComm", ou bien "SetBreak(nOff : Boolean)" qui appele la fonction "EscapeCommFunction".

    Sans garantie. En étudiant le source, tu trouveras peut être un moyent.

    A+
    +
    voir ici et ici
    on les combinenet

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

Discussions similaires

  1. Recupérer une information sur le port serie d'un ordi
    Par franck SEFIC dans le forum Composants VCL
    Réponses: 29
    Dernier message: 29/01/2008, 18h24
  2. Comment lire une pin sur le port série du pc
    Par KENPACHI dans le forum LabVIEW
    Réponses: 1
    Dernier message: 25/05/2007, 12h56
  3. [réseau] capter une requête sur un port spécifique
    Par ebaynaud dans le forum Langage
    Réponses: 1
    Dernier message: 29/09/2006, 13h26
  4. Lire le status d'une imprimante sur le port parallèle
    Par narmataru dans le forum Linux
    Réponses: 16
    Dernier message: 21/11/2005, 14h43
  5. [USB]envoyer une trame sur le port USB
    Par ced38100 dans le forum Entrée/Sortie
    Réponses: 3
    Dernier message: 03/11/2005, 12h54

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