Delphi/pascalscript
Delphi/pascalscript
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Register varUString.

Browse Source 
git-svn-id: http://code.remobjects.com/svn/pascalscript@160 5c9d2617-0215-0410-a2ee-e80e04d1c6d8
This commit is contained in:
mlaan 2009-08-04 11:17:07 +00:00
parent cc98bb2326
commit b43ddc6a57
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Source/uPSCompiler.pas
View File

@ -12786,6 +12786,9 @@ begin
AddConstantN('varTypeMask', 'Word').Value.tu16 := vartypemask;
AddConstantN('varArray', 'Word').Value.tu16 := vararray;
AddConstantN('varByRef', 'Word').Value.tu16 := varByRef;
{$IFDEF UNICODE}
AddConstantN('varUString', 'Word').Value.tu16 := varUString;
{$ENDIF}
AddDelphiFunction('function Unassigned: Variant;');
AddDelphiFunction('function VarIsEmpty(const V: Variant): Boolean;');
AddDelphiFunction('function Null: Variant;');