Erro ao Chamar um Popup usando Funcao Point - LAZARUS 1.8.2

[adilsonpazzini]

Estou com este problema abaixo , ao chamar a função do Point no lazarus... o Engraçado e que no mesmo projeto tenho diversos form´s chamando da mesma forma e não esta dando esse problema . alguém ja passou por isso ?

Percebi que clicando sobre a Funcao point ele direciona para o arquivo struct.inc ... isso nesta tela que esta dando o problema . ja na tela que nao da problema . quando clico sobre a funcao Point ele direciona para o arquivo Classesh.inc . que acho que e o correto .

Sem mais, Adilson Pazzini

[Juliomar Marchetti]

Pode estar faltando em seu projeto a dependência de algum pacote.

veja nas opções de projeto quais está usando.

[adilsonpazzini]

Então Juliomar , como eu disse, tem neste mesmo projeto ja formulários usando esse processo e funciona normal , sao diversos forms que ja usam isso .. esse ja nao ta dando certo . cheguei a comparar as uses .. tambem deixei igual e mesmo assim . dando problema ..

[Rafael Dias]

Checa as clausulas uses e veja se o struct esta depois da class pode ser isso, já que o tipo deve existir nos dois arquivos.

[Juliomar Marchetti]

veja na imagem tem lá do lado direito required packages. viu se nos dois projetos estão iguais?

[adilsonpazzini]

Juliomar, e o mesmo projeto ...   e Rafael o Classes esta por primeiro sim ...

 

o Silvio Clecio pediu pra eu fazer assim

 Posicao := BT_IMPRIMIR.ClientToScreen(Classes.Point(0, BT_IMPRIMIR.Height));
 PopupMenu1.Popup(Posicao.X, Posicao.Y); 

em vez de informar so point informar classes.point ...

e deu certo ..

Obrigado a todos .

[Rafael Dias]

se mudar a posição do class e do struct não vai precisar usar Classes.Point pois o struct vai vir antes do class com isso o class tem preferencia.

[adilsonpazzini]

Rafael . entao o pessoal descobriu , era a Unit Windows que estava conflitando com a Unit Classes .. na verdade a Unit Classes tem que vir depois da Unit Windows .. se nao fica dando esse problema ..

 

Mais uma vez muito obrigado pela Ajuda .. hj consegui transportar tudo de Delphi7 para Lazarus .. ta funcionando bem .. ficou com uma aparência muito legal ... talvez apareça algum problema ou outro , mais ta caminhando ..

 

Obrigado .

Adilson Pazzini