Windows 11 Fluent Design Installer UI for Inno

[audiofeel]

Originally Posted by Behnam2018

New Seutp

Wow! Cool installer. Who made it? And is it possible to repeat it? that's the question

[Masquerade]

Originally Posted by audiofeel

Wow! Cool installer. Who made it? And is it possible to repeat it? that's the question

Yes, an incredible job

[BLACKFIRE69]

Originally Posted by audiofeel

@BLACKFIRE69: Mr... Is it possible to change the volume with the mouse wheel? (you point the pointer at the button, turn the wheel and the volume changes) As in the latest Win11 builds. A non-interfering SetHint appears at the top with numbers showing the level.
Sorry for my english, you all already felt a slight Welsh accent
Here , as if it is possible

Added OnMouseWheel event for FMXForm and Trackbar. let me know if you need OnMouseWheel event for other components as well.


.

[audiofeel]

Originally Posted by BLACKFIRE69

Added OnMouseWheel event for FMXForm and Trackbar. let me know if you need OnMouseWheel event for other components as well.
.

This is great and understandable. What do users usually make a music (volume) button out of? Most likely from "FEqualizer" "FText" and "FColorButton". I just assumed.

[audiofeel]

Here, a little higher, a user under the nickname Behnam2018 posted a screenshot with the installer. An experienced eye will notice that the fonts that should be displayed are not displayed there. Most likely, Behnam2018 is installed "Windows7". On it, with the "temporary" installation of fonts, small problems sometimes arise. As a temporary solution, I propose this.

function InitializeSetup(): Boolean;
var
  ResultCode: Integer;
begin
  if not FontExists('My Font') then
  begin
    ExtractTemporaryFile('MyFont.ttf');
    ExtractTemporaryFile('FontReg.exe');
    Exec(ExpandConstant('{tmp}\FontReg.exe'), '/copy', '', SW_HIDE, ewWaitUntilTerminated, ResultCode);
  end;


  Result:= True;
end;

https://code.kliu.org/misc/fontreg/

[Behnam2018]

made BY KaOs Repack

[Masquerade]

Originally Posted by Behnam2018

made BY KaOs Repack

No, made by audiofeel, as written in credits, and thanks to BLACKFIRE69 for the IsArcEx and FMXInno libraries!

[BLACKFIRE69]

FMXInno v1.0.0.2 - Updates

* Now almost all components are ready to work with FXPacker and FXStream.

.

[audiofeel]

Originally Posted by hitman797

hi, BLACKFIRE69.
can you include this in FMXInno v1.0.0.3.

Comp1Name=Game voices>English                                               
Comp1Size=2000
Comp1Group=1
                                                  
Comp2Name=Game voices>Russian                                               
Comp2Size=2100
Comp2Group=1

Comp6Name=Offline MP                                              
Comp6Size=4000
Comp6Group=0

procedure SetupUI_Init(Handle1, Handle2, Handle3: HWND);
  external '[email protected]:ISFMXUI.dll cdecl';
procedure SetupUI_Deinit;
  external '[email protected]:ISFMXUI.dll stdcall';
procedure SetupUI_Show;                                          
  external '[email protected]:ISFMXUI.dll stdcall';
procedure SetupUI_SetDir(Dir: PAnsiChar);
  external '[email protected]:ISFMXUI.dll stdcall';
procedure SetupUI_Install;
  external '[email protected]:ISFMXUI.dll stdcall';
procedure SetupUI_Progress(Status, Filename: PAnsiChar; Curr, Max: Integer);
  external '[email protected]:ISFMXUI.dll stdcall';
procedure SetupUI_Finished(Success: Boolean);
  external '[email protected]:ISFMXUI.dll cdecl';
procedure SetupUI_Info(Info1, Info2: String);
  external '[email protected]:ISFMXUI.dll cdecl';
procedure SetupUI_AddComponent(Component: String; Size, Group: Integer; Redist: Boolean);
  external '[email protected]:ISFMXUI.dll cdecl';
function SetupUI_Component(Component: String): Boolean;
  external '[email protected]:ISFMXUI.dll cdecl';
function SetupUI_Shortcuts(Desktop: Boolean): Boolean;
  external '[email protected]:ISFMXUI.dll stdcall';
procedure SetupUI_AddBkgImg1(Buff: PAnsiChar; Size: Integer);
  external '[email protected]:ISFMXUI.dll cdecl';
procedure SetupUI_AddBkgImg2(Filename: String);                                                           
  external '[email protected]:ISFMXUI.dll cdecl';
procedure SetupUI_AddAppInfo(Info: String);
  external '[email protected]:ISFMXUI.dll cdecl';
procedure SetupUI_AddInstInfo(Info: String);
  external '[email protected]:ISFMXUI.dll cdecl';

Hi BLACKFIRE69, could you add an analog of the checklistbox
Perhaps the calculation of the size of components will also be implemented there