AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

TAB unterdrücken

Ein Thema von barnti · begonnen am 18. Feb 2004 · letzter Beitrag vom 15. Apr 2004
Antwort Antwort
barnti

Registriert seit: 15. Aug 2003
Ort: Mal hier mal da...
689 Beiträge
 
Delphi 7 Enterprise
 
#1

TAB unterdrücken

  Alt 18. Feb 2004, 12:31
Hallo,

ich habe eine TDBGrid Komponente in der mit der Taste 'TAB' von Feld zu Feld navigiert werden kann. Mein Problem ist, dass wenn das letzte Feld (letzte mit TAB anzuspringende Feld) erreicht ist und abermals die Taste 'TAB' betätigt wird, so wird ein neuer Datensatz angelegt ohne den vorherigen zu 'comitten'.

Was ich also möchte ist, durch einen Keyhandler das Ereignis abzufangen und das 'TAB' abzubrechen wenn der Benutzer sich in dem letzten mit 'TAB' erreichbaren Feld befindet.

Wie kann ich das abfragen?

Delphi-Quellcode:
...
if Grid.selectedField = Grid.Fieldcount
   abort;
So geht es leider nicht, da es vorkommt, dass das letzte Feld nur lesbar ist und das Feld damit keinen Tabstop hat...

Hat jemand eine Idee?

Danke & Gruß,

Barnti
  Mit Zitat antworten Zitat
Benutzerbild von Ultimator
Ultimator

Registriert seit: 17. Feb 2004
Ort: Coburg
1.860 Beiträge
 
FreePascal / Lazarus
 
#2

Re: TAB unterdrücken

  Alt 15. Apr 2004, 13:33
1.) Da fehlt ein "then" hinter FieldCount, das dürfte aber nicht der Fehler sein

2.)Du könnntest das mit virtuellen TastenCodes ála VK_irgendwas machen. z.B.
Delphi-Quellcode:
if Grid.SelectedField = Grid.FieldCount then
if Key=VK_(TastenCode für Tab) then Key:=#0;
Hab's nicht getestet, müsste aber vom Prinzip her gehen
Julian J. Pracht
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:39 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