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