Re: [WD75] Bouton aide glissé

Roumegou wrote:
> (supersedes <mn.abc47d4726840ad8.11485@fin.msg>)
>
> Après mure réflexion, Roumegou a écrit :
>> Jamais fait avec WD.
>> Je voudrais faire un bouton d'aide contextuel. On clique sur le
>> bouton et l'on déplace un curseur sur une zone.
>> Et je vais lire dans une table s'il y a de l'aide associé à cette
>> zone.
>>
>> Un bout de code tout fait ????
>
> Et bien cela déchaîne les passions
>
>> Merci de vos réponses
>
> Et bien j'ai réussi comme un grand Na ! C'est vrai que Windev pour ce
> genre de choses depuis la 7.5, c'est génial.
> Mais ...
>
> Mon bouton marche bien. Le curseur se change bien en point
> d'interrogation (curAide) et quand je clique dans ma zone, j'ai bien
> ma fenêtre avec la doc.
> Mon souci est qu'il faut que je colle le code dans chaque champs de
> saisie
> Bouton gauche Enfoncé (WM_LBUTTONDOWN) de MonChamp
> SI MoiMême..CurseurSouris=curAide ALORS
> Ouvre(VIEWDOCSUP,Rtv_DOCSUP(gOwner,MyTable,MoiMême..Nom))
> EteintAideCtx()
> FIN
> Survol de la souris (WM_MOUSEMOVE) de MonChamp
> SI MoiMême..CurseurSouris=curAide ALORS
> MoiMême..Bulle="Cliquez dans le champs pour obtenir de l'aide"
> FIN
>
> Et je me vois pas coller ça dans tous mes champs. Une idée pour
> contourner cela ??

salut Eric,
moi, je croyais que ça existait en standard dans windev. Cruelle déception.

est-ce que tu ne peux pas gérer globalement tes 2 évènements, et rechercher
quel est le champ survolé ?
Dans ce cas, tu n'aurais qu'une procédure.




--
Jacques TREPP
AlbyGest
jacques.trepp_pasdespam@free.fr
enlever _pasdespam pour me joindre


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.725 / Virus Database: 480 - Release Date: 19/07/2004


begin 666 wink.gif
M1TE&.#EA#P`/`+,``````+^_O___````````````````````````````````
M`````````````````````"'Y! $```$`+ `````/``\```0T,$@):ITX5,'Y
MQ4 G>E,XC@`EF.MJIJSEQ>PI;C9:YZYGOQK?C12<R8C%7P;7^60TEA0F`@`[
`
end

begin 666 frown.gif
M1TE&.#EA#P`/`)$``````+V]O8RM_[V]O2'Y! $```,`+ `````/``\```(O
MG V9QY,"X6) QBK P?A*E$5BI76/9*:7*K:K"Y^H,CK6^-GPM>U9(T,U-@H-
$HP``.P``
`
end