moparisthebest/Simba
1
0
Fork 0
mirror of https://github.com/moparisthebest/Simba synced 2025-03-03 02:41:54 -05:00
Code Issues Releases Wiki Activity

Updated security.sex because of issues with Directories not being saved.

Browse Source
This commit is contained in:
Nava2 2011-01-12 15:42:50 -05:00
parent d75f7d55cf
commit e6134b6d18
1 changed files with 8 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
Extensions/security.sex
View File

@ -58,6 +58,7 @@ const
{$ELSE} {$ELSE}
DirectorySeparator = '/'; DirectorySeparator = '/';
{$ENDIF} {$ENDIF}
LIST_SEPARATOR = ';;';
{ var Settings_DEFAULT_(URL|FILE): Integer; { var Settings_DEFAULT_(URL|FILE): Integer;
Depict the default option for when the Option dialog times out. These values Depict the default option for when the Option dialog times out. These values
@ -167,7 +168,7 @@ begin
{$IFDEF EXTENSION} {$IFDEF EXTENSION}
{ Write to the Settings.xml } { Write to the Settings.xml }
tmp := Settings.getKeyValueDef(PathArr[uf][p].name, ''); tmp := Settings.getKeyValueDef(PathArr[uf][p].name, '');
Settings.setKeyValue(PathArr[uf][p].name, tmp + DirectorySeparator + s); Settings.setKeyValue(PathArr[uf][p].name, tmp + LIST_SEPARATOR + s);
{$ENDIF} {$ENDIF}
end; end;
@ -800,10 +801,6 @@ begin
end; end;
end; end;
procedure asdf();
begin
end;
{ {
Loads the settings from the XML document to the forms components. Loads the settings from the XML document to the forms components.
} }
@ -890,7 +887,7 @@ var
begin begin
h := obj.ITEMS.Count - 1; h := obj.ITEMS.Count - 1;
Result := ''; Result := '';
t := DirectorySeparator; t := LIST_SEPARATOR;
for i := 0 to h do for i := 0 to h do
if (obj.ITEMS.Strings[i] <> '') then if (obj.ITEMS.Strings[i] <> '') then
Result := Result + obj.ITEMS.Strings[i] + t; Result := Result + obj.ITEMS.Strings[i] + t;
@ -1159,7 +1156,7 @@ var
V: TVariantArray; V: TVariantArray;
{$ENDIF} {$ENDIF}
begin begin
writeln('showing extention form.'); // writeln('showing extention form.');
{$IFNDEF EXTENSION} {$IFNDEF EXTENSION}
V := []; V := [];
ThreadSafeCall('LoadSettingsForm', V); ThreadSafeCall('LoadSettingsForm', V);
@ -1215,7 +1212,7 @@ begin;
} }
//s := //s :=
PathArr[i][j].a := Explode( PathArr[i][j].a := Explode(
DirectorySeparator, LIST_SEPARATOR,
Settings.getKeyValue(PathArr[i][j].name) Settings.getKeyValue(PathArr[i][j].name)
); );
{$ENDIF} {$ENDIF}
@ -1286,7 +1283,7 @@ begin;
Settings_FIRE_WALL_ENABLED := True; Settings_FIRE_WALL_ENABLED := True;
{$ENDIF} {$ENDIF}
{ Icon_Lock := GetMufasaBitmap( Icon_Lock := GetMufasaBitmap(
BitmapFromString( BitmapFromString(
48, 48, 48, 48,
'meJzFmAlUk3fWxnG3gI61TqeLa5' + 'meJzFmAlUk3fWxnG3gI61TqeLa5' +
@ -1383,7 +1380,7 @@ begin;
'emQlng3//qpF610H3wzj2TCQAUNZRKf678L0RlQT+Ne94J8qbxz/A' + 'emQlng3//qpF610H3wzj2TCQAUNZRKf678L0RlQT+Ne94J8qbxz/A' +
'NOJAeU=' 'NOJAeU='
) )
);} );
{ Temp hack } { Temp hack }
Icon_Lock := TMufasaBitmap.Create(); Icon_Lock := TMufasaBitmap.Create();
@ -1395,7 +1392,7 @@ end;
procedure Free; procedure Free;
begin begin
// Only here so people won't freak out. :) // Only here so people won't freak out. :)
{ Icon_Lock.Free; } Icon_Lock.Free;
end; end;
{$IFDEF EXTENSION} {$IFDEF EXTENSION}