X
Xonica Developer
i have this code:
Dim O As System.Diagnostics.StackTrace = New
System.Diagnostics.StackTrace(True)
Dim F As System.Diagnostics.StackFrame
F = O.GetFrame(7)
Select Case F.GetMethod.Name.ToString
Case "SendMessage", "RunDialog" 'close with me.close
Case "CallWindowProc" 'close with (x) button
Case "DispatchMessageW" 'close with Task Manager
Case Else 'booh!
End Select
but don't work!!!!!
i need to know if i have pushed (X) button or me.close
Dim O As System.Diagnostics.StackTrace = New
System.Diagnostics.StackTrace(True)
Dim F As System.Diagnostics.StackFrame
F = O.GetFrame(7)
Select Case F.GetMethod.Name.ToString
Case "SendMessage", "RunDialog" 'close with me.close
Case "CallWindowProc" 'close with (x) button
Case "DispatchMessageW" 'close with Task Manager
Case Else 'booh!
End Select
but don't work!!!!!
i need to know if i have pushed (X) button or me.close