Komponenten ansprechen - mit ini konfigurieren

**matashen**

Hallo zusammen,

ich muss momentan ein paar Komponenten bei einer Anwendung frei konfigurierbar machen.
Hab das einfach mal mit Inifiles gemacht, klappt auch.
Momentan mach ich das aber mit Findcomponent, was zwar in der jetzigen Form läuft, aber mir nicht sonderlich gut gefällt.
Evtl hat ja da einer ne Idee dazu. Mit Inifiles steuerbar solls bleiben.

Hier mal wies bei mir im Inifile aussieht

markieren

Code:

			[objects]

count=73

0=dot

1=irgendwas

...

[dot]

type = button

hint='Punkt zeichnen | Zum frei Hand Zeichnen mit Hilfe  der Strichbreite, auch möglich nur einzelne Punkte zu zeichnen'

left = 10

top = 10

... usw

So ausgewertet wird das so

markieren

Delphi-Quellcode:

			    objects_count:=inimain.ReadInteger('objects','count',0);

    if objects_count<>0 then

      for i := 0 to objects_count-1 do begin;

          objects_name:=inimain.ReadString('objects',inttostr(i),'');

          object_type:=inimain.ReadString(objects_name,'type','');

          object_type:=lowercase(object_type);

          if object_type='button' then begin;

                TButton(Findcomponent(objects_name)).hint:=inimain.Readstring(objects_name,'hint',TButton(Findcomponent(objects_name)).Hint);

Und genau da stört mich das ich den Componentyp angeben muss.
Meine Traumlösung wär hier einfach

objectsname.x:=inimain.Readinteger.....

geht sowas, gibts da Lösungsansätze?

Gruß Matthias

Komponenten ansprechen - mit ini konfigurieren

Komponenten ansprechen - mit ini konfigurieren

Forumregeln