Adds string to the pick list of the TCustomPropertyEdit

procedure GetStr(const S: string);