[ASTUCE] COMMENT OBTENIR UN HINT PAR CELLULE AVEC UN TSTRINGGRID tstringgrid, hint, customhint, Source N°43288

Information sur la source

Catégorie :Trucs & Astuces Classé sous : tstringgrid, hint, customhint Niveau : Initié Date de création : 29/06/2007 Date de mise à jour : 02/07/2007 11:14:04 Vu / téléchargé: 3 621 / 471

Auteur : cirec

Ecrire un message privé

Note :
Aucune note

Commentaire sur cette source (6)

Ajouter un commentaire et/ou une note

Description

Une tout petite démonstration sur une méthode
qui permet de déclancher un Hint par cellule dans un TStringGrid

les positions sont bien sur calculées en fonction de l'affichage (position scroll)

C'est un exemple des plus simple et la méthode utilisée pour y parvenir
permet encore d'autres "customisations" qui n'ont pas étés utilisées ici (ce n'était pas le but)

Source

All in Zip

All in Zip

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

CustomHints.pas 2 920 octets
Demo.dpr 221 octets
UMain.dfm772 octets
UMain.pas 688 octets

Télécharger le zip

Historique

02 juillet 2007 11:14:04 :: Modification du code pour donner le même delai avant affichage a chaques cellules et changement du niveau "Débutant" à "Initié" (cf. Commentaire Japee)

Sources du même auteur

Toutes les sources de cirec

Sources de la même categorie

Toutes les sources de la catégorie Trucs & Astuces

Sources en rapport avec celle ci

Commentaires

Commentaire de japee le 01/07/2007 13:05:13 administrateur CS

Efficace, ce code !
J'ai eu beaucoup d'intérêt à l'étudier.

Une suggestion : je sais bien qu'on est tous des surdoués sur delphifr, mais je pense sincèrement que tu peux mettre le niveau à initié, ta modestie dût-elle en souffrir... ^^

Une autre suggestion concernant le code.
Ça se discute, mais il me semble qu'on gagnerait à ce que le temps d'apparition du hint entre chaque cellule soit le même que le temps d'apparition du premier hint en arrivant sur la grille.
Bref, l'explication pouvant sembler confuse, il suffit d'ajouter cette ligne dans "TStringGrid.CMHintShow" (au début du bloc d'instructions par exemple) :
with Application do HintShortPause := HintPause;
(pour pinailler, on stocke la valeur trouvée de HintShortPause qui est en principe 0 et on la restaure, à la fin).

Qu'en penses-tu ?
Commentaire de cirec le 02/07/2007 11:46:12 administrateur CS

Suite à l'exellente remarque de Japee (pourquoi j'y ai pas pensé avant)
j'ai modifié le code et du coup "l'illusion" est parfaite ... on a un Hint par cellule

J'ai également changé le niveau de la source ... j'ai toujours autant de mal à définir
le niveau de mes sources et en plus j'avais touvé ça en moins de cinq minutes et comme le code n'est pas complexe en soit je me suis dit que le niveau "Débutant" était largement adapté .... Ben non :)

En tous cas ... Merci pour avoir mis le doigt sur cette "erreur" et pour la manière de la résoudre.

@+
Commentaire de cincap le 02/07/2007 14:12:42

Bonjour à tous,

@ cirec, j'espère que tu vas bien, je constate en utilisant ton unité (CustomFileCtrl.pas ou autre), que si avec le composant "TfileListbox", sa propriété "Multiselect" est à true, on obtient une erreur en le survolant avec la souris dans le cas ou le mask de ce composant affiche une extension définie ex: *.avi et que l'on se rend dans un répertoire ou dossier ou il n'y a pas ces fichiers avec cette extension.

Peut être le problème se répete aussi sur cette unité d'ou ce message.

@+,

Cincap
Commentaire de cirec le 02/07/2007 14:23:59 administrateur CS

Salut Cincap,

je crois que tu voulais poster ton message ici : http://www.delphifr.com/codes/ASTUCE-COMMENT-AFFICHER-ICONES-FICHIERS-LISTES-DANS-TFILELISBOX_41025.aspx

Parce que ici il est un peut perdu ... le pauvre

Je ragarderai si je trouve le pourquoi du comment
Commentaire de cirec le 03/07/2007 13:40:05 administrateur CS

Le problème que tu soulèves vient d'une erreur du TFileListBox de Borland et ne concerne donc pas cette source ...

La réponse à ton problème se trouve ici :
http://www.delphifr.com/codes/ASTUCE-COMMENT-AFFICHER-ICONES-FICHIERS-LISTES-DANS-TFILELISBOX_41025.aspx
Commentaire de yvessimon le 04/07/2007 16:34:25

Bonjour,

Pour un DBGrid est-ce adaptable ?

Salutations

Ajouter un commentaire

Discussions en rapport avec ce code source

Contrôle TStringGrid et listes déroulantes par Jack

Hint des menus par lucien

mettre une image sur un TStringGrid par magicwill

Hint sur Canvas ! par devio

[TStringGrid] : pb glisser/déplacer par PpPool

Deplacement de colonnes dans un TstringGrid par Suic1de

TStringGrid + GRAS par vagabon

Calcul dans TStrinGrid par goose84

TStringGrid par yoghisan

TStringGrid ---> Pixel par pixel et pas ligne a ligne par ZipZipZip