Accueil > Forum > > > > form qui disparait
form qui disparait
mardi 16 janvier 2007 à 18:10:34 |
form qui disparait

nardelmouk
|
salut, je voudrais faire un programme comme une barre de tache, il y a un truc que j'aimerais savoir, c'est comment savoir quand la souris pars en dehors de la form. désolé si c'est simple mais je suis débutant. merci d'avance
|
|
mardi 16 janvier 2007 à 18:13:56 |
Re : form qui disparait

jmfmarques
|
Un bouton étant enfoncé ou non ?
Si oui : c'est facile : utilisation de Mouse_Move et comparaison de X et de Y avec les coorsonnées de ta Form
Si non : plus complexe (utilisation de la fonction GerCursorPos de l'Api de Windows.
|
|
mardi 16 janvier 2007 à 18:21:46 |
Re : form qui disparait

jmfmarques
|
Attends ... En relisant le titre, je me demande si par hasard, tu ne cherches pas à la faire disparaitre et réapparaître en fonction de la position de ton curseur ...
Alors là ! c'est également possible mais gourmand en ressources et il te faudra un Timer tournant en permanence !
Mais j'ai à ce stade une question : quel est ton niveau actuel en VB (avant d'approcher l'emploi de fonctions de l'API de Windows) ? Ta réponse sera déterminante de mon attitude (continuer ou m'en aller de cette discussion)...
|
|
mardi 16 janvier 2007 à 18:26:23 |
Re : form qui disparait

nardelmouk
|
ben, en fait ça dépend les domaines, j'ai les bases et sais me servir de quelques api(j'ai télécharger apiguide),j'avais penser à l'idée de quand la souris sort de la form, un timer se met en route et au bout de 2 secondes, la form disparait progressivement de l'écran par la droite mais en laissant un petit bout pour que quand la souris revient dessus, elle raparraisse pareil. Le seul truc que je sais pas faire, c'est savoir quand la souris sort de la form
|
|
mardi 16 janvier 2007 à 18:36:01 |
Re : form qui disparait

jmfmarques
|
J'attends que tu réfléchisse un peu :
Sortir de la Form ? çà, c'est le moins difficile ... Comment, par contre, comptes-tu savoir quand tu "rentres" (puisqu'elle n'est plus là, hein ?)
Il te faudra en conséquence un timer qui tourne en permanence et qui contrôle en permanence la position de ta souris et déclence la disparition ou l'apparition de ta Form non en fonction de la Form à proprement parler, mais en fonction de ce que ta souris se promène ou non, sur ton ECRAN, dans une zone bien déterminée !
Tu me dis t'être déjà frotté à des fonctions de l'API de Windows...
Je t'ai donné le nom d'une fonction et t'ai indiqué un mécanisme.
Reviens avec un code d'essai de mise en oeuvre et dis-nous où tu rencontres une difficulté... A +
|
|
mardi 16 janvier 2007 à 18:44:49 |
Re : form qui disparait

jmfmarques
|
Voilà ! (fait de mon côté) ... Il te faut, en plus de la Fonction GetCursorPos, utiliser : WindowFromPoint et GetWindowRect, toutes deux appartenant à la librairie user32 J'attends TES efforts, maintenant ...  .
|
|
mardi 16 janvier 2007 à 19:50:25 |
Re : form qui disparait

mortalino
|
Salut, place un timer sur ta Form (nommé Tmr_Close) et place ceci :  Option Explicit
Private Type POINTAPI x As Long y As Long End Type
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long Private Declare Function GetForegroundWindow Lib "user32" () As Long Dim PosCur As POINTAPI
Private Sub Tmr_Close_Timer() Call GetCursorPos(PosCur) If PosCur.x < (Me.Left / 15) Or PosCur.x > (Me.Left / 15 + Me.Width / 15) Then Unload Me If PosCur.y < (Me.Top / 15) Or PosCur.y > (Me.Top / 15 + Me.Height / 15) Then Unload Me
If Me.hwnd <> GetForegroundWindow Then Unload Me End Sub
 ~ Mortalino ~ Colorisation automatique@++
--Mortalino-- Le mystérieux chevalier, "Provençal, le Gaulois"
|
|
mardi 16 janvier 2007 à 20:19:28 |
Re : form qui disparait

jmfmarques
|
Euh... Tiens ! Bizarre...
Ami Mortalino, s'il te plait... 1) En te lisant, je devine bien que tes "15" sont l'un Screen.TwipsPerPixelX et l'autre : Screen.TwipsPerPixelY sur TA machine ... 2) Tu "Unloade" (si celà marche ... as-tu essayé ?)... bon...et comment réaffiches-tu ? 3 et surtout) : devine ..... et laisse un peu de côté un excés de générosité (il arrive que la générosité exclue la dation pure et simple... et qu'elle s'exprime par l'enseignement bien compris du chemin à suivre )
|
|
mardi 16 janvier 2007 à 20:31:35 |
Re : form qui disparait

nardelmouk
|
C'est bon, j'ai trouvé comment faire,je vais faire comme à dit jmfmarques, j'utilise getcursorpos, comme la form est à droite de l'écran, quand la souris est à gauche de la form, celle-ci se décale progressivement vers la droite et ne laisse qu'un tout petit bout apparent, et quand la souris revient sur le bout , la form réapparait. merci à tous !!!!!!
|
|
mardi 16 janvier 2007 à 20:43:45 |
Re : form qui disparait

jmfmarques
|
Bien ! Je te félicite bien volontiers !  Fais plaisir aux autres, maintenant : mets ton code ici toi-même... Si tu ne le fais pas, c'est moi qui le ferai... mais je préférerais que tu le montres toi !  VAS-Y
|
|
Cette discussion est classée dans : form, disparait
Répondre à ce message
Livres en rapport
|
Derniers Blogs
SLIDE & DéMO TECHDAYS 2012 - FAST & FURIOUS XAML APPSSLIDE & DéMO TECHDAYS 2012 - FAST & FURIOUS XAML APPS par Vko
Retrouvez les slides et les démo de ma session Fast & Furious XAML Apps. A ceux qui se posent la question : "est-ce que le code de la DataGrid est disponible?", je vous répondrais "pas encore". Je vais mettre en place un projet codeplex pour part...
Cliquez pour lire la suite de l'article par Vko XNA IS DEAD!XNA IS DEAD! par richardc
Depuis la semaine dernière (et grâce aux TechDays 2012), je me penche activement sur la nouvelle version de Windows, aka Windows 8. Vous me direz, il était temps puisque la première preview date de Septembre dernier.
OK. Remarquez, on n'en est qu'aux...
Cliquez pour lire la suite de l'article par richardc TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 !TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 ! par ROMELARD Fabrice
Speakers: Fabrice Meillon et Stanislas Quastana Cette session est basée entièrement sur celle donnée lors de la BUILD cet hiver. Il n'y a pas d'ajout d'information en rapport avec cet évènement passé. Windows 8 Server sera intégralem...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice [HTML5] AUTOUR DU W3C : NOUVEAUX STANDARDS ET WEB MOBILE (LILLE)[HTML5] AUTOUR DU W3C : NOUVEAUX STANDARDS ET WEB MOBILE (LILLE) par Gio
Je m'y prends un peu tard je sais, mais bon je suis développeur web et donc hyper fainéant ! Toujours dans le cadre des technologies émergentes, ici HTML5, parce qu'on aime HTML5 chez Wyg , nous seront présent, le vieux ( Aurélien V.) et moi, pour pr...
Cliquez pour lire la suite de l'article par Gio
Logiciels
DocTranslate (V3.1.0.0)DOCTRANSLATE (V3.1.0.0)DocTranslate est un traducteur de document Microsoft Word, PowerPoint et Excel. Il permet d'autom... Cliquez pour télécharger DocTranslate Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|