GetInt64Prop
return value of an Int64 property
Declaration
Source position: typinfo.pp line 947
function GetInt64Prop(Instance: TObject; PropInfo: PPropInfo) : Int64;
function GetInt64Prop(Instance: TObject; const PropName: string) : Int64;
Description
Remark
Publishing of Int64 properties is not yet supported by Free Pascal. This function is provided for Delphi compatibility only at the moment. !!!
GetInt64Prop returns the value of the property of type Int64 that is described by PropInfo or with name Propname for the object Instance.
Errors
No checking is done whether Instance is non-nil, or whether PropInfo describes a valid Int64 property of Instance. Specifying an invalid property name in PropName will result in an EPropertyError exception
See also
| Name | Description |
|---|---|
| GetEnumProp | Return the value of an enumeration type property. |
| GetFloatProp | Return value of floating point property |
| GetMethodProp | Return value of a method property |
| GetObjectProp | Return value of an object-type property. |
| GetOrdProp | Get the value of an ordinal property |
| GetSetProp | Return the value of a set property. |
| GetStrProp | Return the value of a string property. |
| SetInt64Prop | Set value of a Int64 property |
Example
program example15;
{ This program demonstrates the GetInt64Prop function }
{$mode objfpc}
uses rttiobj,typinfo;
Var
O : TMyTestObject;
PI : PPropInfo;
begin
O:=TMyTestObject.Create;
Writeln('Int64 property : ');
PI:=GetPropInfo(O,'Int64Field');
Writeln('Value : ',O.Int64Field);
Writeln('Get (name) : ',GetInt64Prop(O,'Int64Field'));
Writeln('Get (propinfo) : ',GetInt64Prop(O,PI));
SetInt64Prop(O,'Int64Field',12345);
Writeln('Set (name,12345) : ',O.Int64Field);
SetInt64Prop(O,PI,54321);
Writeln('Set (propinfo,54321) : ',O.Int64Field);
O.Free;
end.