diff --git a/wst/trunk/imp_utils.pas b/wst/trunk/imp_utils.pas index 457178ddb..996c863eb 100644 --- a/wst/trunk/imp_utils.pas +++ b/wst/trunk/imp_utils.pas @@ -260,6 +260,7 @@ begin Try lst.QuoteChar := #0; lst.Delimiter := PROP_LIST_DELIMITER; + lst.StrictDelimiter := True; lst.DelimitedText := APropsStr; for i := 0 to Pred(lst.Count) do SetProperty(lst.Names[i],lst.Values[lst.Names[i]]);