Tirando o quadrado preto (picMain)

por XWlasher Sex 17 Jan 2014, 08:28

Dois membros me perguntaram "Como exclui esse "quadrado preto" na frmMenu" então resolvi postar um tutorial explicando como.
Requerimento:
Visual basics 6.0
Client.Vbp

Só meche com o client-side então abra seu client.vbp
Vá na frmMenu e exclua a picmain depois clique em qualquer coisa para abrir a parte de abrir os códigos e Procure por:

Código:: Select Case Index Case 1 If Not picLogin.Visible Then ' destroy socket, change visiblity DestroyTCP picCredits.Visible = False picLogin.Visible = True picRegister.Visible = False picCharacter.Visible = False picMain.Visible = False ' play sound PlaySound Sound_ButtonClick End If Case 2 If Not picRegister.Visible Then ' destroy socket, change visiblity DestroyTCP picCredits.Visible = False picLogin.Visible = False picRegister.Visible = True picCharacter.Visible = False picMain.Visible = False ' play sound PlaySound Sound_ButtonClick End If Case 3 If Not picCredits.Visible Then ' destroy socket, change visiblity DestroyTCP picCredits.Visible = True picLogin.Visible = False picRegister.Visible = False picCharacter.Visible = False picMain.Visible = False ' play sound PlaySound Sound_ButtonClick

Mude Tudo Para:

Código:: Select Case Index Case 1 If Not picLogin.Visible Then ' destroy socket, change visiblity DestroyTCP picCredits.Visible = False picLogin.Visible = True picRegister.Visible = False picCharacter.Visible = False ' play sound PlaySound Sound_ButtonClick End If Case 2 If Not picRegister.Visible Then ' destroy socket, change visiblity DestroyTCP picCredits.Visible = False picLogin.Visible = False picRegister.Visible = True picCharacter.Visible = False ' play sound PlaySound Sound_ButtonClick End If Case 3 If Not picCredits.Visible Then ' destroy socket, change visiblity DestroyTCP picCredits.Visible = True picLogin.Visible = False picRegister.Visible = False picCharacter.Visible = False ' play sound PlaySound Sound_ButtonClick

Procure pela sub:

Código:: Private Sub picMain_MouseMove(Button As Integer, Shift As Integer, x As Single, Y As Single) ' If debug mode, handle error then exit out If Options.Debug = 1 Then On Error GoTo errorhandler resetButtons_Menu ' Error handler Exit Sub errorhandler: HandleError "picMain_MouseMove", "frmMenu", Err.Number, Err.Description, Err.Source, Err.HelpContext Err.Clear Exit Sub End Sub

e exclua, na Private Sub Form_KeyPress(KeyAscii As Integer) procure por:

Código:: If KeyAscii = vbKeyEscape Then Call DestroyTCP frmLoad.Hide frmMenu.Show frmMenu.picMain.Visible = True End If

Mude para:

Código:: If KeyAscii = vbKeyEscape Then Call DestroyTCP frmLoad.Hide frmMenu.Show End If

Na Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) procure por:

Código:: If UnloadMode = vbFormControlMenu Then Cancel = True Call DestroyTCP frmLoad.Hide frmMenu.Show frmMenu.picMain.Visible = True End If

Mude para:

Código:: If UnloadMode = vbFormControlMenu Then Cancel = True Call DestroyTCP frmLoad.Hide frmMenu.Show End If

Procure por:

Código:: frmMenu.picMain.Picture = LoadPicture(App.Path & "\data files\graphics\gui\menu\main.jpg")

Exclua essa parte, na Sub logoutGame procure por:

Código:: frmMenu.picMain.Visible = True

Exclua essa parte, Na HandleAlertMsg procure por:

Código:: frmMenu.picMain.Visible = True

Exclua esta parte, Private Sub Form_Load() procure por:

Código:: lblNews.Caption = vbNullString lblNews.Caption = lblNews.Caption & tmpArray(i) & vbNewLine

Exclua esta parte.
FIM
Créditos:
XWlasher (Por organizar em um tópico e fazer o tutorial) 35%
Sh4n (Por ir me dizendo quais partes mudar e excluir) 65%

por Level Max Seg 20 Jan 2014, 05:04

Bem cara no meu caso é exclui o quadrado do mouse..
Como o quadrado do mouse?
R: Fica preto do lado!

por XWlasher Ter 21 Jan 2014, 12:42

Você fez algum tutorial para mudar o ícone do mouse? Se fez me mande um PM me falando qual tutorial, que eu vou ajudar você u,u

por Monotoshi Ter 21 Jan 2014, 14:09

Se você considera isso um tutorial vb pra min não é progamação HUEHEUEHEU.

Po cara aprendi demais,isso ai é desnecessário,dava para fazer isso mudando apenas poucos códigos.

por XWlasher Ter 21 Jan 2014, 18:07

Eu achei mt, mas eu confio no sh4n ele é meu amigo então não questiono. Eu considero programação criar novas coisas, usar a imaginação para tal, o tutorial só fez excluir coisas u,u (Ficando lok criticando o próprio tuto)

por Conteúdo patrocinado

Tirando o quadrado preto (picMain)

Tirando o quadrado preto (picMain)

Re: Tirando o quadrado preto (picMain)

Re: Tirando o quadrado preto (picMain)

Re: Tirando o quadrado preto (picMain)

Re: Tirando o quadrado preto (picMain)

Re: Tirando o quadrado preto (picMain)