1. #1
    Membre du Club
    Inscrit en
    janvier 2004
    Messages
    54
    Détails du profil
    Informations forums :
    Inscription : janvier 2004
    Messages : 54
    Points : 56
    Points
    56

    Par défaut Trier une chaîne pour enlever les sauts de ligne

    Bonjour

    J'utilise un mini clavier + arduino bluetooth pur envoyer des ordres à mon programme.
    Comme composant j'utilise le Tsdposerial.
    Réglé sur 57600 bauds, il connecte bien le clavier.
    Sur l’événement "onrxdata" j'ai essayé de copier directement sur un mémo, mais là ou il devrait y avoir un caractère par ligne, il y a le caractère et plusieurs sauts de ligne.
    Avec le code suivant, j'ai encore un saut de ligne en trop :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    procedure TForm1.lzRxData(Sender: TObject);
    var
    a:string;
    begin
    a:=lz.ReadData;
    if a<>'' then   form4.Memo1.Lines.Add(a[1]);
    end;
    Je crois savoir que le mémo en rajoute un mais il me reste à éliminer celui (ou ceux) qui proviennent du port com.
    Je ne vois pas trop quoi faire .

  2. #2
    Membre du Club
    Inscrit en
    janvier 2004
    Messages
    54
    Détails du profil
    Informations forums :
    Inscription : janvier 2004
    Messages : 54
    Points : 56
    Points
    56

    Par défaut

    bon, j'ai trouvé
    il suffit de rajouter un petit delay
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    procedure TForm1.lzRxData(Sender: TObject);
    var
    a:string;
    begin
    delay(500);
    a:=lz.ReadData;
    form4.Memo1.Append(a[1]);
    end;

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

Discussions similaires

  1. [WD-2010] Comment installer une macro pour supprimer les sauts de paragraphe
    Par lendabee dans le forum Word
    Réponses: 3
    Dernier message: 07/03/2014, 09h54
  2. Enlever les sauts de ligne apres un strip_tags
    Par Cdic83 dans le forum Syntaxe
    Réponses: 1
    Dernier message: 15/04/2009, 12h06
  3. Réponses: 1
    Dernier message: 18/03/2009, 20h54
  4. Réponses: 3
    Dernier message: 30/09/2008, 08h42
  5. une fonction pour enlever les doublons d'un array
    Par secteur_52 dans le forum Delphi
    Réponses: 1
    Dernier message: 27/06/2006, 13h45

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