COMO FACO - BOTAO

KAKINHO 07/08/2007 17:25:49
#229861
Olá, eu gostaria de fazer isso via código, o meu form tem as propriedades min e max = true, só que dependendo do usuário que loga no sistema, essa propriedade mudaria para false entendeu?
Quero isso em tempo de execução, se usuario = a, min e max butom = true, se usuario = b, min e max button = false

Att,
Kakinho
FLAVIOGUILHERME 07/08/2007 17:34:56
#229863
Private Sub Form_Load()

If usuario = "SeuCriterio" Then
min e max butom = true
Else

End If

End Sub
LCSD 07/08/2007 17:35:38
#229865
VC mesmo já achou a resposta para a sua pergunta.

Vamos supor que Vc têm na tabela de usuário, um flag MAXIMIZAR.
Na hora que VC cadastra o usuário, VC vai e marca TRUE e manda gravar na base (true, no exemplo citado acima).

No form_load, VC faz assim:

sql = "Select * from usuarios where user = "' & usuario_logado & "'"
RS.OPEN SQL, ............... 'baboseira abrir este recordset
If rs.maximizar = TRUE then
   me.maxbutton = true
else
   me.maxbutton = false
endif
rs.close



Enfim, qual o problema??
KAKINHO 07/08/2007 18:00:15
#229879
lcsd essa propriedade nao suporta esse codigo, da erro

att,

kakinho
FLAVIOGUILHERME 07/08/2007 18:07:12
#229881
'Cara no load do form você coloca isso:
'Abre uma conexão com o banco e depois faz a comparação

Private Sub Form_Load()

 If Rs!CampoDaTabela = "SeuCriterio" Then  
   ' Se for igual ativa o mini ou max butom
   
   me.minbutom = true
   me.maxbutom = true
 Else
   ' se for diferente não ativa o min max
 End If

End Sub


'Qual a duvida ?
KAKINHO 07/08/2007 18:09:42
#229883
me.minbutom = true
me.maxbutom = true

essa propriedade da erro, nao aceita

att,

kakinho
FLAVIOGUILHERME 07/08/2007 18:19:18
#229887
NomeDoForm.MinButton = True
NomeDoForm.MaxButton = True
LCSD 07/08/2007 18:19:33
#229888
Segundo o HELP do MSDN, as propriedades MaxButton, MinButton, BorderStyle, and ControlBox Não é possível alterar em RUNTIME.

Ou seja, terá que fazer via API, e aí que é FÓDA....
KAKINHO 07/08/2007 18:24:17
#229890
isso mesmo, e essa api que nao sei fazer, vi uma de boquear o x, mas nao o de bloquear o -

att,
kakinho
HARRY.POTTER 07/08/2007 20:48:21
#229902 
   me.minbutom = true
   me.maxbutom = true







Brincadeira...Eu achei vários exemplos de como desabilitar o RESTAURAR e o MINIMIZAR, todos com o mesmo código do FECHAR, mas só o FECHAR desabilita. Os outros não muda!!! Não sei se tem jeito, viu...

Você pode:
1) Colocar um código no form_resize verificando.
2) Remover a barra de título, colocando uma personalizada no lugar :)
3) Criar 2 forms: um com os botões habilitador e outro com os botões desabilitados ¬¬'
Tópico encerrado , respostas não são mais permitidas
Voltar