15,6 → 15,8 |
class procedure SetPhpInterpreter(const Value: string); static; |
class function GetSpecialChars: boolean; static; |
class procedure SetSpecialChars(const Value: boolean); static; |
class function GetDarkTheme: boolean; static; |
class procedure SetDarkTheme(const Value: boolean); static; |
public |
class property FontSize: integer read GetFontSize write SetFontSize; |
class property ScrapFile: string read GetScrapFile write SetScrapFile; |
21,6 → 23,7 |
class property HelpIndex: string read GetHelpIndex write SetHelpIndex; |
class property PhpInterpreter: string read GetPhpInterpreter write SetPhpInterpreter; |
class property SpecialChars: boolean read GetSpecialChars write SetSpecialChars; |
class property DarkTheme: boolean read GetDarkTheme write SetDarkTheme; |
end; |
|
implementation |
104,6 → 107,25 |
end; |
end; |
|
class function TFastPHPConfig.GetDarkTheme: boolean; |
var |
reg: TRegistry; |
begin |
result := false; |
reg := TRegistry.Create; |
try |
reg.RootKey := HKEY_CURRENT_USER; |
if reg.OpenKey('Software\ViaThinkSoft\FastPHP\Editor', false) then |
begin |
if reg.ValueExists('DarkTheme') then |
result := reg.ReadBool('DarkTheme'); |
reg.CloseKey; |
end; |
finally |
reg.Free; |
end; |
end; |
|
class function TFastPHPConfig.GetFontSize: integer; |
var |
reg: TRegistry; |
123,6 → 145,23 |
end; |
end; |
|
class procedure TFastPHPConfig.SetDarkTheme(const Value: boolean); |
var |
reg: TRegistry; |
begin |
reg := TRegistry.Create; |
try |
reg.RootKey := HKEY_CURRENT_USER; |
if reg.OpenKey('Software\ViaThinkSoft\FastPHP\Editor', true) then |
begin |
reg.WriteBool('DarkTheme', Value); |
reg.CloseKey; |
end; |
finally |
reg.Free; |
end; |
end; |
|
class procedure TFastPHPConfig.SetFontSize(Value: integer); |
var |
reg: TRegistry; |