begin process at 2010 02 10 14:33:52
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

J'AI BESOIN D'AIDE !!!! :)

 > 

Close = False


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Close = False

samedi 10 août 2002 à 04:41:46 | Close = False

snakeit

Comment je peux faire pour que le X dans le coins de la fenêtre à droite devienne invulnérable ??

Merci..
samedi 10 août 2002 à 11:41:35 | Re : Close = False

Derrick soft

Bonjour,

Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, _
ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, _
ByVal nPosition As Long, ByVal wFlags As Long) As Long

' Remove the Close menu item and disable the Close button
' from a window

Public Sub RemoveCloseMenuItem(ByVal hWnd As Long)
Const SC_CLOSE = &HF060
Const MF_BYCOMMAND = 0

Dim hMenu As Long
' get the system menu's handle
hMenu = GetSystemMenu(hWnd, 0)
' remove the Close item
RemoveMenu hMenu, SC_CLOSE, MF_BYCOMMAND
End Sub

Cordialement

Stéphane



-------------------------------
Réponse au message :
-------------------------------

Comment je peux faire pour que le X dans le coins de la fenêtre à droite devienne invulnérable ??

Merci..
dimanche 11 août 2002 à 01:09:22 | Re : Close = False

rene38

Ou bien, dans les propriétés de la feuille tu choisis False pour la propriété ControlBox et tu n'auras pas non plus réduction ni agrandissement



-------------------------------
Réponse au message :
-------------------------------

Bonjour,

Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, _
ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, _
ByVal nPosition As Long, ByVal wFlags As Long) As Long

' Remove the Close menu item and disable the Close button
' from a window

Public Sub RemoveCloseMenuItem(ByVal hWnd As Long)
Const SC_CLOSE = &HF060
Const MF_BYCOMMAND = 0

Dim hMenu As Long
' get the system menu's handle
hMenu = GetSystemMenu(hWnd, 0)
' remove the Close item
RemoveMenu hMenu, SC_CLOSE, MF_BYCOMMAND
End Sub

Cordialement

Stéphane



-------------------------------
Réponse au message :
-------------------------------

Comment je peux faire pour que le X dans le coins de la fenêtre à droite devienne invulnérable ??

Merci..

dimanche 11 août 2002 à 04:46:42 | Re : Close = False

Derrick soft

Bonsoir,

Je pense qu'il ne parle pas de réduction, mais plutôt de la case fermeture.

Cordialement

Stéphane



-------------------------------
Réponse au message :
-------------------------------

Ou bien, dans les propriétés de la feuille tu choisis False pour la propriété ControlBox et tu n'auras pas non plus réduction ni agrandissement



-------------------------------
Réponse au message :
-------------------------------

Bonjour,

Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, _
ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, _
ByVal nPosition As Long, ByVal wFlags As Long) As Long

' Remove the Close menu item and disable the Close button
' from a window

Public Sub RemoveCloseMenuItem(ByVal hWnd As Long)
Const SC_CLOSE = &HF060
Const MF_BYCOMMAND = 0

Dim hMenu As Long
' get the system menu's handle
hMenu = GetSystemMenu(hWnd, 0)
' remove the Close item
RemoveMenu hMenu, SC_CLOSE, MF_BYCOMMAND
End Sub

Cordialement

Stéphane



-------------------------------
Réponse au message :
-------------------------------

Comment je peux faire pour que le X dans le coins de la fenêtre à droite devienne invulnérable ??

Merci..




Cette discussion est classée dans : false, close


Répondre à ce message

Sujets en rapport avec ce message

pb de minimize, maximize, close dans mdi [ par abdoulax ] Bonjour, Je voudrais maximiser une fenetre fille dans un mdi en lui enlevant les bouton de controle close... :         Me.WindowState = System.Windo convertir tous les fichiers .dat d'un repertoire en fichiers .xls [ par gui1980 ] Bonjour, Ceci est mon premier message sur ce forum. J espere poster dans la bonne section. Voici mon probleme:Je dois convertir successivement plusieu Erreur en fonction du system d'exploitation je deviens fou [ par olivierk ] Bonjour,J'ai developpé dans la cadre de mon boulot un fichier excel. Je l'ai developpé sur windows XP SP2 et Excel 2003, elle fonctionne parfaitement. Publipostage avec VBA et Word [ par ZANUS ] Bonjour à tout le monde. J'ai posté un message mais visiblement j'ai été très loin d'être clair. Voici donc beaucoup plus(!!) d'explications. Si quel Copier/Coller lignes sous conditions dans Excell [ par nicostrong ] Bonjour,Voiçi un petit code qui permet via un bouton de trier les données d'un tableau et de les dispatcher dans deux autre feuilles.Sachent que la pr Configuration CommanButton() [ par ArchiveAgain ] 2 questions : _ sur le premier bouton que je crée, je n'arrive pas à configurer automatiquement l'information caption. Je souhaiterais que Caption=cha Macro Excel: erreur format date lors de la convertion de données [ par denis730 ] Bonjour, Avec une macro j'ouvre un fichier texte dont les champs sont séparés par des tabulations. Dans un premier temps les lignes de mon fichier tex probleme de tmer [ par S4ngo ] Bonjours, j'ai réalisé un programe en vb6, dans lequel je me sert d'un timer. Ce dernier ne fonctionne pas correctement sur les intervals que jai mis Urgent [ par le manche ] que veut direPersist Security Info=False" qui est un element d'une connexionConStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source= " & DataSource & VB6 Propriété d'un TextBox [ par JeffC1977 ] Salut à tous...Mon textbox a les propriété suivante:Multiline   TRUEScrollBars   2- VERTICALEnabled   FALSEje dois laisser mon textbox.enabled = False


Nos sponsors


Sondage...

Comparez les prix

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,655 sec (3)

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