Come da titolo..
come si fa?
nn riesco a meno ke nn gli dò maualmente la posizione...nn c'è una proprietà centra in mdi?
Mi serve per la form d avvio, info
VaneX
Come da titolo..
come si fa?
nn riesco a meno ke nn gli dò maualmente la posizione...nn c'è una proprietà centra in mdi?
Mi serve per la form d avvio, info
VaneX
Ciao, è molto semplice...
Sub Centraform(FormName As Form)
On Error Resume Next
If FormName.MDIChild = True Then
FormName.top = (Menu00.ScaleHeight / 2 - FormName.Height / 2)
FormName.left = (Menu00.ScaleWidth / 2 - FormName.Width / 2)
If FormName.top < 0 Then FormName.top = 0
Else
FormName.top = (Menu00.Height / 2 - FormName.Height / 2) + Menu00.top
FormName.left = (Menu00.Width / 2 - FormName.Width / 2)
FormName.left = FormName.left + Menu00.left
If FormName.top < 0 Then FormName.top = 0
If FormName.left < 0 Then FormName.left = 0
End If
End Sub
speravo ci fosse un apriprietà tipo maximize....ma grazie lo stesso
ho fatto come mi hai suggerito tu!
VaneX