Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stahli,
28. Dez 2010
Ich habe hier eine Lösung gefunden.
tkEnumeration:
Value := TValue.FromOrdinal(PropInfo.PropertyType.Handle, GetEnumValue(PropInfo.PropertyType.Handle, PropValue));
So funktioniert es. Der Rest sollte dann zu schaffen sein. :)
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stahli,
28. Dez 2010
Ich habe noch ein Problem mit den Aufzählungstypen:
Value := TValue.Empty;
case PropInfo.PropertyType.TypeKind of
tkUnknown:
;
tkInteger:
Value := TValue.From(StrToIntDef(PropValue, 0));
tkChar:
;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stahli,
28. Dez 2010
@himitsu
Na ja, im SetProperty-Beispiel wird LVar eben nicht verwendet. Das kann ich daher nicht einordnen und nachvollziehen.
@Björn
Danke, das hat geholfen :thumb:
Mein aktuelles Test-Projekt:
// mein Attribut...
type