![]() |
JvDBUltimGrid - Fehler beim KeyDown ?
Hallo,
ich habe im JvUltimGrid folgendes im KeyDown-Ereignis:
Delphi-Quellcode:
Wenn ich nun z. B. AltGr+F7 (oder auch nur F7) drücke, erfolgt "AdoDataSet1.Append" da, obwohl die Abfrage ja "False" ergeben müsste, scheinbar "True" ist. Ist das ein Fehler der Komponente oder mach ich da irgend einen Fehler ?
if (( Key in [VK_NUMPAD0,VK_NUMPAD1,VK_NUMPAD2,VK_NUMPAD3,VK_NUMPAD4,
VK_NUMPAD5,VK_NUMPAD6,VK_NUMPAD7,VK_NUMPAD8,VK_NUMPAD9]) or (chr(key) in ['1','0','2','3','4','5','6','7','8','9']) or (chr(key) in ['a','A','b','B','c','C','d','D','e','E','f','F','g','G', 'h','H','i','I','j','J' ,'k','K','l','L','m','M','n','N','o','O','p','P','q','Q','r','R','s','S','t','T','u','U' ,'v','V','w','W','x','X','y','Y','z','Z','$'])) then begin if (AdoDataSet1.State = dsBrowse) then begin if JvDBUltimGrid1.SelectedField.AsString = '' then AdoDataSet1.Edit else AdoDataSet1.Append; key:=ord(#0); end end; Gruß Matthias |
Re: JvDBUltimGrid - Fehler beim KeyDown ?
Hallo,
machmal in die Ereignisroutine ein
Delphi-Quellcode:
und betätige dann die F-Tasten, Du wirst Dich wundern und das Ergebnis verstehen.
ShowMessage(Chr(Key));
Wahrscheinlich musst Du Shift noch mit abfragen. |
Re: JvDBUltimGrid - Fehler beim KeyDown ?
danke erst einmal,
das ist aber sehr merkwürdig :gruebel: im "normalen" Standard-DBGrid ist das aber anders. Selbst mit Shift abfragen komme ich auf das selbe Ergebnis.... Gruß Matthias |
Re: JvDBUltimGrid - Fehler beim KeyDown ?
Hallo,
wie wäre es denn mit KeyPress, das Ereignis scheint nur auf Zeichen zu reagieren. DBGrid und JvDBUltimGrid verhalten sich bei mir identisch. Du möchtest doch sowas wie ein "Autoedit" erstellen, dafür müsste das reichen. |
Re: JvDBUltimGrid - Fehler beim KeyDown ?
Danke, aber KeyPress bringt mich leider nicht viel weiter, da der Code nur ein Ausschnitt ist und dort noch einige ander Abfragen gemacht werden, unter anderem Tastenkombinationen wie z. B. Alt+A etc.
Gruß Matthias |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:31 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz