[firebase-br] Senha para programa

sergio.bento.silva sergio.bento.silva em itelefonica.com.br
Qui Dez 8 21:15:35 -03 2005


Caro colega, agradeço a atenção, mas vou abusar um pouco mais, como sou
RECRUTA em programação, peço que se possível possa me detalhar como usar seu
exemplo, onde encaixar os códigos.


----- Original Message -----
From: "Gabriel Hilbig" <ghilbig em bol.com.br>
To: <lista em firebase.com.br>
Sent: Thursday, December 08, 2005 6:09 PM
Subject: Re: [firebase-br] Senha para programa


> Olá Sérgio
>
> Desde meu tempo de PDOX uso validação de Usuário pelo Nome do TMENUITEM.
>
> Tenho uma Tabela com
>
> COD_USUARIO
> MENU_NAME
> MENU_CAPTION
> LIBERA,Boolean, ou char(1)
>
> Quando o usuário Loga o SISTEMA existe uma Função para varrer os menus
> HABILITANDO ou DESABILITANDO
>
> Vai ai um Pedaço do Código
>
> ////////////////////////////////////////////////////
>
> with frmPrincipal do
> for I := 0 to ComponentCount-1 do
>  begin //0
>  Comp := Components[i];
>  if (Comp is TMenuItem) then //Testa MENUS
>     TMenuItem(Comp).Enabled :=
Permite(sCodOperador,TMenuItem(Comp).Name);
>
>  if (Comp is TSpeedButton) then // Testa TOOLBAR
>     begin
>     id := StrToInt(Copy(TSpeedButton(Comp).Name,4,2));
>     TSpeedButton(Comp).Enabled := Permite( sCodOperador,aButtons[id] );
>     end;
>  end;
>
> ////////////////////////////////////////////////////
>
>
>
> --
> Gabriel Hilbig
> Mg System Informática Ltda
> Av Otávio Rocha, 54 / 12o.
> 90020-150 Porto Alegre / RS
> 51.3226.1768 / 3226.6209
> www.mgsystem.inf.br
>
> "sergio.bento.silva"
> <sergio.bento.silva em itelefonica.com.br>
> escreveu na mensagem news:001901c5fc0f$f3663d40$40d60dc9 em micro...
> Boa Tarde, algum colega da lista tem um modelo de programa em Delphi 7.0
com
> Firebird que usa SENHAS para validar usuários para determinadas partes do
> menu principal? Caso alguém tenha um modelo e puder me enviar, ficarei
muito
> agradecido. Valeu!
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
> Para editar sua configuração na lista, use o endereço
> http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
>
>
>
>


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


______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
Para editar sua configuração na lista, use o endereço
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://firebase.com.br/pesquisa


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


No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.362 / Virus Database: 267.13.13/195 - Release Date: 08/12/2005





Mais detalhes sobre a lista de discussão lista