On 12.06.2012 18:27, Tomas Hajny wrote:
On Tue, June 12, 2012 18:04, Sven Barth wrote:
Am 12.06.2012 15:20 schrieb "kyan"<alfasud...@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. :-(

That can be corrected as well when support for Windows CE is added :D

Regards,
Sven

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to