Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2911 connectés 

  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  ListView : changer la couleur de fond, ligne par ligne

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

ListView : changer la couleur de fond, ligne par ligne

n°1019096
Kyle_Katar​n
Posté le 20-03-2005 à 17:46:06  profilanswer
 

Tout est plus ou moins dit dans le titre.... Sauriez vous me dire, en D7, comment afficher un ListView avec des couleurs de fond dépendant des lignes (par exemple la 1ère sur fond rouge, la seconde sur fond bleu et les autres "normalement" )
 
Merci d'avance !

mood
Publicité
Posté le 20-03-2005 à 17:46:06  profilanswer
 

n°1019295
Kyle_Katar​n
Posté le 20-03-2005 à 20:27:41  profilanswer
 

Up..

n°1019467
antp
Super Administrateur
Champion des excuses bidons
Posté le 20-03-2005 à 23:41:11  profilanswer
 

Je pense que j'avais déjà fait des essais pour afficher les lignes paires/impaires dans différentes couleurs (style listing comptable), je regarderai demain au boulot dans mon dossier "test"


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
n°1019966
Kyle_Katar​n
Posté le 21-03-2005 à 17:37:34  profilanswer
 

Merci beaucoup ANTP !

n°1019997
antp
Super Administrateur
Champion des excuses bidons
Posté le 21-03-2005 à 18:21:21  profilanswer
 

Dans OnCustomDrawItem :


    Sender.Canvas.Font.Color := clblack;
    if Item.Index mod 2 = 1 then
      Sender.Canvas.Brush.Color := clMoneyGreen
    else
      Sender.Canvas.Brush.Color := clwhite;


avec OwnerDraw qui reste à False
ici on ne fait que modifier les propriétés du Canvas avant que la liste ne dessine elle-même son contenu


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
n°1020000
Kyle_Katar​n
Posté le 21-03-2005 à 18:23:33  profilanswer
 

Je teste ça ce soir, merci encore !

n°1303883
cincap
Posté le 12-02-2006 à 20:48:44  profilanswer
 

antp a écrit :

Dans OnCustomDrawItem :


    Sender.Canvas.Font.Color := clblack;
    if Item.Index mod 2 = 1 then
      Sender.Canvas.Brush.Color := clMoneyGreen
    else
      Sender.Canvas.Brush.Color := clwhite;


avec OwnerDraw qui reste à False
ici on ne fait que modifier les propriétés du Canvas avant que la liste ne dessine elle-même son contenu


 
Bravo,
 
Dans le cas d'une recherche d'un screensaver *.scr qui se trouve dans le dossier Windows et Windows\system32, comment faire pour lancer la recherche avec un seul bouton et que les icones apparaissent à côté du fichier dans le Tlistview.
 
Merci de me répondre,
 
Cincap

n°1305961
antp
Super Administrateur
Champion des excuses bidons
Posté le 15-02-2006 à 11:52:53  profilanswer
 

J'ai du mal à voir le rapport avec la question de base du topic [:pingouino]
Les recherches c'est avec FindFirst/FindNext/FindClose.
Pour récupérer une icône d'un fichier (et ensuite l'ajouter à une ImageList par exemple), il y a ceci :

Code :
  1. function GetIcon(const FileName: TFileName; const Large: Boolean): TIcon;
  2. var
  3.  sfi: TSHFileInfo;
  4.  i: Integer;
  5. begin
  6.  Result := nil;
  7.  try
  8.    Result := TIcon.Create;
  9.    if Large then
  10.      i := SHGFI_LARGEICON
  11.    else
  12.      i := SHGFI_SMALLICON;
  13.    SHGetFileInfo(PChar(FileName), FILE_ATTRIBUTE_NORMAL, sfi, SizeOf(sfi), SHGFI_ICON or SHGFI_USEFILEATTRIBUTES or i);
  14.    if sfi.hIcon = 0 then
  15.      FreeAndNil(Result)
  16.    else
  17.      Result.Handle := sfi.hIcon;
  18.  except
  19.    FreeAndNil(Result);
  20.  end;
  21. end;


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
n°1935684
sam2611
Posté le 27-10-2009 à 14:06:53  profilanswer
 

j'ai une petite question je suis entrain d'essayer de faire un casse brique avec D5 et je ne sais plus comment faire pour lui dire que si la balle passe sur une brique bleue ... alors elle s'efface ... vous avez une idée ?????????? merci d'avance

n°1935696
sam2611
Posté le 27-10-2009 à 15:17:43  profilanswer
 

pouvez vous me répondre par mail svp : jolikim7@msn.com merci

mood
Publicité
Posté le 27-10-2009 à 15:17:43  profilanswer
 

n°1935877
antp
Super Administrateur
Champion des excuses bidons
Posté le 28-10-2009 à 11:19:18  profilanswer
 

Comme dans mon post précédent, j'ai encore une fois du mal à voir le rapport avec la question de base du topic ou même avec la question suivante.
En plus une question pareille je ne vois pas qui pourrait te répondre... Tellement vague et général.


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  ListView : changer la couleur de fond, ligne par ligne

 

Sujets relatifs
Affichage d'1 var sur 1 ligneChanger la valeur height d'une <Div>
changer d'image à chaque actualisationChanger le curseur . . .
Aller a la ligne...OK en local mais rien ne va en ligne :(
[C#] connaitre le nombre de ligne sans parcourir fichierFond de feuille en fonction d'un index
Couleur avec wxWidgets (/wxWindows)...Aller a la ligne dans mon XSL sans generer de retour chariot ?
Plus de sujets relatifs à : ListView : changer la couleur de fond, ligne par ligne


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR