Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Zustand einer boolschen Poperty abfragen


jjturbo - Di 18.12.07 14:43
Titel: Zustand einer boolschen Poperty abfragen
Moin Forum,

mit "GetStrProp" und "SetStrProp" kann ich auf Propertys einer sichtbaren Komponente wie z.B. "Caption" zugreifen.

Aber wie bekomme ich den Zusatnd einer boolschen Property abgefragt? Gibt es irgendwie so etwas wie GetBoolProp?

Danke im voraus, jjturbo


Kroko - Di 18.12.07 14:49

???

Delphi-Quelltext
1:
property Zustand: Boolean read GetZustand write SetZustand;                    
:?:


hazard999 - Di 18.12.07 14:52

Hallo,

probiers mal mit GetOrdVal.

Boolean ist ein Ordinal-Typ

r u

René


jjturbo - Di 18.12.07 14:55

Ich möchte verschiedene propertys Abfragen, welche entscheidet sich erst während des Programmablaufs.
Ich habe aber eine Lösung gefunden:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
function GetBoolProperty(myPropertyName:String;Compo:TComponent):Variant;
var  p: PPropInfo;
begin
  p := GetPropInfo(Compo.ClassInfo, myPropertyName);
  if (p <> niland (p^.setProc <> nilthen begin
    Result := GetVariantProp(Compo, myPropertyName);
  end;
end;

procedure MeineProcedure(Sender: TObject);
bein
    if VarIsNull(GetBoolProperty(PropName,(Sender as TIrgendwas))
     then showmessage('ok')
     else showmessage('not ok');
end;