Useful Dll for Inno Setup users

[rinaldo]

shortage of examples, in botva and in many others there are a dozen examples with the library, so you do so, that many of us use your library so fast .. not think peterf1999

[peterf1999]

Originally Posted by rinaldo

shortage of examples, in botva and in many others there are a dozen examples with the library, so you do so, that many of us use your library so fast .. not think peterf1999

Did you read the exhaustive docs about functions/procedures on 1st page?
For sure, the use is not easy for inno's novice users.

[rinaldo]

Originally Posted by peterf1999

Did you read the exhaustive docs about functions/procedures on 1st page?
For sure, the use is not easy for inno's novice users.

I hope that your skills are better than your common sense

[Razor12911]

Originally Posted by peterf1999

imgidx1:=loadimage(ExpandConstant('{tmp}\my.png'),WizardForm.Handle,0,0,450,750,IMF_Crop);
SetVisibleImgRgn(imgidx1,100,50,200,300);
DrawImages(WizardForm.Handle);

procedure SetVisibleImgRgn(ImgIdx,NewX,NewY,NewHeight,NewWidth: integer); 
external 'SetVisibleImgRgn@files:Isab.dll stdcall delayload';

ok, got it. should be working on something now.

Originally Posted by rinaldo

shortage of examples, in botva and in many others there are a dozen examples with the library, so you do so, that many of us use your library so fast .. not think peterf1999

I don't think examples are needed for this. I mean if you read the code section from the help file that comes with Inno Setup.
which reads "
The [Code] section is an optional section that specifies a Pascal script. A Pascal script can be used to customize Setup or Uninstall in many ways. Note that creating a Pascal script is not easy and requires experience with Inno Setup and knowledge about programming in Pascal or at least a similar programming language."
The reason I'm saying there is no need for example is because simple types are always there to guide you on how to use a function, if you had a little bit of knowledge of pascal/delphi, you would know what I'm talking about and what makes peterf not make examples.

[rinaldo]

razor... I did before opening the dll to read


peterf ...I found that it's a great project .. I noticed that the driver can not read DirectX .. what do you think of this option?

[peterf1999]

Added the following procedure to dll:

• RotateImg

[Razor12911]

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

[peterf1999]

Added the following procedure/function to dll:

• CreatePie
• UpdatePie
• CreateArc
• UpdateArc

Changes:

• Renamed 'DrawImages' procedure to 'DrawToDC'

[rinaldo]

too thirsty for CPU this library

[peterf1999]

Added the following function to dll:

• CreateBtn

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]

Added the following procedures/functions to dll:

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';

[Cesar82]

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]

Changes: v0.0.8.6

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

[peterf1999]

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

[BAMsE]

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

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

In this case only EqualizerAction is executed with 10ms interval