DUVIDA VB 6.0 ! DONFLYER

USUARIO.EXCLUIDOS 17/04/2007 15:06:35
#212323
Ae galera, bom acho que vai fika meio dificil agora Oó
bom vamos ao que interessa, tipow to tnetano faze um programa pra um jogo (tibia);D
tipow eu queria uma coisa ... eh meio dificil mais tomara que me ajudem
Bom olhe a imagem que eu anexei ..
Tipow eu queria que o activate fazia tudo como, quando eu abrir o programa, tudo fikar blokeado, os botões, os label fikarem cinzas ... tudo fikar blokeado, o lugar pra coloka o item, fikar blokeado,
Menos o Activate,
Para quando eu abrir o programa e clicar em activate, eu quero que o botão desblokeie tudo as letras fikarem preta, e no programa fikar assim :

joeY's IG status: Engaged!
Client Handle:Found!
World:~~~~~~~
System:Enabled
Delay(ms):270

Main Hooker: Ready...

------------------------------------------------------------------

ACHO QUE TÁ MEIO FODA, MAL GALERA, MAIS TO PRECISANO MTO DE AJUDA
quem pelo menos puder ajudar please ;*

abraço a toda galera do forum !
USUARIO.EXCLUIDOS 17/04/2007 15:11:36
#212326 Resposta escolhida


Viu...faça bem simples

Coloque tudo dentro de um Frame..menos o botão Activate
Deixa a propriedade enabled do frame como false

Qdo clicar no botão Activate faça:

Frame.enabled = true..

Pronto
DANIELCPAETE 17/04/2007 15:14:29
#212331
agora sim ai esta a resposta

cara so nao fica abrindo mais posts pra mesma pergunta pode fazer tudo no primeiro post


Private Sub Command1_Click()
  Dim Controle As Control
  
  If Command1.Caption = "button" Then
    Command1.Caption = "Deactivate"
  Else
    Command1.Caption = "button"
  End If
  
  For Each Controle In Form1
    
    If Command1.Caption = "button" Then
      Controle.Enabled = False
    Else
      Controle.Enabled = True
    End If
    
  Next
  
  Command1.Enabled = True
End Sub


Private Sub Form_Load()
  Dim Controle As Control
  
  For Each Controle In Form1
    
    If Controle.Enabled = True Then
      Controle.Enabled = False
    End If
  Next
  Command1.Enabled = True
End Sub
VBAPRENDE 17/04/2007 15:21:14
#212334
Fiz um exemplo para entender melhor
Tópico encerrado , respostas não são mais permitidas
Voltar