[Lazarus] Unicode branch

[Michael Van Canneyt]

On Mon, 10 Jun 2013, Paul Ishenin wrote:

> 08.06.2013 21:53, Marco van de Voort пишет:
>
>> graphic.inc(155,66) Error: Incompatible type for arg no. 3: Got "PChar",
>> expected "PWideChar"
>
> Stream := TResourceStream.CreateFromID(Instance, ResID, ResType);
>
> ResType is of type TResourceType which is declared in lcltype.pp as
>
>   {$ifdef UNICODE}
>   TResourceType = PWideChar;
>   {$else}
>   TResourceType = PChar;
>   {$endif}

Where is UNICODE defined ?

Because the RTL is compiled with the FPC_UNICODE_RTL define.

Michael.