Discussion :

[kheldoun ahmed]

les programeurs,

moi j'ai un pb est comment empecher le double clique sur la barre de titre d'une forme.

merci a l'avance.

[ero-sennin]

Salut,

Tu veux éviter de faire un double clic pour ne pas agrandir ou rétrécir ta fenêtre...

[Clorish]

visiblement tu ne peux pas faire ca de maniere simple.
Je te conseille plutot de gerer les effets que le click en lui meme.
Essaye de detecter ce qui est responsable (maximize/restore) et surcharge les methodes associées pour autoriser ou annuler l'effet.

Sinon tu peux utiliser d'autres types de bordures comme bstoolwindow ou encore rien du tout.
Apres rien ne t'empeche d'en redessiner une dan la partie top de ta form ....

[ero-sennin]

+1 avec Clorish

Si c'est pour "capturer" l'agrandissement et la réduction de form et annuler leur effet, il vaudrait mieux se tourner vers un autre type de fenêtre. Pour se faire, il faut éditer la propriété BorderStyle de la Form en question :

Divers choix te sont proposés :

bsDialog Non redimensionnable ;bordure de boîte de dialogue standard
bsSingle Non redimensionnable ;bordure simple
bsNone Non redimensionnable ;pas de bordure visible
bsSizeable Bordure redimensionnable standard
bsToolWindow Identique àbsSingle avec une petite barre de titre
bsSizeToolWin Identique àbsSizeable avec une petite barre de titre

Voilà voilà

[Cl@udius]

visiblement tu ne peux pas faire ca de maniere simple.

Ben si !

Tu places TApplicationEvents sur ta form puis tu implémente OnMessage comme ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
  if (Msg.message = WM_NCLBUTTONDBLCLK) then
    Handled := True;
end;

@+ Claudius

[Clorish]

sauf que la tu catch tous les messages double-click

Il faudrait plus de finesse ...
A la rigeur si on arrive a detecter la cible du message et encore.
Ou alors combiné avec le message MouseDown pour tester les coord de la sourie en position absolue, a savoir si elle se trouve dans ou hors de la barre de menu.

Je pense qu'effectivement, il n'y a pas de solution triviale a ce genre de probleme

Il faut savoir uen chose aussi : TForm est un composant a moitié derivé des objets windows .... reste plus qu'a esperer que le comportement lié au double click ne soit pas trop enfoncé dans les APIs windows

[Cl@udius]

sauf que la tu catch tous les messages double-click

Non non, j'intercepte uniquement les double-click sur la zone non client de la fenêtre: WM_NCLBUTTONDBLCLK.

@+

[kheldoun ahmed]

Non non, j'intercepte uniquement les double-click sur la zone non client de la fenêtre: WM_NCLBUTTONDBLCLK.

@+

merci pour vous reponse,

mais j'ai tester vos propositions mais rien d'effet, je peux pas intercepter les double clique sur la barre de menu de ma form.

je pens qu'il fallait chercher aux APIWindows mais laquelle.

merci en avance.

[Cl@udius]

moi j'ai un pb est comment empecher le double clique sur la barre de titre d'une forme.

puis

je peux pas intercepter les double clique sur la barre de menu de ma form.

Le code que je t'ai proposé annule le double-clic effectué sur la barre de titre de la forme.
Maintenant reste à savoir si c'est vaiment ce que tu recherches. ???

@+

[Clorish]

Non non, j'intercepte uniquement les double-click sur la zone non client de la fenêtre: WM_NCLBUTTONDBLCLK.

autant pour moi
Je savais meme pas qu'il y avait 2 types de messages
Comme quoi on en apprends encore tous les jours

[Ludo_360]

Lors d'un double clic tu peux récupérer les coordonnées de la souris , tu passes en référence client (ScreenToClient) puis tu compares avec la dimension de la zone de la barre de titre. Sachant que le point (0,0) est situé en haut à gauche de ta form (juste en dessous de ta barre de titre en fait) tu peux, après quelques réglages, trouver facilement cette zone.
Libre à toi de déterminer ce que tu veux faire de cet égènement après...

voila

ludo