Mover o form por um caption em C#.NET

[DJ DeviL 0]

Olá...preciso saber como faco pra mover o form a partir de um caption ou do proprio form sem ser pela titlebar...em VB.NET eu sei fazer isso....em C#..como faz??ps: desculpem a ignorancia...n entendo NADA de C#

[DJ DeviL 0]

jah descobri...hehhe

 

tah ai pra kem kiser

 

private bool mover; private int cX, cY; private void panel1_MouseDown(object sender, System.Windows.Forms.MouseEventArgs e) { if (e.Button == MouseButtons.Left) { cX = e.X; cY = e.Y; mover = true; } } private void panel1_MouseUp(object sender, System.Windows.Forms.MouseEventArgs e) { if (e.Button == MouseButtons.Left) mover = false; } private void panel1_MouseMove(object sender, System.Windows.Forms.MouseEventArgs e) { if (mover) { this.Left += e.X - (cX-panel1.Left); this.Top += e.Y - (cY-panel1.Top); } }

[MadPatryk 0]

soh n intendi pra q ki serve isso, e praq você ker!mas vo testa aki o teu exemplo!valeu!

[DJ DeviL 0]

Cara..vamos supor q você ker fazer um form com borderstyle=none assim você pode deixar o layout dele um pouko mais ''bonito''sem borda n tem barra de titulo, sem ela você n move o form....com esse cod. você consegue mover o form...deu pra saka??? tipo o winamp....nao tem barra de titulo....tem uma barra de titulo customizada com um codigo mais ou menos como esse pra você poder mover ele pelo seu desktop...nossa....acho q confundi mais....heheheabracos

[Alex Passos 0]

Como eu faço isso em vb.net?

[NaldoBr 0]

Como eu faço isso em vb.net?

Vai algumas dicas:Para traduzir C# para VB.NET, é só ir em http://authors.aspalliance.com/aldotnet/ex.../translate.aspxEm resposta a pergunta de Alex, em VB.NET, usa-se:

Dim pX, pY As Integer  	' ...	Private Sub Panel1_MouseDown1(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Panel1.MouseDown		If e.Button = Windows.Forms.MouseButtons.Left Then			pX = e.X			pY = e.Y		End If	End Sub 'panel1_MouseDown	Private Sub Panel1_MouseMove1(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Panel1.MouseMove		If e.Button = Windows.Forms.MouseButtons.Left Then			Me.DesktopLocation = New Point(Me.Left + (e.X - pX), Me.Top + (e.Y - pY))		End If	End Sub 'panel1_MouseMove