Einzelnen Beitrag anzeigen

matashen

Registriert seit: 29. Jan 2007
Ort: daheim
460 Beiträge
 
Delphi XE2 Enterprise
 
#1

Property Readonly setzen - gespeicherte Werte

  Alt 3. Apr 2017, 13:04
Delphi-Version: XE2
Hallo zusammen,

hab grad zu nem Problem keine Idee und kein Glück beim googlen.

Ich lege Einstellungen zu verschiedenen Componenten in einer Datei ab. Je nach Benutezrfreigabe sollen verschiedene Bereiche der Anwendung frei gegeben sein.
Dabei soll ich die Werte Enabled, visible und Readonly setzen.
Genau bei letzterem hab ich das Problem das ich dieses nicht so einfach setzen kann.
Bei zum Beispiel Visible mach ich folgendes

TControl(application.FindComponent(myform).FindComponent(myobject)).visible:=visiblestatus;
Das gleiche geht auch mit enabled, nur bei Readonly hab ich keine Idee wie ich das machen kann.
setprobvalue kennt ja leider auch kein boolean, sonst häts ich mal so versucht

setpropvalue(application.FindComponent(myform).FindComponent(myobject)),'Readonly',Readonlystatus);
Wär cool wenns da nen einfachen einzeiler gäbe ...
Matthias
Das Leben ist eines der härtesten.
  Mit Zitat antworten Zitat