Fórum Coordenadas do Menu #270089

25/02/2005

0

Olá colegas,

Preciso pegar as coordenadas do item de menu (mainmenu) em que o usuário clicar. Alguém sabe como fazer isso. Já pesquisei sobre, porém não obtive sucesso!

Desde já agradeço


Alexpatrik

Alexpatrik

Responder

Posts

25/02/2005

Rodolpho123

Quê tipo de coordernadas?


Responder

Gostei + 0

25/02/2005

Leanribas

acho que o que vc precisa vc consegue assim:

procedure TForm1.Teste2Click(Sender: TObject);
var
point : TPoint;
begin
GetCursorPos(point);

ShowMessage(´PosX: ´+ IntToStr(point.x) + ´, PosY: ´ + IntToStr(point.y));
end;


Falou.

Leandro


Responder

Gostei + 0

25/02/2005

Alexpatrik

Bom, na verdade as coordenadas que preciso sao as do item do menu.

Por exemplo: MainMenu.Items[X].Items[Y].Items[Z]


Preciso saber esses valores X, Y, Z
Lembrando que o meu menu é criado dinamicamente, atravéz de uma consulta ao banco de dados, portanto esses valores podem ser sempre diferentes.

Obrigado


Responder

Gostei + 0

25/02/2005

Nildo

O que seria a coordenada ´Z´?


Responder

Gostei + 0

25/02/2005

Alexpatrik

Vamos supor que o usuário só tivesse acesso a este módulo:

Financeiro -> Tabelas -> Cotação de Moeda

As coordenadas seriam:
MainMenu.Items[0].Items[0].Items[0]
Financeiro| Tabelas| Cotação de Moeda


Responder

Gostei + 0

25/02/2005

Nildo

Que tipo de coordenada você quer retornar? Eu entendo coordenada como valores do eixo X e Y. Mas não faz muito sentido dentro deste contexto


Responder

Gostei + 0

25/02/2005

Alexpatrik

São os índices do Menu


Responder

Gostei + 0

25/02/2005

Nildo

Use o [color=#FF0000:1c2c556f9e]IndexOf[/color:1c2c556f9e]

Indice := MainMenu1.Items.IndexOf( MainMenu1.Items[2] );

Indice := MainMenu1.Items[2].IndexOf( MainMenu1.Items[2].items[1] );


São exemplos que retornam o índice de determinados menus.


Responder

Gostei + 0

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

Aceitar