Discussion :

[Klemsy78]

Bonjour messieurs,
J'utilise Delphi7. Je veux savoir comment mettre une sous chaine dans une chaine de caractère en surbrillance dans un text Edit?

Merci pour votre compréhension et votre aide.

[denix59]

Perso, j'utilise un TRichEdit et la propriété SelAttributes.

Pour limiter la saisie à 1 ligne, utiliser l'évènement OnKeyPress avec le code:

if Key = #13 then Key:=#0;

[Pascal Fonteneau]

Voila ce que je propose

Attention en unicode, il faudrait faire X2 car sellenght sera sur 2 octects

Code :

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

1
2
3
4
 
 Edit1.SetFocus;
 Edit1.SelStart := 4; // du 4ème Caractère
 Edit1.SelLength := 6; //pendant 6 caractères