-
Уважаемые гости и пользователи форума.
Администрация настоятельно рекомендует не регистрировать несколько аккаунтов для одного пользователя. При выявлении наличия мультиаккаунтов будут заблокированы все учетные записи данного пользователя.
Аккаунты, зарегистрированные на временную почту, будут также заблокированы.
DLL FMXBridge.dll для Inno Setup 26.04
- Автор audiofeel
- Дата создания
Небольшой апдейт с добавлением новых функций и расширением существующих возможностей.
Добавлена функция определения Windows 11
code_language.pascal:function IsWindows11: Boolean; external 'IsWindows11@files:FMXBridge.dll stdcall delayload';
code_language.pascal:if IsWindows11 then begin FMXForm.FCreateTabbedForm(WizardForm.Handle, IsWinDark, True); end else begin if IsWinDark then FMXForm.FCreateBlurForm(WizardForm.Handle, ColorSetOpacity($FF000000, 0.7), True) else FMXForm.FCreateBlurForm(WizardForm.Handle, ColorSetOpacity($FFFFFFFF, 0.7), True); end; if IsWinDark then FMXForm.LoadStyleFromFile(ExtractAndLoad('dark.style'), GetWinAccentColor) else FMXForm.LoadStyleFromFile(ExtractAndLoad('light.style'), GetWinAccentColor);
Добавлен новый компонент FNumberBox
числовая обёртка с расширенными настройками:
Основные методы:
code_language.pascal:procedure DecimalDigits(FDigits: Integer); procedure HorzIncrement(FValue: Single); procedure VertIncrement(FValue: Single); procedure VerticalMode(FEnabled: Boolean); procedure Max(FMax: Single); procedure Min(FMin: Single); procedure Value(FValue: Single); procedure ValueType(FFloat: Boolean); function GetHorzIncrement: Single; function GetVertIncrement: Single; function IsVerticalMode: Boolean; function GetValue: Single;
Расширена обёртка FUserInfo
Обновлён интерфейс пользователя: (по запросу, требовалось локализация типа учётки)
Добавлена типизация учётных записей:code_language.pascal:type FUserInfo = interface(IUnknown) '{FF655E8A-2C5A-4DF4-80EB-81CBAFD100C1}' function Name: WideString; function Domain: WideString; function ProfilePath: WideString; function UserType: TUserType; function IsElevated: Boolean; end;
И функция преобразования:code_language.pascal:TUserType = (utUnknown, utUser, utAdmin, utGuest, utSystem);
code_language.pascal:function UserTypeToStr(AType: TUserType): string; begin case AType of utUser: Result := 'User'; utAdmin: Result := 'Admin'; utGuest: Result := 'Guest'; utSystem: Result := 'System'; else Result := 'Unknown'; end; end;
Прочие изменения
Небольшие внутренние правки и стабилизация работы компонентов.
1. Добавил TDropTarget, (Функция по запросу, просили давно, пол года назад наверное. Но будьте готовы к тому что перетаскивание файлов работает только с пониженными правами, а при распаковке архивов FreeArc с пониженными правами будет что то по типу - Can't create read mapping!)
Настройка проста -
2. Исправил - улучшил очищение папки {tmp} при выгрузке dll. (Обратная связь - иногда в папке {tmp} остается Sk4d.dll)
3. Добавлены примеры
В DLL добавлена поддержка Skia - современной 2D графической библиотеки. Она используется для качественного рендеринга текста, изображений и анимаций. Теперь часть возможностей Skia можно использовать прямо из Inno Setup через FMX-форму.
Добавлен компонент SkLabel. Это текстовый элемент, который позволяет выводить текст с разными стилями внутри одной строки. Можно менять шрифт, размер, цвет, толщину, наклон, добавлять подчеркивание и другие эффекты для отдельных слов. Поддерживаются emoji и пользовательские шрифты. На отдельные слова можно назначать события, например обработчик клика.
Добавлена функция установки пользовательских шрифтов через InstallSkiaFonts, поэтому можно использовать шрифты, которые не установлены в системе.
Появились графические компоненты SkAnimatedImage и SkAnimatedPaintBox. Первый используется для воспроизведения анимированных изображений с управлением циклом, скоростью и режимом масштабирования. Второй предназначен для отрисовки анимированной графики и шейдерных эффектов.
Также добавлен компонент SkSvg для отображения SVG-графики. Поддерживается масштабирование, разные режимы размещения, перекрашивание SVG и режим grayscale.
Обновлены существующие примеры и добавлены новые примеры использования Skia-компонентов.
code_language.pascal:function sk4d_codec_make_from_file(const file_name: PAnsiChar): THandle; external 'sk4d_codec_make_from_file@files:sk4d.dll cdecl'; function InitSkLabelFontStyle: FSkLabelFontStyle; external 'InitSkLabelFontStyle@files:FMXBridge.dll stdcall delayload'; function InitSkLabel: FSkLabel; external 'InitSkLabel@files:FMXBridge.dll stdcall delayload'; function InitSkAnimatedPaintBox: FSkAnimatedPaintBox; external 'InitSkAnimatedPaintBox@files:FMXBridge.dll stdcall delayload'; function InitSkAnimatedImage: FSkAnimatedImage; external 'InitSkAnimatedImage@files:FMXBridge.dll stdcall delayload'; function InitSkSvg: FSkSvg; external 'InitSkSvg@files:FMXBridge.dll stdcall delayload'; procedure InstallSkiaFonts(FontFile: WideString); external 'InstallSkiaFonts@files:FMXBridge.dll stdcall delayload';
