[fpc-pascal] Unit initialization in dll initialization for arm/WinCE

Tomas Hajny XHajT03 at hajny.biz
Tue Jun 12 18:27:33 CEST 2012


On Tue, June 12, 2012 18:04, Sven Barth wrote:
> Am 12.06.2012 15:20 schrieb "kyan" <alfasud.ti at gmail.com>:
 .
 .
>> The problem is that function
>> GetModuleName() is stubbed out in WinCE (and Linux):
>>
>> unit SysUtils.inc;
>>
>> function GetModuleName(Module: HMODULE): string;
>> begin
>> {$ifdef MSWINDOWS}
>>  SetLength(Result,MAX_PATH);
>>  SetLength(Result,GetModuleFileName(Module,
> Pchar(Result),Length(Result)));
>> {$ELSE}
>>  Result:='';
>> {$ENDIF}
>> end;
>>
>> The function GetModuleFileName() exists (although it is unicode) in
>> WinCE: http://msdn.microsoft.com/en-us/library/ms908441.aspx
>>
>> And from what I've found in the web a Linux implementation is possible
>> using dladdr().
>
> If you want you can create a bug report. WinCE might likely be solved
> then,
> but I can't comment on Linux or other *nix systems.

In any case, it's wrong that the implementation is placed in the platform
independent include file instead of the respective sysutils.pp files. :-(

Tomas





More information about the fpc-pascal mailing list