Forum: Object-Pascal / Delphi-Language
by Stevie,
6. Sep 2011
Auf Variant sollte man imo an dieser Stelle verzichten und mit TValue und/oder generics (unter Zuhilfenahme von type inference) arbeiten.
Beispiel:
procedure TLinq<T>.SetProperty<TValueType>(Item: Pointer; const PropertyName: string; Value: TValueType);
var
v: TValue;
begin
v := TValue.From<TValueType>(Value);
...
Forum: Object-Pascal / Delphi-Language
by Stevie,
6. Sep 2011
Ich glaub du hast einen Bug in deinem Source. Denn du checkst den FieldType bevor du GetField machst?
In einem Beispiel funktioniert das wie erwartet:
type
TMyRecord = record
Value: Integer;
end;
procedure TForm1.FormCreate(Sender: TObject);
var