| |
Fragen & Antworten rund um sev-KomponentenUnload EXE in Verbindung mit der sevCollbar | | | Autor: Callimero | Datum: 04.08.18 18:05 |
| Hallo zusammen.
Ich habe ein kleines Problem beim entladen einer EXE in Verbindung mit der sevCoolbar, die als Hauptnavigation oben am Fenster angedockt ist.
Private Sub cbarMain_ButtonClick(ByVal nButton As Long, ByVal sKey As String, _
ByVal bValue As Boolean, Button As Integer, Shift As Integer)
' Mit nButton ist das beschriebene Problem auch vorhanden
Select Case sKey
Case "mnuExit"
CLOSE_APPLICATION False, False, False, True
Exit Sub
End Select
.
.
.
End Sub In der Sub "CLOSE_APPLICATION" werden alle Einstellungen gespeichert, Datenbankverbindungen geschlossen usw.
Das funktioniert soweit auch alles ohne Probleme, wenn ich dies bspw. über die "X-Schaltfläche" der Form oder einem zum Test eingefügten Button aufrufe.
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If UnloadMode = 0 Then CLOSE_APPLICATION False, False, False, True
End Sub Wenn ich dies über die sevCoolBar machen möchte, bleibt das Programm im Speicher... LEIDER!!!
Da ich bereits viele andere Controls ebenfalls mit "CLOSE_APPLICATION" getestet habe, mit denen dies völlig problemlos funktioniert, muss ich hier wohl davon ausgehen, dass das Problem mit der Coolbar zusammenhängt!?
Falls jemand eine Idee / Lösungsvorschlag hätte, wäre ich dankbar.
Ich habe sogar schon einen Timer benutzt, der beim anklicken der Schaltfläche aktiviert wird und nach 1sek die Funktion "CLOSE_APPLICATION" aufruft. Aber auch hier scheint es so zu sein, als würde die sevCoolbar das beenden verhindern.
MfG
A. Lehmann | |
Re: Unload EXE in Verbindung mit der sevCollbar | | | Autor: W. Wolf | Datum: 27.11.18 13:10 |
| Hallo,
ich meine, die Lösung liegt ja bereits in deiner Beschreibung. Wenn das CLOSE_APPLICATION in der Form_QueryUnload funktioniert, dann lass es doch dort seinen Job machen:
Private Sub cbarMain_ButtonClick(ByVal nButton As Long, ByVal sKey As String, _
ByVal bValue As Boolean, Button As Integer, Shift As Integer)
' Mit nButton ist das beschriebene Problem auch vorhanden
Select Case sKey
Case "mnuExit"
Unload Me
Exit Sub
End Select
.
.
.
End Sub und
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If UnloadMode <= 1 Then CLOSE_APPLICATION False, False, False, True
End Sub Also, damit sollte man doch leben können, oder? Zumal ich nicht erkennen kann, dass CLOSE_APPLICATION die Applikation auch beendet. Letzten Endes müsste irgendwo in dieser Sub auch ein Unload Me vorkommen, was dann irgendwie den Aufruf in der QueryUnload obsolet oder redundant macht.
Schönen Gruß
W. Wolf | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
vb@rchiv CD Vol.6 vb@rchiv Vol.6
Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
Online-Update-Funktion Entwickler-Vollversionen u.v.m.Jetzt zugreifen Tipp des Monats Neu! sevEingabe 3.0
Einfach stark!
Ein einziges Eingabe-Control für alle benötigten Eingabetypen und -formate, inkl. Kalender-, Taschenrechner und Floskelfunktion, mehrspaltige ComboBox mit DB-Anbindung, ImageComboBox u.v.m. Weitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|