GetInt64Prop¶

return value of an Int64 property.

Declaration¶

Source position: typinfo.pp line 1288

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
SetInt64Prop	Set value of a Int64 property.
GetOrdProp	Get the value of an ordinal property.
GetStrProp	Return the value of a string property.
GetFloatProp	Return value of floating point property.
GetMethodProp	Return value of a method property.
GetSetProp	Return the value of a set property.
GetObjectProp	Return value of an object-type property.
GetEnumProp	Return the value of an enumeration type 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.