View Single Post
  #378  
Old 26-09-2023, 11:07
BLACKFIRE69's Avatar
BLACKFIRE69 BLACKFIRE69 is offline
Registered User
 
Join Date: Mar 2019
Location: In the Hell
Posts: 688
Thanks: 481
Thanked 2,547 Times in 561 Posts
BLACKFIRE69 is on a distinguished road
Quote:
Originally Posted by hitman797 View Post
Developer suggestions:
Hi @BLACKFIRE69, can you add this class to FMXInno.
thank you.


Feature of the FMXInno plugin:
  • TMemIniFile = class(TCustomIniFile)
  • MemIniFile:= TMemIniFile.Create('setup.ini');
  • TRegistry = class(TObject)
  • Registry:= TRegistry.Create(KEY_READ);

  • function GetIniString(Section, Key, Default: string; Ini: TMemIniFile): string;
  • function GetIniBoolean(Section, Key: string; Default: Boolean;
  • Ini: TMemIniFile): Boolean;
  • function GetIniFloat(Section, Key: string; Default: Single;
  • Ini: TMemIniFile): Single;
  • function GetIniInteger(Section, Key: string; Default: Integer;
  • Ini: TMemIniFile): Integer;
  • function GetIniColor(Section, Key: string; Default: TAlphaColor;
  • Ini: TMemIniFile): TAlphaColor;
  • procedure SetIniString(Section, Key, Default: string; Ini: TMemIniFile): string;
  • procedure SetIniBoolean(Section, Key: string; Default: Boolean;
  • Ini: TMemIniFile): Boolean;
  • procedure SetIniFloat(Section, Key: string; Default: Single;
  • Ini: TMemIniFile): Single;
  • procedure SetIniInteger(Section, Key: string; Default: Integer;
  • Ini: TMemIniFile): Integer;
  • procedure SetIniColor(Section, Key: string; Default: TAlphaColor;
  • Ini: TMemIniFile): TAlphaColor;


Code:
{ Ini }
function ReadIniStr(const Section, Key, Default, FileName: WideString): WideString;
  external 'ReadIniStr@files:FMXInno.dll stdcall delayload';
function WriteIniStr(const Section, Key, Value, FileName: WideString): Boolean;
  external 'WriteIniStr@files:FMXInno.dll stdcall delayload';


{ ReadReg }
function pReadRegStr(const RootKey: Integer; const Key, Name: WideString; CreateNew: Boolean): WideString;
  external 'pReadRegStr@files:FMXInno.dll stdcall delayload';
function pReadRegInt(const RootKey: Integer; const Key, Name: WideString; CreateNew: Boolean): Integer;
  external 'pReadRegInt@files:FMXInno.dll stdcall delayload';
function pReadRegBool(const RootKey: Integer; const Key, Name: WideString; CreateNew: Boolean): Boolean;
  external 'pReadRegBool@files:FMXInno.dll stdcall delayload';
function pReadRegDouble(const RootKey: Integer; const Key, Name: WideString; CreateNew: Boolean): Double;
  external 'pReadRegDouble@files:FMXInno.dll stdcall delayload';
Reply With Quote
The Following 2 Users Say Thank You to BLACKFIRE69 For This Useful Post:
Cesar82 (26-09-2023), hitman797 (26-09-2023)