Componentes - Saber quando foi clicado nele.

15/03/2003

0

Ola pessoal, preciso saber o nome do componente que o usuário clicou...


obrigado.


Leao

Leao

Responder

Posts

15/03/2003

Thematrix:reloaded

Tente usar a propriedade ACTIVECONTROL do form


Responder

15/03/2003

Leao

campanheiro não deu certo, para ser + preciso, preciso fazer isto com menus.

Obrigado!!!


Responder

15/03/2003

Thematrix:reloaded

Entao o que vc precisa e saber qual Item do Menu foi escolhido, certo????


Um soluçao e vc apontar todos para uma mesma procedure, e nela fazer o teste assim:

if sender = MenuItem1 then
...;
if sender = MenuItem2 then
...;


Responder

15/03/2003

Aroldo Zanela

campanheiro não deu certo, para ser + preciso, preciso fazer isto com menus. Obrigado!!!

Leão,

Você pode explicar isso melhor?


Responder

16/03/2003

Leao

Bom amigos, a dica acima me ajudaria, mas não seria o ideal.


Vou tentar ser + claro.

Preciso fazer um controle de permissão onde o administrador do sistema escolhe a permissão de cada usuário.
Já pensou meu projeto tem vários menus items imaginou se eu tiver que passar o nome de cada um? Não seria melhor se tiver como eu saber o nome do projeto que eu cliquei?

Precisava algo tipo assim:

TMenuItem(Componentes[i]).Enabled:=False;

Bom mei sei se digitei certo, mas para quem entendi do assunto, axo que vai entender.

Mas todavia acho que a dica vai me ajudar?
Só vou ter um pouco de trabalho.


Obrigado.


Responder

16/03/2003

Leao

Pessoal já resolvi, vejão como, talvez alguem depois necessite


Primeiro criei uma Procedure
procedure x(sender : tObject);

procedure TForm1.x(sender : tObject);
begin
TMenuItem(sender).Checked:=not(TMenuItem(sender).Checked);
end;


e depois mandei que todos os eventos onclick dos menusitems facao o seguinte:


procedure TForm1.xy1Click(Sender: TObject);
begin
x(sender);
end;


assim posso pergar o nome de cada um...


Obrigado amigos...


Responder

APRENDA A PROGRAMAR DO ZERO AO PROFISSIONAL

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar