Komponenten merken und später zuweisen

[stahli]

Mannooo!

Jetzt bin ich fast fertig, damit und dann lässt sich eine TComponent so nicht zuweisen

Delphi-Quellcode:

procedure TExtIniFile.ReadComponentProperty(PropertyComponent: TComponent;
  PropertyName, Section, Ident: String);
var
  S: String;
  CN: String;
  CCN: String;
  P: Integer;
  RC: TComponent;
  ExistFlag: Boolean;
begin
  PropertyFlag := True;
  RC := nil;
  S := ReadString(Section, Ident, '');
  if (S <> '') and (S <> 'Component(nil)') then
  begin
    P := Pos('(', S);
    Delete(S, 1, P);
    P := Pos(')', S);
    CN := Copy(S, 1, Pred(P));
    CCN := ReadString('Component(' + CN + ')', '{ClassName}', '');
    ExistFlag := ExistComponentName(CN);
    if ExistFlag then
    begin
      RC := FoundComponent(CN);
    end
    else
    begin
      PropertyList.AddObject(CN + '=' + PropertyName, PropertyComponent);
    end;
  end;
  if (IsPublishedProp(PropertyComponent, PropertyName)) and (Assigned(RC)) then
  begin
    SetPropValue(PropertyComponent, PropertyName, RC); // ==> Es gibt keine überladene Version von 'SetPropValue', die man mit diesen Argumenten aufrufen kann
{
  TTypeKind = (tkUnknown, tkInteger, tkChar, tkEnumeration, tkFloat,
    tkString, tkSet, tkClass, tkMethod, tkWChar, tkLString, tkWString,
    tkVariant, tkArray, tkRecord, tkInterface, tkInt64, tkDynArray);
}
  end;
  PropertyFlag := False;
end;

Lässt sich einer Property eine Komponente zuweisen, wenn ich nur den Propertynamen habe???

Sonst kann ich wohl nochmal von neuem anfangen

Stahli