AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi TDBEdit Datum abprüfen bei exit

TDBEdit Datum abprüfen bei exit

Ein Thema von stalkingwolf · begonnen am 6. Dez 2022 · letzter Beitrag vom 8. Dez 2022
Antwort Antwort
stalkingwolf

Registriert seit: 6. Mai 2011
552 Beiträge
 
#1

AW: TDBEdit Datum abprüfen bei exit

  Alt 7. Dez 2022, 09:10
Die DBEdit-Komponente selbst kann das nicht. Du kannst die Eingabe aber über das Datenfeld prüfen.

Erstelle einfach eine OnSetText-Ereignisprozedur für das entsprechende Datenfeld. Hier bekommst du die Eingabe als String, bevor der Wert in das Datenfeld eingetragen wird. Hier kannst du es prüfen, manipulieren, löschen oder was auch immer. Am Ende der Prozedur kannst du dann den richtigen TDateTime-Wert über Sender.Value:=.... zuweisen.
Im OnCreate des Datenmoduls habe ich eine Schleife eingebaut, die eine spezielle OnSetText-Procedure allen TDateFields / TDateTimeFields zuweist. Dann vergisst man auch keins davon.
das haben wir auch und dort habe ich es auch eingefügt. haben wir schon für das Displayformat für Zahlen gemacht.
Dort habe ich auch onSetText onGetText für ftDate und ftDateTime gesetzt.

Problem 2 löst du mit

Sender.Clear;
Perferkt. Danke.

Geändert von stalkingwolf ( 7. Dez 2022 um 09:16 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.756 Beiträge
 
Delphi 12 Athens
 
#2

AW: TDBEdit Datum abprüfen bei exit

  Alt 7. Dez 2022, 09:23
Ich habe es selbst noch nicht probiert, aber in meinem Beitrag zur CodeRage 2022 beschreibe ich ein Verfahren, mit dem man einem TCustomEdit unter anderem auch einen Validator zuweisen kann. Das das TDBEdit auch von TCustomEdit abgeleitet ist, könnte das da auch funktionieren.

Die entsprechenden Sourcen sind in meiner CmonLib enthalten, zu finden auf https://github.com/UweRaabe/CmonLib im Observer Beispiel.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
stalkingwolf

Registriert seit: 6. Mai 2011
552 Beiträge
 
#3

AW: TDBEdit Datum abprüfen bei exit

  Alt 7. Dez 2022, 09:38
Danke. Schau ich mir bei Gelegenheit einmal an.
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.756 Beiträge
 
Delphi 12 Athens
 
#4

AW: TDBEdit Datum abprüfen bei exit

  Alt 8. Dez 2022, 11:31
Danke. Schau ich mir bei Gelegenheit einmal an.
Die Mühe kannst du dir sparen. Der Validator dort kann (bislang) nur überprüfen, lässt aber keine Änderung des eingegebenen Wertes zu. Das wäre aber zur Komplettierung des Datumswerts notwendig.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Antwort Antwort

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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 00:19 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