mirror of https://gitlab.com/basile.b/dexed.git
parent
e2118ceabc
commit
38e4e41abb
|
@ -331,10 +331,6 @@ constructor TCED2SynPresetsLoaderForm.Create(AOwner: TComponent);
|
||||||
var
|
var
|
||||||
fname: string;
|
fname: string;
|
||||||
pnl: TPanel;
|
pnl: TPanel;
|
||||||
i: integer;
|
|
||||||
const
|
|
||||||
h: array[0..5] of string = ('bright', 'dark', 'Mustard', 'Mars bright',
|
|
||||||
'Mars dark', 'Soft dust');
|
|
||||||
begin
|
begin
|
||||||
inherited;
|
inherited;
|
||||||
fBackup:= TCED2SynPreset.Create(nil);
|
fBackup:= TCED2SynPreset.Create(nil);
|
||||||
|
@ -343,13 +339,6 @@ begin
|
||||||
if fname.fileExists then
|
if fname.fileExists then
|
||||||
fPresets.loadFromFile(fname);
|
fPresets.loadFromFile(fname);
|
||||||
|
|
||||||
//TODO-cmaintenance: remove this the second version following 3.6.7
|
|
||||||
for i:= 5 downto 0 do
|
|
||||||
begin
|
|
||||||
if (i < fPresets.count) and (fPresets[i].name = h[i]) then
|
|
||||||
fPresets.fCollection.Delete(i);
|
|
||||||
end;
|
|
||||||
|
|
||||||
with fPresets.insertPreset(0) do
|
with fPresets.insertPreset(0) do
|
||||||
begin
|
begin
|
||||||
fIsHardcoded := true;
|
fIsHardcoded := true;
|
||||||
|
|
Loading…
Reference in New Issue