254b27740e
git-svn-id: https://svn.code.sf.net/p/kolmck/code@17 91bb2d04-0c0c-4d2d-88a5-bbb6f4c1fa07
19 lines
403 B
Plaintext
19 lines
403 B
Plaintext
unit syswstr;
|
|
{X: this unit contains some definitions and initializations, needed to
|
|
support wide string variables. To use it, just place reference to syswstr
|
|
unit in your dpr/units uses clause *as first as possible* }
|
|
|
|
interface
|
|
|
|
implementation
|
|
|
|
initialization
|
|
|
|
WStrAddRefProc := WStrAddRef;
|
|
WStrClrProc := WStrClr;
|
|
WStrArrayClrProc := WStrArrayClr;
|
|
|
|
finalization
|
|
|
|
end.
|