FileForums

FileForums (https://fileforums.com/index.php)
-   Conversion Tutorials (https://fileforums.com/forumdisplay.php?f=55)
-   -   Useful Dll for Inno Setup users (https://fileforums.com/showthread.php?t=95775)

peterf1999 27-12-2015 05:47

1 Attachment(s)
Added the following procedure to dll:
  • RotateImg

Razor12911 31-12-2015 05:02

I wouldn't be surprised if you start adding animations. Great job mate.

peterf1999 08-01-2016 02:17

1 Attachment(s)
Added the following procedure/function to dll:
  • CreatePie
  • UpdatePie
  • CreateArc
  • UpdateArc
Changes:
  • Renamed 'DrawImages' procedure to 'DrawToDC'

rinaldo 08-01-2016 17:09

too thirsty for CPU this library :eek: :eek: :eek: :eek: :eek:

peterf1999 14-01-2016 00:00

1 Attachment(s)
Added the following function to dll:
  • CreateBtn
Code:

const
  LButtonUp = 1;
  LButtonDown = 2;
  MouseOver = 4;
  MouseOut = 8;

type
TBtnEvent= procedure(BtnIdx,EventID: integer);

function CreateBtn(const FileName: PAnsiChar; Handle: HWND; X,Y,Height,Width: integer; callback: TBtnEvent): integer;


peterf1999 16-01-2016 06:37

Added the following procedures/functions to dll:

Code:

procedure SetBtnEnabled(BtnIdx: integer; Enabled: Boolean); external 'SetBtnEnabled@files:Isab.dll stdcall delayload';

function GetBtnEnabled(BtnIdx: integer): Boolean; external 'GetBtnEnabled@files:Isab.dll stdcall delayload';

procedure SetBtnVisibility(BtnIdx: integer; Visibility: Boolean); external 'SetBtnVisibility@files:Isab.dll stdcall delayload';

function GetBtnVisibility(BtnIdx: integer): Boolean; external 'GetBtnVisibility@files:Isab.dll stdcall delayload';

procedure SetBtnTransparency(BtnIdx: Integer; BtnTransparency: Byte); external 'SetBtnTransparency@files:Isab.dll stdcall delayload';

function GetBtnTransparency(BtnIdx: Integer): byte; external 'GetBtnTransparency@files:Isab.dll stdcall delayload';


peterf1999 21-01-2016 09:49

1 Attachment(s)
Added the following procedure/function to dll:

Code:

procedure SetBtnCur(BtnIdx: integer; const FileName: PAnsiChar; CurHandle: DWord; const IFT_Cur: integer); external 'SetBtnCur@files:Isab.dll stdcall delayload';
function GetSysCur(const IDC: integer): DWord; external 'GetSysCur@files:Isab.dll stdcall delayload';


Cesar82 22-01-2016 17:37

Thank you for library isab.dll.

It would be interesting if you could add multimedia playback
based on DirectShow.
Addicionar functions as in InnoMediaPlayer and ISMediaLib (By altef_4) in your Isab.dll library.

peterf1999 31-01-2016 08:58

Changes: v0.0.8.6

Fixed an issue with WM_LBUTTONDOWN and WM_LBUTTONUP message handler.
Now the buttons work properly.

peterf1999 06-02-2016 04:39

Changes v0.0.8.7:
Fixed an issue with visibility (SetImgVisibility) of invalidated client area of rotated images.

peterf1999 12-02-2016 11:43

Changes:
  • Renamed 'CheckFileSHA1' function to 'CheckFileHash'.
  • function prototype changes.
  • Added support for MD5, SHA256(SHA-2) hash algorithms.
Code:

const
  DCP_MD5 = 1;
  DCP_SHA1 = 2;
  DCP_SHA256 = 4; // SHA-2

Type
THashProgress = function(OverallProgress,FileProgress: Integer): Boolean;

function CheckFileHash(const Filename,HashHex: PAnsichar; PctOfTotal: integer; callback: THashProgress; DCP_Hash: integer): integer; external 'CheckFileHash@files:Isab.dll stdcall delayload';

Function return codes:

0: All OK.
-1: Hash check aborted.
-2: File hash does not match.
-3: Source File not found.
-4: Bad flag argument.

peterf1999 02-03-2016 05:48

1 Attachment(s)
Changes: v0.0.9.0:

Added the following procedure/function to dll:
Code:

procedure SetBtnPosSize(BtnIdx,X,Y,Height,Width: integer); external 'SetBtnPosSize@files:Isab.dll stdcall delayload';
procedure GetBtnPosSize(BtnIdx: integer; var X,Y,Height,Width: integer); external 'GetBtnPosSize@files:Isab.dll stdcall delayload';
procedure SetBtnCaption(BtnIdx,CaptionLeftOffset,CaptionTopOffset: integer; const Caption, FontName: Pansichar; Size: integer; const FontStyle: integer; AntiAlias,Shadow: boolean); external 'SetBtnCaption@files:Isab.dll stdcall delayload';
function GetBtnCaption(BtnIdx: integer): PAnsichar; external 'GetBtnCaption@files:Isab.dll stdcall delayload';
procedure SetBtnCaptionColor(BtnIdx:integer; DefaultCaptionARGB, HoverCaptionARGB, LBtnDownCaptionARGB, DisabledCaptionARGB,ShadowCaptionARGB :Cardinal); external 'SetBtnCaptionColor@files:Isab.dll stdcall delayload';


peterf1999 12-03-2016 08:01

Added the following function to dll:

Code:

function GetDirectXVersion: Pansichar; external 'GetDirectXVersion@files:Isab.dll stdcall delayload';

peterf1999 14-03-2016 11:32

3 Attachment(s)
Changes v.0.0.9.2:
  • GetDirectXVersion function prototype changes.
Code:

const
  Dx_Gpu = 1; // DirectX supported by GPU
  Dx_Sys = 2; // DirectX installed on system

function GetDirectXVersion(const F_Dx: integer): Pansichar; external 'GetDirectXVersion@files:Isab.dll stdcall delayload';

Windows 7 Ultimate x64:

Attachment 13955

Windows 10 Pro x64:

Attachment 13956

BAMsE 23-03-2016 12:42

I can't create more than one timer with CreateTimer function. Only last defined TTimerProc is executed with the smallest Timeout defined:
Code:

ButtonCB := CreateTimer(10, @ButtonAction;
EqualizerCB := CreateTimer(100, @EqualizerAction);

In this case only EqualizerAction is executed with 10ms interval


All times are GMT -7. The time now is 19:50.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions Inc.
FileForums @ https://fileforums.com