Einzelnen Beitrag anzeigen

Benutzerbild von Mokus
Mokus

Registriert seit: 24. Sep 2013
165 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#7

AW: TValue casten, kann es das von alleine ?

  Alt 2. Okt 2017, 10:22
Update: nicht schön aber geht.


Delphi-Quellcode:
    
// do Something
  for OBJ in list.Values do
      begin
        if OBJ.GetPropValue(name, SetValue) then
          Break;
      end;

      if TcxEditorRow(value).Properties.EditProperties is TcxDateEditProperties then
        TcxEditorRow(value).Properties.value := TDateTime(SetValue.AsVariant)
      else
        TcxEditorRow(value).Properties.value := SetValue.AsVariant;

      SetValue := TValue.From(null);
    end;
  finally
    FVerticalGrid.EndUpdate;
  end;
end;
Markus
es gibt nur 10 arten von menschen !
die die binär verstehen und die die nicht. !
  Mit Zitat antworten Zitat