Limiter le nombre de ligne dans un Memo ? [Delphi] - Delphi/Pascal - Programmation
Marsh Posté le 03-09-2007 à 10:04:44
Bonjour,
Il ya un moyen simple :
sur l'événement OnKeyPress de ton Tmemo :
procedure Memo1KeyPress(Sender: TObject; var Key: Char);
var
Maxlines:integer;
begin
if (Memo1.Lines.Count = Maxlines) then
if Key = #13 then Key:=#0;
end;
Apres à toi de l'adapter comme il faut.
J'envoi la réponse au cas ou d'autres personnes en auraient besoin !! Car le principal intéressé a surement deja trouvé.
Marsh Posté le 25-04-2006 à 12:41:08
Bonjour ( °°).
Voilà, dernièrement je travaille sur un petit programme et, j'aimerai pouvoir limiter le nombre de ligne d'un Tmemo (4 lignes max). J'ai fais plusieurs recherches sur google, mais le seul site, dont la description correspondait à ce que je voulais, n'existe plus . La limitation de caractère ne convient pas à ma requête, donc ça aussi... :s
Quelqu'un aurait-il une astuce ?!
Par avance, merci.
Amicalement.
---------------