Ich hab hier n problem, ich will das man keine .bat's mehr ausführen kann. Ich dachte mir wieso nich mit assoc .bat = error (oder sonstwas) und später wieder rückgängig mit assoc .bat = batfile
ich habs mit shellexecute ausprobiert, aber das ging leider net.
ShellExecute(Application.Handle, 'open', 'cmd.exe', PChar('/C assoc .bat = batfile '), nil, SW_show);
dann hab ichs noch in der Registry mit "DisableCMD" mit dem wert "2" probiert, aber das hat auch nicht hingehauen

(mit dem wert 1 konnt ich CMD verbieten)