mirror of
https://git.vladimir.cc/vladimir/ewsdr.git
synced 2026-08-25 19:45:09 +00:00
fix macOS build
This commit is contained in:
+5
-5
@@ -7,10 +7,10 @@ interface
|
||||
uses
|
||||
Classes, SysUtils, FlatButton, FlatEdit, FlatListBox, AppTheme, Forms, Controls, Graphics, Dialogs,
|
||||
StdCtrls, ExtCtrls, ComCtrls, IniFiles,
|
||||
BoardUtils;
|
||||
BoardUtils, PlatformUtils;
|
||||
|
||||
const
|
||||
DEVICE_CFG_FILE = 'hpsdr_devices.ini';
|
||||
DEVICE_CFG_NAME = 'hpsdr_devices.ini';
|
||||
|
||||
type
|
||||
// Запись о сохранённом устройстве
|
||||
@@ -355,9 +355,9 @@ var
|
||||
Section: string;
|
||||
begin
|
||||
FSavedCount := 0;
|
||||
if not FileExists(DEVICE_CFG_FILE) then Exit;
|
||||
if not FileExists(GetAppCfgDir + DEVICE_CFG_NAME) then Exit;
|
||||
|
||||
Ini := TIniFile.Create(DEVICE_CFG_FILE);
|
||||
Ini := TIniFile.Create(GetAppCfgDir + DEVICE_CFG_NAME);
|
||||
try
|
||||
N := Ini.ReadInteger('Devices', 'Count', 0);
|
||||
SetLength(FSavedDevices, N);
|
||||
@@ -381,7 +381,7 @@ var
|
||||
I: Integer;
|
||||
Section: string;
|
||||
begin
|
||||
Ini := TIniFile.Create(DEVICE_CFG_FILE);
|
||||
Ini := TIniFile.Create(GetAppCfgDir + DEVICE_CFG_NAME);
|
||||
try
|
||||
Ini.WriteInteger('Devices', 'Count', FSavedCount);
|
||||
for I := 0 to FSavedCount - 1 do
|
||||
|
||||
Reference in New Issue
Block a user