AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi TDateTimePicker - wie Einfabefehler abfangen?
Thema durchsuchen
Ansicht
Themen-Optionen

TDateTimePicker - wie Einfabefehler abfangen?

Ein Thema von NicoleWagner · begonnen am 9. Jul 2020 · letzter Beitrag vom 9. Jul 2020
 
NicoleWagner

Registriert seit: 6. Jul 2010
167 Beiträge
 
Delphi XE3 Professional
 
#1

TDateTimePicker - wie Einfabefehler abfangen?

  Alt 9. Jul 2020, 11:37
ich suche einen Weg, gegen diese Fehleingabe vorzugehen.

Gegeben ist diese Zuweisung:

datum:=DatePlannerPicker1.Date;

wobei
datum => TDateTime;
DatePlannerPicker1 => TPlannerDatePicker; => Typ ist sehr ähnlich einem TDatePicker, dessen modus auf Datum gesetzt wurde

Funktioniert alles wunderbar, wenn ein Datum im DatePicker gewählt wird oder ein korrektes Datum eingegeben.
Schwierig wird es allerdings, wenn manuell ein ungültiges Datum eingegeben wird.
Also z.B. der '99.7.2020'
und der User ok (auf den Button 'verarbeiten') klickt.

Delphi gibt hier eine Fehlermeldung aus, - doch mein Code läuft danach weiter und verarbeitet den 99. Juli.

Wie komme ich an diese Fehlerprüfung ran?
Die klassische Datumsprüfung isValidDate benötigt word-Vars.
Meinen Typ TDateTime in 3 word-Vars zu verwandeln zum Prüfen, - das ist doch zu hässlich.

try-Except
wiederum greift nicht, weil Delphi den Fehler abfängt.
D.h. das Programm kommt nicht in den except Block, sondern läuft fröhlich weiter, wenn der 99. Juli lang ist.

Was ich will, ist das:

If 'fehlerhaftes Datum' then begin
ShowMessage('Datum im DatePicker fehlerhaft');
exit;
end;

Danke für Arbeitstipps!
  Mit Zitat antworten Zitat
 


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 06:38 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 by Thomas Breitkreuz