paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-06 23:38:02 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix compilation of LazHelpHtml for WinCE. Issue #36558.

Browse Source 
git-svn-id: trunk@62542 -
This commit is contained in:
wp 2020-01-13 11:46:47 +00:00
parent e7390143f5
commit 259891cf6d
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/lazhelphtml.pas
View File

@ -18,7 +18,7 @@ unit LazHelpHTML;
interface
uses
{$IFDEF Windows}Windows, ShellApi,{$ENDIF}
{$IFDEF MSWindows}Windows, ShellApi,{$ENDIF} // needed for ShellExecute, not good for WinCE, issue #36558
Classes, SysUtils,
// LazUtils
LazFileUtils, UTF8Process, LazUTF8, LazConfigStorage,
@ -383,7 +383,7 @@ begin
{$ENDIF}
// run
{$IFDEF Windows}
{$IFDEF MSWindows} // not good for WinCE! Issue #36558.
// Special handling for Microsoft Edge in Win10, issue #35659
if IsShellStr then begin
if ShellExecute(0,'open',PChar(Executable),PChar(ParamsStr),'',SW_SHOWNORMAL)<=32 then