Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.07.01;
Download: [xml.tar.bz2];

Para baixo

Menu do sistema Encontre agências semelhantes


ZEE   (2002-06-12 15:12) [0]

Como fazer com que o menu do sistema do formulário saia programaticamente (como ao clicar no ícone no cabeçalho).
E esse menu também pode aparecer se o formulário simplesmente não tiver um título?
Agradecemos antecipadamente a todos.



Song   (2002-06-12 17:06) [1]

WM_NCHITTEST



ZEE   (2002-06-14 02:34) [2]

Sim, eu sei o uso de WM_NCHITTEST para arrastar uma janela em vez da barra de título para qualquer lugar, mas como posso fazer com que o menu do sistema saia de qualquer maneira?



Song   (2002-06-14 08:40) [3]

O uso de WM_NCHITTEST destina-se a determinar a operação com a área não cliente do formulário, ou seja, Você precisa determinar que o clique é feito no cabeçalho e soltar TPopup

>> arrastar uma janela em vez de um título para qualquer lugar que eu conheça
Sim, isso pode ser feito usando esta mensagem, mas WM_NCCHITTEST não se destina apenas a isso.



ZEE   (2002-06-16 01:35) [4]

Bem, para que você possa ver um exemplo (um pedaço de código) na "queda" do sistema Popup? ...



~Rand~   (2002-06-16 08:47) [5]

Excluído pelo moderador



Song   (2002-06-16 11:18) [6]

E que dificuldades?
particular Procedimento IfUserClicksOnTheCaption (Var Msg: TMessage); mensagem WM_NCRBUTTONDOWN; {Declarações particulares} público {Declarações públicas} fim; var Form1: TForm1; implementação Procedimento TForm1.WhetherUserClicksOnTheCaption (Var Msg: TMessage); Iniciar Com Msg Do IF WParam = HTCAPTION e PopupMenu1.Popup (LoWord (LParam), HiWord (LParam)); Fim;



RAK   (2002-06-16 11:23) [7]

WM_NCHITTEST PONAL !!!



ZEE   (2002-06-19 14:59) [8]

Música 2: não preciso de PopupMenu1 (podemos fazer isso sozinhos) - preciso do menu do sistema real para sair ...

2 RAK: Sim, entendo, entendo, mas não vejo nenhum exemplo com WM_NCHITTEST ...



Дмитрий Баранов   (2002-06-19 15:06) [9]

procedimento TForm1.Button1Click (Sender: TObject);
menu var: HMENU;
começar
menu: = GetSystemMenu (Self.Handle, FALSE);
TrackPopUpMenu (menu, 0, 100, 100, 0, Self.Handle, nulo);
end;



Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.07.01;
Download: [xml.tar.bz2];

em cima





Memória: 0.56 MB
Hora: 0.022 c
3-913
shulc
2002-06-04 19:17
2002.07.01
Campo do tipo CHAR, para quem trabalha com ADS


6-1129
sergio777
2002-04-09 20:24
2002.07.01
E como reescrever esta peça em C sob Delphi?


14-1188
marina
2002-05-31 14:58
2002.07.01
SGBD INGRES


3-919
BAY
2002-06-07 22:41
2002.07.01
Trava a pedido


1-998
kserg@ukr.net
2002-06-20 11:58
2002.07.01
Problemas usando janelas MDI





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese Romeno Russa sérvio Slovak esloveno Espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol