traitement de texteRésolu

Question

Bonjour a tous,
J'ai besoin d'un coup de main
Voila je recupere dans un memo 40 ligne d'une discutions dans un chat
et jaimerai savoir comment recuper dans un autre memo toutes les lignes commencant
par exemple : friend Gerard

Je vous remercie d'avance pour l'aide

tof62bis · Accepted Answer

Bonjour 
C'est bon j'ai trouvé comment faire

voici la source si ca peut aider quelqu'un d'autre
et encore merci de votre aide

  listbox1.items.Clear;
  detectOwner := false;
  for i := recuproom.Lines.Count-1 downto 0 do
  begin
    if pos('owner ',recuproom.Lines.Strings[i])=1 then
    begin
      detectOwner := true;
      if (pos(Edit1.Text,recuproom.Lines.Strings[i])=0) and
         (pos(Edit2.Text,recuproom.Lines.Strings[i])=0) and
         (pos(Edit3.Text,recuproom.Lines.Strings[i])=0) and
         (pos(Edit4.Text,recuproom.Lines.Strings[i])=0) and
         (pos(Edit5.Text,recuproom.Lines.Strings[i])=0) then
      begin
        ListBox1.Items.add('/oplist remove '+copy(recuproom.Lines.Strings[i],6,length(recuproom.Lines.Strings[i])));
      end;
    end
    else if detectOwner and (pos('owner ',recuproom.Lines.Strings[i])=0) then
      break;
  end;

cs_cantador · Answer

Bonjour,

Est ce que les lignes commencent toutes par
"ami gérard.." et se termine par "..ne le renverse pas" ?

cantador

tof62bis · Answer

re
non en faire c'est juste
Friend Gerard
Friend Pascal

Voila excuse je m'etais mal exprimé

L_art_ment · Answer

for i:=0 to Memo1.Lines.Count -1 do if pos('Friend Gerard',Memo1.Lines[i])<>0 then memo2.Lines.Add(Memo1.Lines[i]); Il est des notre ! Esperant que la prochaine fois se sera google ton ami

L'Armand joue, l'arme en joug... www.art-ment.com

cs_cantador · Answer

'il a bu son verre..."

cantador

L_art_ment · Answer

Ca s'voit à sa trogne !

<hr />
L'Armand joue, l'arme en joug... www.art-ment.com

tof62bis · Answer

bonjour
Merci de m'avoir répondu si rapidement
mais je me suis mal exprimé
je recupere dans un memo les 40 dernieres lignes d'un chat
et je voudrez recuperer toute les ligne commencent par 
owner (et le pseudo)
dans la liste a recuperer il peut y avoir jusqu'a 40 pseudo different
et ce sont les pseudo que je veu recuperer

Voila et excusé moi pour le premier post ci dessus

Merci d'avance de votre aide

Traitement de texte

7 réponses

Votre réponse

Discussions similaires