Discussion :

[da_latifa]

salut tt le monde,
peut-on empêcher un Tmemo ou Trichedit de retourner à la ligner automatiquement, et que ce qu'on écrit reste sur la 1ere ligne, j'ai utiliser la propriété wantreturns mais ça marche pas.
MERCI.

[Flaie]

C'est à dire ?

Quand tu ajoutes du texte via Memo.Lines.Add('blabla'), tu voudrais que le curseur reste derrière blabla ?

Une solution consiste à émuler l'appui sur la touche retour en arrière, pour que le curseur se repositionne en fin de la ligne précédente.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
procedure MemoAddLine(M: TMemo; str: string);
begin
   M.Lines.Add(str); 
   M.SetFocus; //il faut remettre le focus sur le Memo
   keybd_event(VK_BACK, 0, 1, 0); //enfoncé
   keybd_event(VK_BACK, 0, 2, 0); //relevé
end;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
  MemoAddLine(Memo1, 'Test, blablabla');
end;

[rsc]

Code :

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

WordWrap := False;

[da_latifa]

ça marche avec WordWrap seulement si le texte est aligné à gauche mais au centre ou bien à droite ça retourne à la ligne ,
avez vous de propositions.
MARCI.

[LadyWasky]

tu fais en sorte que ton memo ne fasse qu'une ligne de haut

exemple :

memo1.height:=14;

[djo.mos]

J'ai pas bien compris ton problème :
- Si tu veux que tout ton texte tient sur une seule ligne, utilise un TEdit
à la place de TMemo
- Si tu veux controler les retours à la ligne, càd si tu veux ajouter
plusieurs chaines dans une seule ligne, puis retourner à la ligne,
sauvegarde l'id de la derniere ligne que tu viens d'ajouter, puis modifie
la proprieté , je suis pas sur là, j'ai pas Delphi sur ce poste, en gros ca
doit etre comme ceci :

Code :

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

1
2
3
4
5
6
7
8
 
 var id:integer;
 begin
  id:=M.Lines.Add('Mot1 dans cette ligne');
  ...
  ...
  ...
  M.Lines[i]:=M.Lines[i]+' Mot 2';

Comme je l'ai dit, je ne suis pas sur de la derniere ligne, c'est peut etre Strings, ou je ne sais pas quoi. Je vérifie et je te communique les résultats !

[djo.mos]

Je confirme la solution que j'ai avancé.