Eigenschaften einer Komponente zur Laufzeit verändern

[mase1908]

Hallo,

ich bastel momentan an einem ObjektInspektor, mit dem zur Laufzeit die Eigenschaften einer Komponente verändern werden sollen.

Folgende Ausgangssituation:

Ich habe den Komponentennamen, die Klasse und die Eigenschaft in einem String vorliegen.
Nun möchte ich es so casten, dass ich einen Wert der Komponenten-Eigenschaft zuweisen kann.
Wie könnte ich sowas realisieren?

Im folgenden Code mal ein Beispiel wie ich es gerne hätte:

Delphi-Quellcode:

procedure EditProperty;

const vProperty  : string = 'Left';
const vValue     : string = '30';
const vType      : string = 'Integer';
const vClassName : string = 'TEdit';
const vComponentName: string = 'Edit1';

var
   vComponent: TComponent;

begin
     if vType = 'Integer' then
     begin
          vComponent := Self.FindComponent(vComponentName);
          vClassName(vComponent).vProperty := vValue; // Pseudo
     end;
end;

Wäre super wenn mir jemand helfen könnte.