Autor |
Beitrag |
jackie05
      
Beiträge: 357
|
Verfasst: Di 11.05.10 22:33
Hallo,
ich brauche für Delphi eine Altersprüfung für mein Programm.
Es gab da mal eine fertige unit, die ich in meinem Programm einbinden konnte, leider finde ich sie nicht mehr.
Kann mir da Vielleicht jemand Helfen?
Ich bedanke mich schonmal im Voraus.
MfG Moderiert von Narses: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Mi 12.05.2010 um 00:25
|
|
jaenicke
      
Beiträge: 19312
Erhaltene Danke: 1747
W11 x64 (Chrome, Edge)
Delphi 11 Pro, Oxygene, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
|
Verfasst: Di 11.05.10 22:50
Nach dem D folgen in dem zweiten Teil der Ausweisnummer Jahr, Monat und Tag jeweils zweistellig, die 7. Ziffer ist nur eine Prüfziffer.
Dementsprechend kannst du das leicht selbst auslesen. 
|
|
elundril
      
Beiträge: 3747
Erhaltene Danke: 123
Windows Vista, Ubuntu
Delphi 7 PE "Codename: Aurora", Eclipse Ganymede
|
Verfasst: Di 11.05.10 22:55
Nur halt etwas "schwachsinnig", denn ich könnt mir ja irgendeine Nummer generieren die diese Bedingungen erfüllt oder die Perso-Nummer von nem Freund eingeben.
lg elundril
_________________ This Signature-Space is intentionally left blank.
Bei Beschwerden, bitte den Beschwerdebutton (gekennzeichnet mit PN) verwenden.
|
|
jaenicke
      
Beiträge: 19312
Erhaltene Danke: 1747
W11 x64 (Chrome, Edge)
Delphi 11 Pro, Oxygene, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
|
Verfasst: Di 11.05.10 23:00
Es ist aber die einzige einfache Möglichkeit das Alter zu prüfen.
Dass man das relativ leicht umgehen kann, kann man eben nicht ändern. Zumindest muss man herausfinden wie man das umgehen kann. 
|
|
Webo
      
Beiträge: 577
Erhaltene Danke: 14
Win 7, Debian
C# (Visual Studio 2013), PHP, C, C++ (Eclipse, KDevelop)
|
Verfasst: Di 11.05.10 23:26
elundril hat folgendes geschrieben : | Nur halt etwas "schwachsinnig", denn ich könnt mir ja irgendeine Nummer generieren die diese Bedingungen erfüllt oder die Perso-Nummer von nem Freund eingeben. |
Kontrollen und Barrieren sind nunmal dazu gemacht um umgangen zu werden ...
Irgendwie wird es immer möglich sein einen Alterscheck geschickt zu umgehen, anhand dieser Nummer wäre es aber durchaus eine gute Möglichkeit. Zumal die Zusammensetzung ja auch nicht jeder kennt und so eine Abfrage des Personalausweises auch eine abschreckende Wirkung zeigt bei Personen, die das Kriterium eben noch nicht erfüllt haben 
_________________ Man kann nur das aus dem Ärmel schütteln, was man auch vorher reingesteckt hat.
|
|
BenBE
      
Beiträge: 8721
Erhaltene Danke: 191
Win95, Win98SE, Win2K, WinXP
D1S, D3S, D4S, D5E, D6E, D7E, D9PE, D10E, D12P, DXEP, L0.9\FPC2.0
|
Verfasst: Di 11.05.10 23:31
Kleiner Geheimtipp von nem CAcert-Assurer:
www.consilium.europa...DE/2602/docHome.html
Dort gibt's auch nen Link, um die Ausweisnummern zu prüfen mit weiteren Informationen dazu. Damit hat man alle europischen Dokumente erstmal abgedeckt  Den Rest findet man bei CAcert im Wiki 
_________________ Anyone who is capable of being elected president should on no account be allowed to do the job.
Ich code EdgeMonkey - In dubio pro Setting.
|
|
ALF
      
Beiträge: 1085
Erhaltene Danke: 53
WinXP, Win7, Win10
Delphi 7 Enterprise, XE
|
Verfasst: Mi 12.05.10 00:09
Webo hat folgendes geschrieben : | ...anhand dieser Nummer wäre es aber durchaus eine gute Möglichkeit. Zumal die Zusammensetzung ja auch nicht jeder kennt und so eine Abfrage des Personalausweises auch eine abschreckende Wirkung zeigt bei Personen, die das Kriterium eben noch nicht erfüllt haben  |
Steht aber alles hier de.wikipedia.org/wik...usweis_(Deutschland)
Gruss Alf
_________________ Wenn jeder alles kann oder wüsste und keiner hätt' ne Frage mehr, omg, währe dieses Forum leer!
|
|
delphi10
      
Beiträge: 447
Erhaltene Danke: 2
W2K, XP, Vista64, Win7 64
RAD-Studio 2010
|
Verfasst: Mi 12.05.10 00:11
Nur mal so btw:
"Versand oder Verfügbar machen pornografischer oder anderer jugendgefährdender Artikel ist in Deutschland nach § 184 das Strafgesetzbuchs verboten." Auch mit Altersnachweis vom Perso.
Mein ja nur (duck und wech)
_________________ Salus populi suprema lex esto
|
|
|