Realmente não sei. Teoricamente você poderia testar se o click foi no menu
ou na barra de título. Mas nos tests que eu fiz não funcionaram. Dá uma
olhada ness página. Tem a documentação desta mensagem:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputmessages/wm_nchittest.asp
On 10/8/06, henrique_filet <[EMAIL PROTECTED]> wrote:
>
> Caro Leodinei,
>
> Obrigado pela ajuda cara. Teóricamente, era exatamente isso que eu
> precisava,porém, tenho um MENUBAR na minha aplicacao que, após
> implementado o codigo por ti informado, este ficou desabilitado, não
> permitindo acessar os menus do sistema...
>
> Como procedo para corrigir esta incoerência??
>
> Aguardo retorno.
>
> Sérgio
>
> --- Em delphi-br@yahoogrupos.com.br, "Leodinei Bielak"
> <[EMAIL PROTECTED]> escreveu
> >
> > On 10/8/06, henrique_filet <[EMAIL PROTECTED]> wrote:
> > >
> > > Caros colegas da lista, como faço para evitar que o usuário do
> meu
> > > sistema arraste o form principal pela tela...meu form tem q ficar
> > > sempre com left 0 e top 0. Entao, se o usuario manter
> pressionado o
> > > mouse sobre a barra de titulo do form e arrastá-lo, essa ação
> deve ser
> > > bloqueada pelo meu sistema...como devo proceder isso?? Aguardo
> > > retorno...
> > >
> > > Obrigado
> > >
> > > Sérgio
> > >
> >
> >
> >
> >
> > Você tem que trabalhar com as mensagens do windows.
> > Insira esta procedure no seu formulário.
> > procedure WMNCHITTEST(var M : TWMNCHitTest); message WM_NCHITTEST;
> >
> > e o seguinte código na implementação:
> > procedure TfrmDevedores.WMNCHITTEST(var M: TWMNCHitTest);
> > begin
> > M.Result := 0;
> > end;
> >
> > T+
> >
> >
> > --
> > Leodinei Bielak
> >
> > "Civilization had too many rules for me, so I did my best to
> rewrite them.
> > _Bill Cosby_"
> >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
>
>
>
>
>
>
>
--
Leodinei Bielak
"Civilization had too many rules for me, so I did my best to rewrite them.
_Bill Cosby_"
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
