Listbox en couleurs

Soyez le premier à donner votre avis sur cette source.

Vue 7 485 fois - Téléchargée 1 121 fois

Description

ce code indique comment gérer une listbox en ownerdraw.

Source / Exemple :


// dans le zip

Conclusion :


la gestion des couleurs pourrait etre mieux faite mais j'ai préféré faire simple, c'est un exemple après tout :)

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

g0belin
Messages postés
155
Date d'inscription
jeudi 6 décembre 2001
Statut
Membre
Dernière intervention
19 avril 2010
-
Exellent exemple
cs_Delphiprog
Messages postés
4580
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
24 -
Tu crées une TStringList dans la partie initialization de l'unité Unit1pas et tu l'affectes à Colors.
C'est bien, mais comme Colors n'a pas de propriétaire, qui est chargé de la destruction quand tu fermes l'application ?
Et bien, personne !
Mets soit dans l'évènement OnDestroy de Form1 ou dans la partie Finalization :
FreeAndNil(Colors);

Lances ton application actuelle un nombre important de fois ou utilises un utilitaire de détection de fuites mémoires, et tu verras que tu perds des ressources à chaque lancement.
cs_Delphiprog
Messages postés
4580
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
24 -
RAPPEL : Inutile de mettre les exe dans le zip. On est capable de compiler un projet ;-p
MasterNKZ
Messages postés
38
Date d'inscription
jeudi 8 août 2002
Statut
Membre
Dernière intervention
26 août 2004
-
Pour DELPHIPROG :
Sisi c bien de mettre l'EXE dans le zip, parce j'ai pas tjrs delphi qui est ouvert derriere et c bien pour regarder vite fait ce ke c car certains ont des ordis pas tres performant et attendent un peu avant ke delphi se lance lol, comme moi... ;-$
cs_Nebula
Messages postés
790
Date d'inscription
samedi 8 juin 2002
Statut
Membre
Dernière intervention
7 juin 2007
1 -
arf en effet j'ai pas fait gaffe à la gestion mémoire, mais je voulais le mettre dans la section "private" de la form à la base ... je ferais plus attention la prochaine fois :)

quand à l'exe du zip, il n'est là que parce que ce code était à la base destiné à servir d'exemple à un ami qui bosse sur delphi 5, et je craignais qu'il ne puisse compiler le projet sans avoir à le modifier (c'est mieux d'avoir une idée visuelle de ce que donne un prog avant de se plonger dans son étude, enfin je pense lol)

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.