Form VS 2005 empecher fermetureRésolu

Question

Bonjour a tous,

Je cherche a empecher la fermeture d'une Form en VB.NET version 2005.

Avec la version 2003 j'utilisais ca qui marchait tres bien, mais il veut pas sous 2005:

  Private Sub FrmLayerEditor_Closing(ByVal sender As Object, ByVal eventArgs As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        eventArgs.Cancel = True
    End Sub

Comment fait on pour empecher la fermeture d'une form sous vb 2005?

Merci

Jeremy

pinje · Accepted Answer

C'est toujour quand on pose la question qu'on trouve...

Voici ce qui marche: 

Private Sub FrmGISLayer_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        e.Cancel = True
    End Sub

mortalino · Answer

Salut !

Je ne te garantis pas que cette technique fonctionne en VB.net mais en VBA, c'est super, &#231;a permet d'occulter la croix :

En haut, en d&#233;claration de ta Form :

Private Declare Function GetWindowLongA Lib "user32" _
  (ByVal hwnd As Long, ByVal nIndex As Long) As Long


Private Declare Function SetWindowLongA Lib "user32" _
  (ByVal hwnd As Long, ByVal nIndex As Long, _
  ByVal dwNewLong As Long) As Long


Private Declare Function FindWindowA Lib "user32" _
  (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Puis dans l'initialize de ta Form :

  Dim hwnd As Long
  hwnd = FindWindowA("Thunder" & IIf(Application.Version Like "8*", _
    "X", "D") & "Frame", Me.Caption)
  SetWindowLongA hwnd, -16, GetWindowLongA(hwnd, -16) And &HFFF7FFFF

Seul bug qui peut apparaitre, c'est si tu changes le Texte du Caption de ta form, apr&#232;s chargement (suivant les besoins, &#231;a peut arriver) dans ce cas, la croix revient.

@ ++

  Mortalino

pinje · Answer

Ca parait complique mais c bon a savoir!

Merci

A ++

mortalino · Answer

C'est un Appel d'API : sans forc&#233;ment le comprendre, ce qui importe c'est de savoir ce que &#231;a fait, et o&#249; le placer.

Ce qui est en bleu, c'est a mettre en tout premier dans le module de ta form, et ce qui est en vert, c'est dans
Form1_Initialize ( )

Ca vaut le coup peut-&#234;tre d'essayer !!

@ ++

  Mortalino

Form VS 2005 empecher fermeture

4 réponses

Discussions similaires