Question regarding ToolHelp32

[440bx]

Hello,

While porting Delphi v2.0 code, FPC complains that TLHelp32 is not found.

To be certain, I searched the libraries included with Lazarus and only found TLHelp32 for WinCE.  I also found a TLHelp32 translation from the Jedi group but, the unit name is different (prefixed jwa.)

I just wanted to make sure that there is no TLHelp32 unit for desktop Windows that I may have missed.  Is this really the case ?

Thank you for your help.

[lucamar]

I just wanted to make sure that there is no TLHelp32 unit for desktop Windows that I may have missed.  Is this really the case ?

Yes, there are no others than the WinCE and the JEDI ones:

Code: Bash  [Select][+][-]

1. lucamar@selene:~/SoftDev/z/FPC source/3.0.4$ fgrep -iRl "CreateToolhelp32" *
2. packages/winunits-jedi/src/jwatlhelp32.pas
3. packages/winceunits/src/tlhelp32.pas

[440bx]

Yes, there are no others than the WinCE and the JEDI ones:

Code: Bash  [Select][+][-]

1. lucamar@selene:~/SoftDev/z/FPC source/3.0.4$ fgrep -iRl "CreateToolhelp32" *
2. packages/winunits-jedi/src/jwatlhelp32.pas
3. packages/winceunits/src/tlhelp32.pas

Thank you Lucamar.  I suspected that but, I wanted confirmation I had not missed it.

[PascalDragon]

Just using the Jedi unit should be enough. It's only an API import anyway (though there could be differences with pointer parameters (regarding var vs. no var), don't know what the Delphi unit used there in comparison to the Jedi one).

[440bx]

Just using the Jedi unit should be enough. It's only an API import anyway (though there could be differences with pointer parameters (regarding var vs. no var), don't know what the Delphi unit used there in comparison to the Jedi one).

Yes, the Jedi unit would do fine.  My goal is to make Delphi 2 code compile with FPC in both 32bit and 64bit code with a _minimum_ of changes in the code.  Since Delphi has a TLHelp32 unit, I simply made a new TLHelp32 that works in 32bit, 64bit, Delphi and FPC.