Condiçaõ IF....Then Não funciona.
27/09/2004
0
procedure TFrmPrincipal.FormCreate(Sender: TObject);
begin
Grupo:=DmBasedados.IBTab_UsuarioPRIORIDADE.Value;
IF Grupo > 3 THEN
begin
NovaOrdServio1.Enabled:=True;
end;
end;
Grupo é uma variavel que recebe um valor de outra tabela.
Só que já fiz várias vezes mas apenas (NovaOrdServio1.Enabled:=True;)
esta linha é executada.
Será que estou fazendo alguma coisa errada?
Peninha.
Peninha
Posts
27/09/2004
Paulo_amorim
Pelo que eu vi, não era pra fazer essa linha mesmo? Vc mandou ele fazer ué...
Qual a dúvida? Dá uma explicada ae
Até+
27/09/2004
Alves
Ficaria Assim:
27/09/2004
Peninha
Tenho uma tabela que contén um campo ´Prioridade´ quando se cadastra um usuário é determinada uma prioridade para este própio de 1 ate 10,
a variavel grupo foi criada para receber o valor do campo ´prioridade´
e neste caso dependendo desta prioridade o usuario terá acesso a determinados itens de menu ou não.
Só que como vocês viram ai, infelizmente a condição IF....THEN não esta funcionando.
Será que tem alguma coisa errada?
Peninha.
27/09/2004
Mago M3rl1n
27/09/2004
Salupe
27/09/2004
Weber
procedure TFrmPrincipal.FormCreate(Sender: TObject); begin NovaOrdServio1.Enabled := DmBasedados.IBTab_UsuarioPRIORIDADE.Value > 3; end;
27/09/2004
Rocsadan
procedure TFrmPrincipal.FormCreate(Sender: TObject);
begin
Grupo:=DmBasedados.IBTab_UsuarioPRIORIDADE.Value;
IF Grupo > 3 THEN
begin
NovaOrdServio1.Enabled:=True;
end
else
faz mais alguma coisa só pra ter certeza...
end;
27/09/2004
Peninha
Como posso fazer para que ele possa pegar a prioridade do usuario a ser usado?
peninha.
27/09/2004
Gandalf.nho
28/09/2004
Salupe
table1.active := True;
table1.Locate(´CodUsuario´,Codigo,[]);
coloque essas duas linhas antes do Grupo receber a prioridade e aí dará certo.
CodUsuario teu campo na tabela.
Codigo variável que estará indicando qual usuário foi inicializado no sistema, não sei como nem onde vc guarda no seu sistema mas a forma que vc estiver fazendo coloque aqui.
Clique aqui para fazer login e interagir na Comunidade :)
