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
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
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