fixes for windows version

This commit is contained in:
Basile Burg 2018-10-21 18:12:51 +02:00
parent 5755432b17
commit ac056af541
5 changed files with 3 additions and 2 deletions

Binary file not shown.

Before

Width:  |  Height:  |  Size: 134 KiB

After

Width:  |  Height:  |  Size: 134 KiB

BIN
logo/dexed.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 32 KiB

Binary file not shown.

View File

@ -383,6 +383,7 @@ void postInstall()
IPersistFile linkFile;
CoCreateInstance(&CLSID_ShellLink, null, CLSCTX_INPROC_SERVER,
&IID_IShellLinkA, cast(void**)&shellLink);
shellLink.SetIconLocation(buildNormalizedPath(datPath, "dexed.ico").toStringz, 0);
shellLink.SetPath(target.ptr);
shellLink.SetWorkingDirectory(wdir.ptr);
shellLink.QueryInterface(&IID_IPersistFile, cast(void**)&linkFile);

View File

@ -10,12 +10,12 @@ uses
{$IFDEF WINDOWS}
Windows, JwaTlHelp32, registry,
{$ELSE}
ExtCtrls, FileUtil,
ExtCtrls,
{$ENDIF}
{$IFNDEF CEBUILD}
forms, ComCtrls,
{$ENDIF}
LazFileUtils, process, asyncprocess, ghashmap, ghashset, LCLIntf, strutils,
LazFileUtils, FileUtil, process, asyncprocess, ghashmap, ghashset, LCLIntf, strutils,
fpjson, graphics;
const