procedure TForm1.Button1Click(Sender: TObject); begin WinExec('rundll32.exe shell32.dll,Control_RunDLL appwiz.cpl', SW_SHOWNORMAL); end;