Hi les codeurs...

Alors un tout petit problème sur une form:

J'explique d'abord mon but, j'ai une form qui en appelle une deuxieme, et je veut que la seconde s'ouvre cooooooool: en fait la largeur de la seconde est sensée commencer à 0 et grâce à un timer, s'étend jusqu'à une certaine valeur. Et même processus en la fermant, elle retrécie jusqu'à 0. Seulement il y a un problème.

La largeur (width) de la forme ne commence pas à 0 mais à 124 (malgré un forcage avant l'allumage du timer), et quand je la rétrécie, elle s'arrete à 124 et mon timer continue à l'infini sans rétrecir la fenêtre...

Si quelqu'un a une idée...

Merci à vous.

Private Sub Form1_Load( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase .Load

Me .btCls.Visible = False

Me .btEvaluate.Visible = False

Me .tbExpression.Visible = False

Me .tbResult.Visible = False

With Me

.Location =

New Point(100, 100)

.StartPosition = FormStartPosition.Manual

.Width = 20

.Height = 20

.MaximizeBox =

False

.MinimizeBox =

False

.TopMost =

True

.Show()

End With

Timer1.Enabled =

True

 

End Sub

Private Sub Timer1_Tick( ByVal sender As Object , ByVal e As System.EventArgs) Handles Timer1.Tick

Me .Width = Me .Width + 2.5

Me .Height = Me .Height + 1 '.5

Me .Opacity = Me .Opacity + 0.00516

If Me .Width >= 525 Then

Timer1.Enabled =

False

Me .btCls.Visible = True

Me .btEvaluate.Visible = True

Me .tbExpression.Visible = True

Me .tbResult.Visible = True

Me .tbExpression.Focus()

End If

End Sub

Private Sub Form1_Move( ByVal sender As Object , ByVal e As System.EventArgs) Handles Me .Move

If Me .Width >= 525 Then

Me .SetBoundsCore(100, 100, 526, 234, BoundsSpecified.Location)

End If

End Sub

bonjour chez vous!
< body>

Bonjour, il me semble qu'une API permet de gérer l'ouverture en scrolling, mais je ne me rappelle plus son nom.

JPGVB  , en .net il faut eviter l'usage des api quand on peut .
Pourquoi ?? portabilité du code

en effet .net est (trans)portable

il y en a même qui essaye de le faire tourner sous unix alors les zapi on les zappe

bonjour chez vous!
< body>