Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#18

AW: DelphiProjekt - Erstellen eines Adressbuches

  Alt 28. Apr 2011, 10:16
Deutschland ist nicht der Nabel der Welt. Will sagen, es gibt auch Postleitzahlen, die Buchstaben enthalten, zum Beispiel in England:
Delphi-Quellcode:
procedure TAdresse.SetPLZ(const Value: TString5);
var
  dummy: integer;
begin
  if (Value = '') or TryStrToInt(Value, dummy) then
    FPLZ := Value
  else
    raise Exception.CreateFmt('"%s" ist keine gültige Postleitzahl.', [Value]);
end;
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat