Ich bin einen Kleinen schritt weiter !!
Delphi-Quellcode:
rocedure SetProperty2(sProperty, sValue: string);
var
LPropList: PPropList;
LPropCount, I: Integer;
begin
LPropCount := GetPropList(LBotOptions, LPropList);
try
for I := 0 to LPropCount-1 do
begin
if LPropList[I].Name = sProperty then
begin
ShowMessage(LPropList[I].Name);
Break
end;
end;
finally
FreeMem(LPropList);
end;
end;
Damit finde ich nun die richtige eigenschaft. Nun brauche ich noch den Weg wie ich die Eigenschaft schreibe???? Ich hangel mich hier von ast zu ast ... Wenn jemand dafür noch ein Weg hat wäre das super!