Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

SevDG2 FilterKeyPress Fehler
Autor: AndiSW
Datum: 03.10.04 13:03
Hallo, habe folgenden Fehler in meiner Anwendung (AccessXP): Die unten angeführte Prozedur steuert den Benutzabbruch beim Einsatz der Filterzeile des SevDataGrid2. Dieses Beispiel ist 1:1 aus der Hilfe übernommen. Leider führt der Einsatz dieser Prozedur bei mir zu völlig zusammenhanglosen Fehlermeldungen wie z.B. "Fehler bei MouseMove-Ereignis", "Fehler bei Unload-Ereignis". Das Grid zeigt nach Wegklicken der Fehlermeldungen auch keine Daten an. Lasse ich die Prozedur weg, klappt alles tadellos, auch die Filterung. Einsatz der Filterzeile mit Mehrfachfilter erfolgt nach Anleitung aus der Hilfe. -------- Private Sub Grid1_FilterKeyPress(KeyAscii As Integer) ' Filterbearbeitung abbrechen? Dim i As Long If KeyAscii = 27 Then If MsgBox("Filterbearbeitung wirklich abbrechen?", _ vbQuestion + vbYesNo + vbDefaultButton2) = vbYes Then ' ursprüngliche Filterzeile wiederherstellen For i = 1 To Grid1.Cols With Grid1.Columns(i) .Filter = sFilter(i) If Len(sFilter(i)) = 0 Then .FilterShowDisabled = True End If End With Next i Else KeyAscii = 0 End If End If End Sub ------- Jetz habe ich unter dem FilterKeyPress-Ereignis im Objektkatalog gesehen, dass hier eigentlich noch ein weiterer Parameter für den Spaltenindex erwartet wird: Auszug: "Event FilterKeyPress(nCol As Long, KeyAscii As Integer)" Ha denke ich, damit ist das Problem behoben. Parameter bei mir ergänzt. ... Leider ohne Erfolg. Es reicht übrigens, wenn ich nur den den Prozedurrahmen stehen lasse, um den Fehler auszulösen. Also dies hier: --- Private Sub Grid1_FilterKeyPress(nCol As Long, KeyAscii As Integer) 'hier nichts tun End Sub ---- oder ohne Parameter nCol --- Private Sub Grid1_FilterKeyPress(KeyAscii As Integer) 'hier nichts tun End Sub ----- Was mache ich falsch? Gruss Andreas

SevDG2 FilterKeyPress Fehler	803	AndiSW	03.10.04 13:03
Re: SevDG2 FilterKeyPress Fehler	508	Dieter	03.10.04 18:59
Re: SevDG2 FilterKeyPress Fehler	481	AndiSW	03.10.04 19:11

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

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen