Calendrier tactile, sous forme de roues

Soyez le premier à donner votre avis sur cette source.

Vue 9 059 fois - Téléchargée 1 682 fois

Description

bonjour,
huste pour rire, un petit control permettant d'afficher un calendrier sous forme de 3 roues.
Ce control est principalement fait pour une interface tactile.

Source / Exemple :


tout est dans le zip

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
834
Date d'inscription
samedi 15 novembre 2008
Statut
Membre
Dernière intervention
14 janvier 2017
28
Merci GG29
Messages postés
326
Date d'inscription
vendredi 23 décembre 2005
Statut
Membre
Dernière intervention
8 février 2011
13
C'est sur que pour faire un effet 3D il est plus simple de le faire en WPF du fait de la gestion de la 3D. Mais le résultat est tout à fait correct. Bravo.
Messages postés
834
Date d'inscription
samedi 15 novembre 2008
Statut
Membre
Dernière intervention
14 janvier 2017
28
Salut Tropic,

Merci pour le commentaire, et la proposition d'extention.
j'avais pensé à l'effet de roulement par un simple déplacement,
mais c'est pas aussi simple, il faut recalculer l'indice d'écrasement de la police de caracteres.
je penche plutot pour des positions intermédiaires, plus facile à mettre en oeuvre.

pour le MouseWheel, pourquoi pas, mais à l'origine ce controle est destiné à un écran tactile ;-)
Messages postés
90
Date d'inscription
lundi 16 décembre 2002
Statut
Membre
Dernière intervention
1 février 2011

J'ai déjà vu ce style sur un htc 'cuisiné'

Il faudrait gérer le MouseWheel.

plus un effet de roulement
- récupérer la position de la souris au moment du MouseDown
et au moment du MouseUp calculer la vitesse de déplacement de la souris pour adapter le mouvement

petit exemple en vb.net
dMouseChronoStart = Microsoft.VisualBasic.DateAndTime.Timer
i_MouseDown = System.Windows.Forms.Control.MousePosition
dMouseChronoStop = (Microsoft.VisualBasic.DateAndTime.Timer - dMouseChronoStart)

Dim iMouseStoptY As Integer = CInt(i_MouseUP.y - iMouseDown.Y)
Dim dMouseVitesse As Integer = CInt(Math.Abs(iMouseStoptY) / dMouseChronoStop)

dMouseVitesse est la vitesse de déplacement

je le met de coté ta source.
Messages postés
834
Date d'inscription
samedi 15 novembre 2008
Statut
Membre
Dernière intervention
14 janvier 2017
28
Bonsoir Warnv

non non je ne dénigre rien

mais le code est bien simplet, les propriétés mériteraient d'être étoffées pour être accessible en mode "design" par exemple.
de plus lors du déplacement des roues avec la souris, un petit effet graphique pourrait le rendre plus attrayant.
bref c'est plutot une petite base de travail permettant de voir comment on peut utiliser les methodes "Paint" pour jouer un peu.

mais merci tout de même pour ton commentaire.
A+
Afficher les 6 commentaires

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.