Hallo zusammen,

die Funktion StrToDate wandelt ja Benutzereingaben in ein DateTime Objekt um.
In unserer Software wird eine Benutzereingabe eines Geburtsdatums umgewandelt durch



Tut soweit auch wenn jemand z.B. 1.7.70 eingibt.
Dies wird dann umgewandelt in 01.07.1970.

Gibt der Kunde allerdingg 1.7.50 ein, wird das Datum in 01.07.2050 gewandelt.
Das Problem ist, dass dies für ein Geburtsdatum natürlich kein Sinn macht und eigentlich als Jahr 1950 rauskommen hätte müssen. Gerade bei Geburtsdaten.
Hat jemand eine Idee, was man da tun könnte?
Man könnte dies natürlich manuell überwachen aber vielleicht gibts ja irgendwas, was die StrToDate steuert.

Gruß
Jürgen

ich hab zwar keine direkte lösung aber wie wäre es wenn du ein Mask-Edit verwenden würdest und damit den User "zwingst" die Eingabe vollständig auszufüllen??

lg elundril

This Signature-Space is intentionally left blank.
Bei Beschwerden, bitte den Beschwerdebutton (gekennzeichnet mit PN) verwenden.

Oder noch besser: Du bietest ihm 3. Dropdown-Listen an und er kann es damit auswählen.

GTA-Place hat folgendes geschrieben :

Oder noch besser: Du bietest ihm 3. Dropdown-Listen an und er kann es damit auswählen.

Das ist die Frage ob das besser ist. Mich nervt sowas eher.

GTA-Place hat folgendes geschrieben :

Oder noch besser: Du bietest ihm 3. Dropdown-Listen an und er kann es damit auswählen.

Das ist für einen User nicht gerade Benutzefreundlich - sorry!
Auch die vorgeschlagene Lösung mit Mask Edit würde zwar gehen, aber auch das finde ich nicht soo der Brüller.
Der Kunde muss ruck zuck die Daten eingeben und er mostert jetzt schon, dass er das 19xx mit eingeben muss.

Moin!

Das das Problem nun mal nicht eindeutig lösbar ist, wirst du dich für eine ähnlich geartete Lösung entscheiden müssen. Kompromisse wären:

• Den Splitpoint dynamisch auf 5 Jahr in die Zukunft legen -> 2009..2013,1914...
  
• Wenn das Datum um einen bestimmten Betrag vom aktuellen Jahr abweicht, Fragen, geschickt den Default-Button dazu auswählen
  
• 4-stellige Eingabe erzwingen

cu
Narses

naja, ein geburtsdatum kann ja nicht in der Zukunft liegen, also wenn es in der Zukunft liegt, einfach 100 abziehen.

jf_stgt hat folgendes geschrieben :

Der Kunde muss ruck zuck die Daten eingeben und er mostert jetzt schon, dass er das 19xx mit eingeben muss.

Dir ist aber schon bewusst, dass man das Auswählen der Combobox genau wie das Eintippen in ein Feld mit der Tastaur erledigen kann? Einmal 12 tippen wählt im ersten Feld auch 12 aus

Hallo!

Danke für eure rege Diskussion und Vorschläge.

GTA-Place hat folgendes geschrieben :

jf_stgt hat folgendes geschrieben : Der Kunde muss ruck zuck die Daten eingeben und er mostert jetzt schon, dass er das 19xx mit eingeben muss. Dir ist aber schon bewusst, dass man das Auswählen der Combobox genau wie das Eintippen in ein Feld mit der Tastaur erledigen kann? Einmal 12 tippen wählt im ersten Feld auch 12 aus

Wenn ich das Datum direkt eintippe, komme ich mit wenigen Klicks aus. Wenn man z.B. das Jahr über ein Dropdown Feld auswählt, dauert es ewig über Maus oder Tastatur.

Boldar hat folgendes geschrieben :

naja, ein geburtsdatum kann ja nicht in der Zukunft liegen, also wenn es in der Zukunft liegt, einfach 100 abziehen.

Dies gefällt mir für mich am besten. Danke.

Gruß
Jürgen

jf_stgt hat folgendes geschrieben :

Wenn ich das Datum direkt eintippe, komme ich mit wenigen Klicks aus. Wenn man z.B. das Jahr über ein Dropdown Feld auswählt, dauert es ewig über Maus oder Tastatur.

Versteh ich jetzt nicht. Vorgehen für ein fiktives Geburtsdatum (Angaben in Klammern entsprechen den Tasten der Tastatur):



Ich sehe da jetzt keinen Unterschied?!

jf_stgt hat folgendes geschrieben :

Wenn ich das Datum direkt eintippe, komme ich mit wenigen Klicks aus. Wenn man z.B. das Jahr über ein Dropdown Feld auswählt, dauert es ewig über Maus oder Tastatur. Gruß Jürgen

darf ich meinen Informatik-Lehrer zitieren? "Mäuse sind was für Katzen"

und mittels richtiger Taborder usw sind mir somanche dieser programme lieber als diese "Black boxes" um es mal übertrieben zu formulieren.

lg elundril

This Signature-Space is intentionally left blank.
Bei Beschwerden, bitte den Beschwerdebutton (gekennzeichnet mit PN) verwenden.

GTA-Place hat folgendes geschrieben :

jf_stgt hat folgendes geschrieben : Wenn ich das Datum direkt eintippe, komme ich mit wenigen Klicks aus. Wenn man z.B. das Jahr über ein Dropdown Feld auswählt, dauert es ewig über Maus oder Tastatur. Versteh ich jetzt nicht. Vorgehen für ein fiktives Geburtsdatum (Angaben in Klammern entsprechen den Tasten der Tastatur): markieren Quelltext     1: 2: Dropdown: [1] [Tab] [1] [Tab] [1] [9] [5] [0] Textfeld: [1]  [.]  [1]  [.]  [1] [9] [5] [0] Ich sehe da jetzt keinen Unterschied?!

Die Eingabe ist aber [1].[1].[5][0]
Darum gehts.

elundril hat folgendes geschrieben:

darf ich meinen Informatik-Lehrer zitieren? "Mäuse sind was für Katzen" lg elundril

Klasse Spruch!

Moderiert von Narses: Zitat repariert

Hallo,
versuch mal Folgendes:

ssb-blume hat folgendes geschrieben :

Hallo, versuch mal Folgendes: markieren Delphi-Quelltext     1: 2: 3: 4: 5: 6: 7: 8: uses DateUtils; ... var d: TDate; ...   d := StrToDate(Edit1.Text);   if YearOf(now) < YearOf(d) then d := IncYear(d, -100);   Edit1.Text := DateToStr(d); ....

Guter Code!
Danke!
Damit schließe ich mal diese Frage hier.

Gruß
Jürgen

Es geht auch mit  TwoDigitYearCenturyWindow := 50;
Windows nimmt als Bezugsjahr nämlich das aktuelle, also 2009. Und TwoDigitYearCenturyWindow setzt das Bezugsjahr um 50 Jahre zurück.