несколько вопросов

[spydark91]

1 - как перезагрузить комп? пробовал ExitWindowsEx(с разными параметрами) и ExitWindows(0,EW_RESTARTWINDOWS) но всегда выкидывает из системы и открывается выбор рабочего стола,а перезагрузки не происходит.
2 - вот код

if (image1.Left>976)and(image1.Top<112)and(eda>=70) then
  begin
    timer1.Enabled:=false;
    timer2.Enabled:=false;
    timer3.Enabled:=false;
    if application.MessageBox('Уровень пройден. Начать сначала?','Поздравляю')=mb_ok then
      begin
        for rrr:=1 to 14 do
          begin
            live[rrr]:=true;
          end;
        image1.Top:=16;
        image1.Left:=16;
        eda:=0;
        form2.Label1.Caption:='35';
        timer1.Enabled:=true;
        timer2.Enabled:=true;
        timer3.Enabled:=true;
      end;
  end;

смысл такой,если человек над=жал на кнопку "окей",то происходит сброс параметров,но он не происходит,почсему?и как правельно использовать это?if application.MessageBox('Уровень пройден. Начать сначала?','Поздравляю')=mb_ok then

3 - я уставливаю имя компа с помощью SetComputerName(PChar(compnamee)); и после этого надо обязательно перезагрузиться?
4 - как удалить папку из реестра,созданую мной же
делаю так

var reg:TRegistry;
begin
reg:=TRegIniFile.Create;
reg.OpenKey('Software',false);
reg.OpenKey('Internat',false);
reg.OpenKey('myhack',false);
reg.DeleteValue('mycheck');
reg.DeleteKey('myhack');
reg.DeleteKey('Internat');
reg.Free;

но удаляется толко значение mycheck,папки на месте

[Человек_Борща]

Перезагрузка ПК юзеру - это "приз" победителю? :D
по поводу MessageBox влаги кнопок и флаги нажаты хнопок это ДВЕ РАЗНЫЕ вещи...

if application.MessageBox('Уровень пройден. Начать сначала?','Поздравляю')=mb_ok then

Change to:

if application.MessageBox('Уровень пройден. Начать сначала?','Поздравляю')=IDOKthen

подробнее всегда описано в delphi help

[spamer]

По поводу перезагрузки: 1, 2, 3 и т.д. ищем в гугле "перезагрузить компьютер delphi".