| [Overview][Constants][Types][Classes][Procedures and functions][Variables] |
Record describing an element in an array of const
Source position: objpash.inc line 276
type TVarRec = record |
case VType: PtrInt of |
vtInteger: ( |
VInteger: LongInt; |
); |
vtBoolean: ( |
VBoolean: Boolean; |
); |
vtChar: ( |
VChar: Char; |
); |
vtWideChar: ( |
VWideChar: WideChar; |
); |
vtExtended: ( |
VExtended: PExtended; |
); |
vtString: ( |
VString: PShortString; |
); |
vtPointer: ( |
VPointer: Pointer; |
); |
vtPChar: ( |
VPChar: PChar; |
); |
vtObject: ( |
VObject: TObject; |
); |
vtClass: ( |
VClass: TClass; |
); |
vtPWideChar: ( |
VPWideChar: PWideChar; |
); |
vtAnsiString: ( |
VAnsiString: Pointer; |
); |
vtCurrency: ( |
VCurrency: PCurrency; |
); |
vtVariant: ( |
VVariant: PVariant; |
); |
vtInterface: ( |
VInterface: Pointer; |
); |
vtWideString: ( |
VWideString: Pointer; |
); |
vtInt64: ( |
VInt64: PInt64; |
); |
vtQWord: ( |
VQWord: PQWord; |
); |
end; |
TVarRec is a record generated by the compiler for each element in a array of const call. The procedure that receives the constant array receives an array of TVarRec elements, with lower bound zero and high bound equal to the number of elements in the array minus one (as returned by High(Args))