FMXInno - Windows Fluent Design Installer UI for Inno

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

,

[audiofeel]

BlackFire69
is there anything you can do with scaling "FSwitch" and "FCheckBox"?
https://ibb.co/ryBnyV1
https://ibb.co/5F5SM4J

[BLACKFIRE69]

Originally Posted by audiofeel

BlackFire69
is there anything you can do with scaling "FSwitch" and "FCheckBox"?
https://ibb.co/ryBnyV1
https://ibb.co/5F5SM4J

maybe try using new values for Top and Width for higher DPI.

var
  FCurrentDPI: Cardinal;
begin
  FCurrentDPI := GetCurrentDPIValue;

  if FCurrentDPI < 120 then
    Switch1.Width(NSX(78))
  else
    Switch1.Width(NSX(58));


DPI	  PCT

96	- 100%
120	- 125%
144	- 150%
192	- 200%

procedure FMXDesigning;
var
  FOffset: Integer;
begin
...
  #ifdef Component1
    FOffset := 0;
    Component[1].FCreate(Page3.Handle, True, 'Install {#C1[59]}');
    Component[1].SetBounds(NSX(20), NSY(185), NSX(250), NSY(25));
    Component[1].FontSetting('Segoe UI', VCLFontSizeToFMX2(10), VCLColorToFMXColor($FFFFFF));
  #ifdef Component2
    FOffset := FOffset + 5;
    Component[2].FCreate(Page3.Handle, True, 'Install {#C2[59]}');
    Component[2].SetBounds(NSX(20), NSY(210 + FOffset), NSX(250), NSY(25));
    Component[2].FontSetting('Segoe UI', VCLFontSizeToFMX2(10), VCLColorToFMXColor($FFFFFF));

...

  #ifdef Component8
    FOffset := 0;
    Component[8].FCreate(Page3.Handle, True, 'Install {#C8[59]}');
    Component[8].SetBounds(NSX(340), NSY(185), NSX(250), NSY(25));
    Component[8].FontSetting('Segoe UI', VCLFontSizeToFMX2(10), VCLColorToFMXColor($FFFFFF));
  #ifdef Component9
    FOffset := FOffset + 5;
    Component[9].FCreate(Page3.Handle, True, 'Install {#C9[59]}');
    Component[9].SetBounds(NSX(340), NSY(210 + FOffset), NSX(250), NSY(25));
    Component[9].FontSetting('Segoe UI', VCLFontSizeToFMX2(10), VCLColorToFMXColor($FFFFFF));
...
end;

[rash]

Change File Not working

script fixed please help me

[BLACKFIRE69]

Originally Posted by rash

Change File Not working

script fixed please help me

more details plz?

[BLACKFIRE69]

FMXInno - Updates

Added:

  - function EnableWinDarkMode(IsDark: Boolean): Boolean;
  - function IsWinDarkModeEnabled: Boolean;
  - function EnableWinTransparency(Enabled: Boolean): Boolean;
  - function IsWinTransparencyEnabled: Boolean;
  - function EnableWinAccentColor(Enabled: Boolean): Boolean;
  - function IsWinAccentColorEnabled: Boolean;
  - function RestartWinExplorer: Boolean;

  - function GetWinAccentColorVCL: TColor;
  - function GetWinAccentColorFMX: TAlphaColor;

Improved:

  - Customizable exit form.

,

[BLACKFIRE69]

New FMXInnoSk

FMXInno + Skia >> FMXInnoSk


FMXInnoSk is a side projects of FMXInno itself, where the other external API are integrated into FMXInno.
Here is the integration of Skia (is a cross-platform 2D graphics API developed by Google) to FMXInno as a starting step.


More about Skia:
skia.org
skia4delphi


FMXInnoSk requires the sk4d.dll lib.

(sorry for the low resolution GIFs )


,

[audiofeel]

Greetings to Black fire 69. How did you personally want to start the language setting after launching the installer itself? I really wanted to see your example.

[audiofeel]

if the theme in the system is dark, then the installer will be white and vice versa.
all fonts are taken from the system 'Segoe UI Variable Text' and 'Segoe Fluent Icon'. they are only in W11

[TEAmo]

Originally Posted by audiofeel

if the theme in the system is dark, then the installer will be white and vice versa.
all fonts are taken from the system 'Segoe UI Variable Text' and 'Segoe Fluent Icon'. they are only in W11

Can I upload your script? Thank you

[audiofeel]

Black Fire 69 is still the most reliable and the largest in terms of functionality .dll. we are waiting for updates from you and so on...

[hitman797]

@audiofeel

Greetings to Black fire 69. How did you personally want to start the language setting after launching the installer itself? I really wanted to see your example.

To change the language use Custom Messages & Languages Section

[Languages]
Name: "English"; MessagesFile: "Language\English.isl"
Name: "French"; MessagesFile: "Language\French.isl"
Name: "Arabic"; MessagesFile: "Language\Arabic.isl"

[CustomMessages]
// English
English.Font=Segoe UI Bold Italic
English.AppName=Assassin's Creed Unity
English.Autorun=Welcome
English.Welcome=Welcome to Installation
English.System=System Requirements
English.Select=Selecting Installation Path
English.Prepar=Preparing for Installation
English.Install=Installing the Game
English.Finish=Finishing the Installation
English.Faster=Faster
English.Smaller=Smaller
English.Better=Better
English.AM=AM
English.PM=PM
English.Sunday=Sunday
English.Monday=Monday
English.Tuesday=Tuesday
English.Wednesday=Wednesday
English.Thursday=Thursday
English.Friday=Friday
English.Saturday=Saturday
English.January=January
English.February=February
English.March=March
English.April=April
English.May=May
English.June=June
English.July=July
English.August=August
English.September=September
English.October=October
English.November=November
English.December=December

If you want an example of that, here's an example from Gupta Prince
https://www.fileforums.com/showthread.php?t=99073

[audiofeel]

hitman 797. I know that the language call form can no longer be called after initializing the installer. And I didn't think in this direction like Prince Gupta. thanks. but the whole script will have to be redone

[BLACKFIRE69]

Originally Posted by audiofeel

hitman 797. I know that the language call form can no longer be called after initializing the installer. And I didn't think in this direction like Prince Gupta. thanks. but the whole script will have to be redone

this's not a complete example, just use to get an idea.

non-english texts are indicated by texts surrounded by "[r]" for convenience.
(because i'm too lazy to translate every text. )

[InstallerLangs]
Lang1=Russian
Lang2=English
;Lang3=
;Lang4=
;Lang5=
;Lang6=

Example:
// LanguageBox
English_LangOkBtn=Ok
English_LanguageTitle=Select Setup Language
English_LanguageMsg=Select the language to use during the installation:

Russian_LangOkBtn=[r]Ok[r]
Russian_LanguageTitle=[r]Select Setup Language[r]
Russian_LanguageMsg=[r]Select the language to use during the installation:[r]

...

download from here : FMXInno_Test.rar

,