FMXInno - Windows Fluent Design Installer UI for Inno

[XH75819116]

Originally Posted by audiofeel

My guess is that there are too many frames in your gif animation file or its size is large. my example uses a gif animation with a minimum framerate and a size of 1.35 MB. Yes, there is a delay, but it is minimal.

I'll test it. Thanks.

[jojo670]

Thank you very much for this very complete and high-quality package.

[Cuttlas]

Hi dear BLACKFIRE69

thank you for ur GREAT FMXInno project. NICE AND WONDERFUL, BRO

i have created a setup which plays a music and have a font,

the problems are:

1. the font wont load at all!!! Win10 and Win11 x64 tested

2. on some users' systems for no reason only the music will play and no setup screen will show and i can not find the problem.

- and is there any way to make the setup window rounded?

here is my setup script:

EXPIRED

any help is really appreciated,

awaiting ur respond, bro
kind regards

[audiofeel]

Originally Posted by Cuttlas

Hi dear BLACKFIRE69

thank you for ur GREAT FMXInno project. NICE AND WONDERFUL, BRO

i have created a setup which plays a music and have a font,

the problems are:

1. the font wont load at all!!! Win10 and Win11 x64 tested

2. on some users' systems for no reason only the music will play and no setup screen will show and i can not find the problem.

- and is there any way to make the setup window rounded?

here is my setup script:

https://limewire.com/d/Kabbd#upBW4OpSGu

any help is really appreciated,

awaiting ur respond, bro
kind regards

Fixed....

[BLACKFIRE69]

Originally Posted by audiofeel

could you provide an example of how you calculate the free space needed for installation. if any additional checkboxes are marked. you have an example, but it is not completed

is this not enough?

function InitDiskUsage: FDiskUsage;

// DISK
 FDiskUsage = interface(IUnknown)
   '{08403E71-113A-4F88-960F-36296CB8AAA1}'
    procedure SetDir(Const ADir: String);
    function DiskLoad: Cardinal;
    function TotalSpace: Double;
    function FreeSpace: Double;
    function UsedSpace: Double;
 end;

[BLACKFIRE69]

Update!

- Added a blank form.
- Added new effects.
- Added translucent objects.
- Integrated a HTTP Client API.
- Updated classes.
- Updated image slideshow.

[BLACKFIRE69]

Originally Posted by audiofeel

I could not apply the font through "function AddFontResource" if it is not difficult I would like to see how you do it.

here is an example.

[BLACKFIRE69]

Originally Posted by audiofeel

please make examples of "SysFunc.iss". especially interested in "function BrowseDirModern".

SysFuncDLL Fix + BrowseDirModern Example

Originally Posted by audiofeel

why does the "FDirBrowse" already have a path "C:\Program Files (x86)" and can't apply {code:nosd} ?

oops. check this out.

FMXInnoDLL v1.0.0.1 + Fix (Lib Only)

[Setup]
...
DefaultDirName ={code:DefMyPath}\Inno Example with FMXInno Library
...

{Code]
...
function DefMyPath(Param: String): String;
begin
  Result:= ExpandConstant('{win}');
end;
...

procedure FMXDesigning; 
begin
...
{ Dir Browse Dlg }                                 
  DirBrowseDlg.FCreate(0, 'Select Install Directory', WizardForm.DirEdit.Text);
...
end;

[BLACKFIRE69]

Update!

* Added color conversion between FMX and VCL (Testing).
* Added image slideshow api.
  -- Supports multi-transitions.
* Added some other functions.
  -- GetDesktopImgColorVCL
  -- GetDesktopImgColorFMX
* Added HTTP Client Api to work with single-thread.
* Fixed minor issues known so far.
* Updated Classes.

.

[BLACKFIRE69]

Originally Posted by audiofeel

Greetings. If a theme with multiple images (slide show) is selected in the system, an error occurs. I attach a screenshot. possible only on the Win 11 Dev 25410 build
https://ibb.co/sKr140s

fixed!

.

[BLACKFIRE69]

FMXInno v1.0.0.2 - Fix 02

following functions have been fixed.

1. GetDesktopImgColorVCL
2. GetDesktopImgColorFMX

3. FMXColorToVCL
4. VCLColorToFMX

5. SetVCLColorLighter
6. SetVCLColorDarker

7. GetImgColorVCL
8. GetImgColorFMX

.

[BLACKFIRE69]

FMXInno Updates

* Customizable lock screen.
  -- AutoMode
  -- Animations
  -- Blur Effect
  -- Custom Font Settings
  -- Custom positions
  -- Lockscreen Image
  -- Lockscreen Text

.

[BLACKFIRE69]

Originally Posted by BLACKFIRE69

FMXInno v1.0.0.2 - Fix 02

following functions have been fixed.

1. GetDesktopImgColorVCL
2. GetDesktopImgColorFMX

3. FMXColorToVCL
4. VCLColorToFMX

5. SetVCLColorLighter
6. SetVCLColorDarker

7. GetImgColorVCL
8. GetImgColorFMX

two additional functions were added if needed.

function GetImgPartColorFMX(AImage: WideString; PixelX, PixelY, PixelH, PixelW: Integer): Integer;
function GetImgPartColorVCL(AImage: WideString; PixelX, PixelY, PixelH, PixelW: Integer): Integer;


Example:

{ TranslucentRect }
TranslucentRect.FCreate(BackgroundImage.Handle);
TranslucentRect.SetBounds(NS(76), NS(32), NS(485), NS(128));
TranslucentRect.BlurColor(GetImgPartColorFMX(ExtractAndLoad('wallpaper_color.jpg'), 290, 700, 43, 148));
TranslucentRect.OnMouseDown(@FormMouseDown);

{ TranslucentCircle }
TranslucentCircle.FCreate(BackgroundImage.Handle);
TranslucentCircle.SetBounds(NS(32), NS(192), NS(200), NS(200));
TranslucentCircle.BlurColor(GetImgPartColorFMX(ExtractAndLoad('wallpaper_color.jpg'), 773, 277, 26, 57));
TranslucentCircle.OnMouseDown(@FormMouseDown);

{ TranslucentCallout }
TranslucentCallout.FCreate(BackgroundImage.Handle) ;
TranslucentCallout.SetBounds(NS(408), NS(192), NS(200), NS(200));
TranslucentCallout.BlurColor(GetImgPartColorFMX(ExtractAndLoad('wallpaper_color.jpg'), 681, 658, 34, 91));
TranslucentCallout.OnMouseDown(@FormMouseDown);

FMXInno v1.0.0.2 - Final Release [06/26/22] has been uploaded to the first post. you can download it now.

FMXInno External Plugins:

  - CLILib v1.0.0.0
  - CmdOut v1.0.0.2
  - FDownloader_multi v1.0.0.0
  - ImgSlideShow v1.0.0.0 
  - ISArcEx v0.4.0.0
  - MFT v1.1.0.0
  - Sysfunc v1.0.0.0
  - SplitterLib v1.0.0.0
  - XBass_f v4.0.0.0
  - ZipperLib v1.0.0.0

[BLACKFIRE69]

Originally Posted by audiofeel

Greetings to BLACK FIRE 69 ! If you use any form of "Fluent", then when moving it floats behind the pointer, it is late. it is possible that this is only on my PC. I attach the video. https://youtu.be/-UrabBzYYdI

i don't think that FMXInno can solve this internally. but i'll see if there's anything i can do.
maybe this depends on the windows os + graphics performance of the pc. but i don't know exactly.

Greetings to BLACK FIRE 69 ! If the "FToggleCheckBox" is set to "Enable(False)", then everything works fine, it is not pressed and is not active. but if you click on the text that is from him, then it will work. video attached.https://youtu.be/3TvsmJKM4i4

yes, a small oversight. thanks for reporting.

(extra (WPI_CorePack): you can also navigate through pages by clicking page labels.)

[BLACKFIRE69]

FMXInno - Updates

- Added ability to change the opacity and brightness of Fluent forms. 
   (MainForm, DirForm, StartForm, CustomForm)

- Fixed focus issue in FluentDirBrowse / FluentStartBrowse.
- Minor bugs have been fixed.
- Some improvements.


function FCreateFluent(WParent: HWND; DarkTheme, NoBorder: Boolean; Opacity: Single;
         BrightnessPct: Byte): HWND;

,