begin process at 2010 02 10 08:58:00
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

API

 > BLOQUER LE DÉPLACEMENT D'UNE FORM

BLOQUER LE DÉPLACEMENT D'UNE FORM


 Information sur la source

Note :
Aucune note
Catégorie :API Niveau :Débutant Date de création :08/12/2001 Vu / téléchargé :2 928 / 181

Auteur : fabiin

Ecrire un message privé
Site perso
Commentaire sur cette source (4)
Ajouter un commentaire et/ou une note

 Description

Ce bout de code permet de fixer une form sur l'écran ;)

Source

  • //Ajouter ceci dans les déclarations privées
  • procedure WMWindowPosChanging(var Message: TWMWindowPosMsg); message WM_WINDOWPOSCHANGING;
  • //puis ceci dans le code
  • procedure TForm1.WMWindowPosChanging(var Message: TWMWindowPosMsg);
  • begin
  • if (not Visible) then Exit;
  • with Message do begin
  • WindowPos.X:=Left;
  • WindowPos.Y:=Top;
  • Result:=0;
  • end;
  • end;
//Ajouter ceci dans les déclarations privées
procedure WMWindowPosChanging(var Message: TWMWindowPosMsg); message WM_WINDOWPOSCHANGING;



//puis ceci dans le code
procedure TForm1.WMWindowPosChanging(var Message: TWMWindowPosMsg);
begin

if (not Visible) then Exit;
with Message do begin
WindowPos.X:=Left;
WindowPos.Y:=Top;
Result:=0;

end;
end;  


 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip CAPTUER LE SON SORTANT ET L'ENREGISTRER DANS UN FICHIER WAV
CALCUL D'UNE MOYENNE
CHANGER LA DURÉE D'AFFICHAGE DES BULLES D'AIDES (HINT)
Source avec Zip Source avec une capture ASCII-T : PETIT SOFT D'ASCII ART.
CHANGER CONTRASTE / LUMINOSITÉ (L'ALGORITHME)

 Sources de la même categorie

Source avec Zip NEXTGENS -> UNITÉS DE TYPES ÉVOLUÉS NOUVELLE GÉNÉRATION (DE... par f0xi
Source avec Zip Source avec une capture AUTO-COMPLÉTION D'UN CONTRÔLE DE SAISIE par Bacterius
Source avec Zip CARDS GAME SDK 1.0.0.0 par f0xi
Source avec Zip Source avec une capture TRAYICON - VOTRE ICONE DANS LA BARRE DES TACHES par Bacterius
Source avec Zip Source avec une capture WINHIDER _ CACHER UN PROGRAMME DE L'ÉCRAN ET DE LA BARRE DE ... par soldier8514

Commentaires et avis

Commentaire de Bestiol le 06/01/2002 01:27:16

Salut !!
Il ya une autre solution pour bloquer la fenêtre... Je dis pas que c'est plus facile, mais c'est une suggestion :
Il "suffit" de supprimer l'item "Déplacement" du menu système de la form :

Procedure TForm1.FormCreate(Sender: TObject);
Begin
SysMenu := GetSystemMenu(Handle, False);  //Récupère le handle du menu
DeleteMenu(SysMenu, Sc_Move, mf_ByCommand); //Supprime                  
                                                                     //l'item "Déplacement" (SC_MOVE)
end;

Voilà... Peut-être certains utiliseront cette technique ?? ... Elle permet aussi de modifier le menu "a sa guise", avec ModifyMenu...

Bye... Bestiol

end;

Commentaire de Cyrille2 le 06/08/2003 15:52:50 administrateur CS

Salut!
t'as pas mis d'inherited, il me semble que c nécessaire, non ? enfin, evidemment, ss inherited, le programme doit pas changer de place puisqu'il recoit plus le message...

Commentaire de Glorkonline le 13/09/2003 19:55:57

Super, la source ! Je l'utiliserai dans mon programme de verrouillage de l'ordinateur (bloquer le form quand il faut taper un pass, çà fait toujours plus beau !)

Commentaire de Psychik le 23/01/2009 11:10:10

Les deux possibilités sont intéressantes, cependant Bestiol il ne "suffit" pas de supprimer l'item de déplacement : ta solution à le mérite d'être "propre" mais ne fonctionne pas... si tu enlève le menu système de ton form.

 Ajouter un commentaire




Nos sponsors


Sondage...

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,920 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales