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;