Discussion :

[Zetmurin]

Salut!
Je voudrais savoir comme faire pour avoir toutes mes lignes copiée quand je les colles (CTRL+C) dans un TEdit d'un prog.
Quand je colle plusieur ligne dans mon TEdit il ne prend que la premier.
Je veut pouvoir avoir toute les lignes dans mon TEdit.

Merci d'avance.
A plus!

[CGi]

Le TEdit ne peut recevoir qu'une seule ligne il est possible de le passer en multilignes
en lui donnant le style ES_MULTILINE
Mais en ce cas ça devient en gros un TMemo.

[Greybird]

Bonjour,

Le TEdit étant un composant simple ligne, la seule solution que je vois serais d'intercepter le message WM_PASTE, de traiter le contenu du presse-papier pour en retirer les retours à la ligne, et de positionner ensuite la propriété Text du TEdit avec ce contenu retravaillé.

Le but est-il vraiment de tout récupérer sur une seule ligne ? Un TMemo ne serait-il pas plus approprié ?

Cordialement,

Arnaud

[Neilos]

Hum...tu voudrais récupérez tout sur une seule ligne ?

Par exemple si tu copie cela :

Coucou
Bonjour
Adieu

tu voudrais avoir dans ton TEdit:

CoucouBonjourAdieu

?
Dans ce cas utilise un TMemo. Tu colle dans le TMemo. Ensuite tu prend la propriété Text du TMemo (qui synthétise le contenu du TMemo dans une chaîne mais pas forcément une seule ligne) à laquelle tu enlèves tous les caractères de nouvelle ligne...

Cela pourait donner par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
une_ligne = StringReplace( Memo1->Text, "\n", "", TReplaceFlags() << rfReplaceAll);

Dernière chose, il faut déclencher cette ligne de code lorsque tu effectue le collage... Je ne me rappel pas l'existence d'un évènement OnPaste (je n'ai pas BCB sous la main ici)...

Par contre avec cette solution tu ne dois pas coller le résultat dans un TEdit mais dans un TMemo (remarque pour avoir le même aspect c'est pas compliqué ).

En espérant avoir été utile...

[Ricky81]

Bonjour,

En complément, si tu veux fais quelquechose de similaire avec un TEdit directement, tu peux par exemple créer un nouveau composant ou simplement modifier la méthode de traitement WindowProc de ton composant.

Exemple :

.h

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
22
23
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// Composants gérés par l'EDI
   TEdit *Edit1;
private:	// Déclarations de l'utilisateur
   TWndMethod OldWndProc;
void __fastcall MyWndProc(Messages::TMessage &Message);
public:		// Déclarations de l'utilisateur
   __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

.cpp

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
22
23
24
25
26
27
28
29
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include "QClipbrd.hpp"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
   : TForm(Owner)
{
   OldWndProc = Edit1->WindowProc;
   Edit1->WindowProc = MyWndProc;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::MyWndProc(Messages::TMessage &Message)
{
   if(Message.Msg == WM_PASTE)
   {
      AnsiString txt = Clipboard()->AsText;
      Edit1->Text = StringReplace(txt, "\r\n", "", TReplaceFlags() << rfReplaceAll);
   }
   else
   {
      OldWndProc(Message);
   }
}

Cordialement

Eric

[Zetmurin]

Finalement J'ai mis un Memo a la place de mon Edit et sa marche comme je voulais.
J'essayerai la solution de Ricky81 plus tard.
Merci a tous!