source exemple ici
dans cette exemple on ne fait que déplacer le panel avec un code VB
demandez plus de détailles si vous avez besoin
Tu c'est pour l'adapter un simple centrage des fenêtres suffitfandeonepiece2 a écrit:bonjour,
les commentaires ne sont pas trop mon truc (tout est dans la tête)
on peut utiliser ce code pour faire un jeux vidéo 2D pas très compliqué
c'est ce code qui va me permettre d'adapter Droid à toutes les résolutions possibles (je galère beaucoup, enfin plus maintenant ) ce va faire faire un bond dans l'avancement de Droid.
cordialement
Imports System.Net.Sockets
Imports System.Net
Module Module1
Dim port As String = "8080"
Dim ip As String = "127.0.0.1"
Sub Main()
Dim MonSocketServeur As New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
Dim MonEP As IPEndPoint = New IPEndPoint(IPAddress.Parse(ip), port)
MonSocketServeur.Bind(MonEP)
MonSocketServeur.Listen(1)
Console.WriteLine("Serveur prêt!")
While True
Console.WriteLine("Attente de la console Client")
Dim SocketEnvoi As Socket = MonSocketServeur.Accept
TraitementConnexion(SocketEnvoi)
End While
End Sub
Sub TraitementConnexion(ByVal SocketEnvoi As Socket)
Console.WriteLine("Client connecté!")
Try
Dim Message As Byte() = System.Text.Encoding.ASCII.GetBytes("Serveur pret a envoyer!")
Dim Envoi As Integer = SocketEnvoi.Send(Message)
Console.WriteLine("Accusé de connexion envoyé!")
Catch ex As Exception
Console.WriteLine("Erreur: " & ex.ToString)
End Try
End Sub
End Module