Réduction de l'application : utilisation des messages de fenêtre

Soyez le premier à donner votre avis sur cette source.

Snippet vu 6 454 fois - Téléchargée 32 fois

Commenter

Contenu du snippet

Dans une application à multiples fenêtres, lorsque je réduisais une fenêtre, celle-ci se rédusait au-dessus du "Menu Déamrrer", plutôt que dans la barre des tâches.

Pour règler cette situation, j'ai dû utiliser les window messages.

Source / Exemple : 


//Tout d'abord, dans la section "Private" de votre form :
procedure WMSYSCOMMAND (var msg:TWMSysCommand) ; message WM_SYSCOMMAND;

//Ensuite, dans votre code :
procedure VotreForm.WMSYSCOMMAND(var msg: TWMSysCommand);
begin
  if msg.CmdType=SC_MINIMIZE then 
    Application.Minimize
  else
    inherited;
end;
//N'oubliez pas votre inherited, sans quoi l'application ne fera tout simplement plus rien,
//outre ce qui est défini dans vos if!

Conclusion :


Les window messages peuvent être utilisés dans plusieurs cas, alors n'hésitez pas à consulter
WM_SYSCOMMAND
Dans l'aide de Delphi!

A voir également

Ajouter un commentaire Commentaires
cavalier2400 Messages postés 120 Date d'inscription mardi 8 juillet 2008 Statut Membre Dernière intervention 1 décembre 2010 1
3 juil. 2009 à 21:00
Bonsoir,

C'est toute l'application qui se place sur la barre des taches, à la ligne 5 j'aurais bien aimé lire Tvotreform et non votreform. merci, je cherche toujours comment placer une form sur la barre des tâches windows.
JackTheRipp3r Messages postés 50 Date d'inscription jeudi 1 mai 2003 Statut Membre Dernière intervention 5 février 2004
4 févr. 2004 à 19:59
Merci je cherchais justement comment résoudre ca !
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_Jos)