| |
Fortgeschrittene ProgrammierungUnload EXE in Verbindung mit der sevCollbar | | | Autor: Callimero | Datum: 04.08.18 13:07 |
| 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
Beitrag wurde zuletzt am 04.08.18 um 13:09:35 editiert. | |
Re: Unload EXE in Verbindung mit der sevCollbar | | | Autor: Franki | Datum: 05.08.18 03:10 |
| Hallo,
warum so umständlich?
Du schreibst, dass es die X-Schaltfläche im Fenster funktioniert also über _unload, queryunload usw. Das ist ja auch der richtige Weg.
Also wenn du den Quereinstieg von irgendwoher möchtest, dann rufe einfach zu gegebenem Zeitpunkt das normale _unload auf und gut ist es. So mache ich das auch schon seit Jahrzehnten und es funktioniert einfach immer auch aus anderen Aufrufsituationen heraus.
Ich habe aber noch nie den Bedarf bzw. die Notwendigkeit gehabt das von woanders her aufrufen zu müssen ohne diesen Weg zu vermeiden.
Warum genau möchtest du das anders als üblich machen?
Gruß
Frank | |
Re: Unload EXE in Verbindung mit der sevCollbar | | | Autor: Callimero | Datum: 05.08.18 13:41 |
| Hallo Frank.
Vielen Dank für deine Antwort.
Zitat: | | Warum genau möchtest du das anders als üblich machen? | |
Zum besseren Verständnis sei gesagt, dass das "mnuExit" noch mehrere Untermenüs besitzt. Bspw. die erneute Benutzeranmeldung (LoginForm), das neustarten des Programms bzw. das starten einer anderen EXE (Einrichtungsassistent für diese Software).
Je nachdem welcher Menüpunkt angeklickt wird, ändern sich die Parameter von "CLOSE_APPLICATION".
Zitat: | | Also wenn du den Quereinstieg von irgendwoher möchtest, dann rufe einfach zu gegebenem Zeitpunkt das normale _unload auf und gut ist es. So mache ich das auch schon seit Jahrzehnten und es funktioniert einfach immer auch aus anderen Aufrufsituationen heraus. | |
Private Sub cbarMain_ButtonClick(ByVal nButton As Long, ByVal sKey As String, _
ByVal bValue As Boolean, Button As Integer, Shift As Integer)
Select Case sKey
Case "mnuExit"
Unload frmMain: Exit Sub
End Select
End Sub Ja, das mache ich ja auch immer so. Aber leider funktioniert auch das nicht in Verbindung mit der sevCoolbar. Das ist ja das komische daran, slebst wenn man mal die Sub "CLOSE_APPLICATION" völlig außen vor lässt.
Gruß
Andreas | |
Re: Unload EXE in Verbindung mit der sevCollbar | | | Autor: Souffleurlos | Datum: 05.08.18 18:46 |
| Hallo Callimero,
irgendwie sägst Du den Ast auf dem Du sitzt zum Stamm hin ab. Das sevControl sendet das Event ButtonClick und wartet wahrscheinlich auf eine Rückmeldung die nie kommen wird, weil das Control insgesamt ja noch innerhalb dieses Events abgeschossen wird. Ich denke in dem Zusammenhang solltes Du das Tutorial zu diesem Event - insbesondere wegen der übergebenen Parameter - nochmals studieren. | |
| 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 |
|
|
TOP! Unser Nr. 1
Neu! sevDataGrid 3.0
Mehrspaltige Listen, mit oder ohne DB-Anbindung. Autom. Sortierung, Editieren von Spalteninhalten oder das interaktive Hinzufügen von Datenzeilen sind ebenso möglich wie das Erstellen eines Web-Reports. Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|