Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi JvDBUltimGrid - Fehler beim KeyDown ? (https://www.delphipraxis.net/127439-jvdbultimgrid-fehler-beim-keydown.html)

onkelmehli 13. Jan 2009 12:26


JvDBUltimGrid - Fehler beim KeyDown ?
 
Hallo,

ich habe im JvUltimGrid folgendes im KeyDown-Ereignis:

Delphi-Quellcode:
 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;
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 ?


Gruß

Matthias

nahpets 13. Jan 2009 12:50

Re: JvDBUltimGrid - Fehler beim KeyDown ?
 
Hallo,

machmal in die Ereignisroutine ein
Delphi-Quellcode:
ShowMessage(Chr(Key));
und betätige dann die F-Tasten, Du wirst Dich wundern und das Ergebnis verstehen.
Wahrscheinlich musst Du Shift noch mit abfragen.

onkelmehli 13. Jan 2009 13:13

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

nahpets 13. Jan 2009 13:22

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.

onkelmehli 13. Jan 2009 14:22

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 16:22 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz