Thema: Delphi ShellExecute - assoc

Einzelnen Beitrag anzeigen

cran7

Registriert seit: 5. Sep 2007
43 Beiträge
 
#1

ShellExecute - assoc

  Alt 15. Jan 2008, 18:16
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)
  Mit Zitat antworten Zitat