Agrandir item d'un TListView

Version imprimable

27/06/2014, 15h52
Invité

1 pièce(s) jointe(s)

Agrandir item d'un TListView

Bonjour,

J'utilise un TListView en ViewStyle vsList.
A l’intérieur j'ajoute des items, mais savez-vous comment agrandir le "width" d'un item ?

Car quand le libellé est trop long il tronque le nom et ajoute "..."

Pièce jointe 149867

Merci
30/06/2014, 11h40
ShaiLeTroll

J'utilise plutôt le vsReport que vsList mais c'est déjà une piste
Ajoute un Columns à Width -1

Sinon, chose bizarre, en passant en readonly, le texte se dessine en entier
01/07/2014, 15h59
Thierry Laborde

Bonjour,

Pour moi à la conception on voit bien '...' a la fin du texte. Mais quand j’exécute l'application le texte s'affiche correctement.
D'ailleurs comme le dit ShaiLeTroll à la conception si on coche 'Read Only' ca s'affiche correctement, et on peut même remettre 'Read Only' à False et l'affichage reste correct.
Mais dès qu'on rajouter un Item cela refait la même chose. Mais encore une fois pour moi (En XE6) ça ne le fait qu'à la conception. A l’exécution ça fonctionne correctement.

Bonjour,

Finalement avec ce code c'est ok, par contre la largeur des items et un peut trop grande ..
Merci pour vos réponse mais même avec mon ListView en ReadOnly quand j'ajoute un item en exécution il s'affiche avec les "..." (je suis aussi en XE6)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TfsJocLeNoob.ListViewExpandColumns(ListView : tListView);
const
  LVS_TYPEMASK = 3;
  ViewStyles: array[TViewStyle] of Integer = (0, 2, 3, 1);
var
  Style: Longint;
begin
    Style := GetWindowLong(ListView.Handle, GWL_STYLE);
    Style := Style and (not LVS_TYPEMASK);
    Style := Style or Integer(ViewStyles[vsIcon]); //set style to vsIcon
    SetWindowLong(ListView.Handle,GWL_STYLE, Style);
    Style := Style and (not LVS_TYPEMASK);
    Style := Style or Integer(ViewStyles[vsList]); //set style to vsList
    SetWindowLong(ListView.Handle,GWL_STYLE, Style);
end;

03/07/2014, 16h53
joc02

Je vois que tu commentes en anglais :lol: peux tu citer tes sources STP il me semble que Malcom l'expliquait ici : http://codeverge.com/embarcadero.del...tems-w/1071026

T'es tu inspiré de lui de ce post ?