puedo haber entendido mal, pero esto que vos pedis lo pedis en delphy y nosotros somos vb :S
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúPublic Function CenterStuff(ByVal Control As Object, Formulario As Form, Optional AlignH As Boolean = True, Optional AlignW As Boolean = True)
If AlignH = True Then
Control.Top = (Formulario.Height / 2) - (Control.Height / 2)
End If
If AlignW = True Then
Control.Left = (Formulario.Width / 2) - (Control.Width / 2)
End If
End Function