title: Set property value with TypInfo routine
body: <p>Assign dataset field values to properties performed by the following method :</p>
  
  <pre><code>var
    lvRuntimeContext: TRttiContext;
    lvRuntimeType: TRttiType;
    lvProp: TRttiProperty;
    lvAttr: TCustomAttribute;
    lvCol: EntityColumnAttrib;
  begin
  
    if DataAccess.DataSet.Active then
    begin
      lvRuntimeContext := TRttiContext.Create;
  
      try
        lvRuntimeType := lvRuntimeContext.GetType(EntityColumnClassType);
  
        for lvProp in lvRuntimeType.GetProperties do
          for lvAttr in lvProp.GetAttributes do
            if lvAttr is EntityColumnAttrib then
            begin
              lvCol := (lvAttr as EntityColumnAttrib);
  
              if lvCol.InCurrentTable then
                case lvCol.FieldType of
                  ftBytes: begin
  
                  end;
  
                  ftDateTime: lvProp.SetValue(ASystemColumns, TValue.From&lt;TDateTime&gt;(DataAccess.DataSet.FieldByName(lvCol.FieldName).AsDateTime));
                else
                  lvProp.SetValue(ASystemColumns, TValue.From&lt;Variant&gt;(DataAccess.DataSet.FieldByName(lvCol.FieldName).AsVariant));
                end;
  
            end;
      finally
        lvRuntimeContext.Free;
      end;
    end;
  </code></pre>
  
  <p>In one of my classes there is a property of type <strong>TMemoryStream</strong> and I want to assign value from DataSet field(SQL Server: <strong>binary</strong> type) to it, How can I do this with this method?</p>