Discussion :

[Beauserge]

Bonjour

Je voudrais savoir comment limiter le nombre de caractère dans l'item d'un MainMenu (propriété caption)
et bien dans caption d'un Tbutton ? Etant donné qu'il n'existe pas de propriété MaxLength à ces 2 compos....

je m'explique :
Je modifie le caption de mes items en dynamique et celui ci s'affiche sur mes boutons parallèlement.
Mais comme je limite mes boutons en (taille) largeur - afin qu'il rentrer sur ma fiche,
je souhaite limiter à 12 caractères maximum) le libéllé du caption afin que l'on voie la totalité du texte dans les boutons

j'espère avoir été assez clair ..
Si quelqu'un à une idée..

Merci par avance pour votre aide
Beauserge

[Cirec]

Bonjour,

plusieurs possibilités s'offrent à toi ...
en voici une qui est simple :

Code :

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

1
2
3
4
5
6
7
8
type
  TShortCaption = string[12];
var
  S: string;
begin
  S := 'Un bout de texte de plus de douze caractères pour tester';
  Caption := TShortCaption(S);
end;

[Beauserge]

Merci beaucoup Cirec !

Ton code fonctionne parfaitement.
C'est ce qu'il me fallait, simple mais efficace !

Bon week end

Cordialement
Beauserge