Files
lazarus-ccr/wst/trunk/wst_delphi.inc
inoussa d2abf9846b +Delphi : QWord = UInt64 for CompilerVersion > 16.0
+THeaderBlockProxy :
  This class is used as a wrapper to allow a TBaseRemotable instance to be sent and received as a header block
+ICallContext.AddHeader() : 
  Overload to support classes that do not inherit from THeaderBlock
+TTypeRegistryItem.AddExternalSynonym(), TTypeRegistryItem.IsExternalSynonym()
  Usefull when a xsd defines a complex type and a "element" which type is the complex one.
+TTypeRegistry.FindByDeclaredName():
  Add an option to include the external synonyms in the search

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@744 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2009-03-18 15:53:10 +00:00

20 lines
426 B
PHP

{$IFDEF DELPHI}
type
{$IFDEF CompilerVersion}
{$IF ( CompilerVersion > 16.0 )}
QWord = UInt64;
{$IFEND}
{$ENDIF CompilerVersion}
{$IF Not Declared(QWord) }
QWord = type Int64;
{$IFEND
}
DWORD = LongWord;
PtrInt = Integer;
PByteArray = ^ByteArray;
ByteArray = array[0..$effffff] of Byte;
PtrUInt = Cardinal;
SizeInt = Longint;
UnicodeChar = WideChar;
{$ENDIF DELPHI}