Einzelnen Beitrag anzeigen

BlueStarHH

Registriert seit: 28. Mär 2005
Ort: Hamburg
849 Beiträge
 
Delphi 11 Alexandria
 
#9

AW: Normalisierung von Adressen / Postalman

  Alt 20. Sep 2023, 19:45
Verbesserungsvorschlag zu

Delphi-Quellcode:
function TPostalMan.ParseAddress
 (const a: AnsiString; FieldsAndValues: TPostalManValues;
  useOptions: Boolean = False; useOriginal : Boolean = False) : Boolean;
...
     try
       FieldsAndValues.Add(Field,value);
     except
       Duplicates.Add(Field,Value);
     end;
...
ändern in:

Delphi-Quellcode:
     try
       if not FieldsAndValues.TryAdd(Field,value) then
         Duplicates.Add(Field,Value);
     except
       //Fehlerbehandlung, wenn Hauptspeicher voll oder andere Gründe...
     end;
  Mit Zitat antworten Zitat