[решено] Помогите поправить скрипт Show & Hide Fles and Folders

[ufooo000]

Я хочу сделать так чтобы мой файл при нажатии показывал скритые файлы, и при повторном нажатии их скрыл.
Подскажите-как правильно добавить эти строки в скрипт?

Reg.WriteInteger('Hidden', 1);
Reg.WriteInteger('ShowSuperHidden', 1);

Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced', True);
Reg.WriteInteger('Hidden', 2);
Reg.WriteInteger('ShowSuperHidden', 0);

[opel431]

Заведите переменные, и в зависимости от текущего значения ключа вносите нужное значение
var
RegHidden: Integer;
.......
Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced', True);

// узнать текущее значение параметра "Hidden"
if Reg.ValueExists('Hidden') then
RegHidden:=Reg.ReadInteger(....);

// изменить
if RegHidden=1 then
RegHidden:=2
else
RegHidden:=1;
.....
// внести изменения
Reg.WriteInteger('Hidden', RegHidden);
.....

[ufooo000]

Скрипт не работает. Одна строка не срабатывает.
RegHidden:=Reg.ReadInteger(....);

[opel431]

Скрипт не работает. Одна строка не срабатывает. »Это серьезно! Вы что, прям так и тестировали? Ну, что сказать - тогда, вы пропустили еще пару строчек с "многоточием"!
Наверное, так и не понял, о чем идет речь?

// многоточие в параметрах функции, всего лишь предложение для изменения в других параметрах ключа. Ведь у Вас есть еще и 'ShowSuperHidden'
// многоточие в коде, способ сократить набор кода, за счет пропуска неизменяемой и по сути правильной части кода

if Reg.ValueExists('Hidden') then
begin
RegHidden:=Reg.ReadInteger('Hidden');
.......
Reg.WriteInteger('Hidden', RegHidden);
end;
Reg.Closekey;

[ufooo000]

opel431
Разобрался-спасибо за скрипт!