Ver Mensaje Individual
  #5  
Antiguo 17-08-2008
Avatar de BuRtOn
BuRtOn BuRtOn is offline
Miembro
 
Registrado: ene 2008
Ubicación: Bucaramanga
Posts: 215
Reputación: 19
BuRtOn Va por buen camino
Bueno aqui esta otro codigo que equivale a otro intento, tratando de seguir el modelo que me dijo Delphius, pero aun no me sale.

Código Delphi [-]
procedure TForm1.btnOptimizar3Click(Sender: TObject);
var reg: TRegistry;
var valor :Integer;
begin
  valor:=5;
  reg:= TRegistry.Create;
  reg.RootKey := HKEY_LOCAL_MACHINE;
  reg.OpenKey('SYSTEM\CurrentControlSet\Control\SessionManager\MemoryManagement\', True);
  valor:=reg.ReadInteger('EnablePrefetcher');
    Begin
      reg.WriteInteger('EnablePrefetcher',valor);
      MessageDlg('Su Menu ha sido optimizado',mtInformation,[mbOK],0);
    end;

end;

Bueno aqui segui tu modelo Delphius pero aun me arroja el mismo error....y si es una bobada el erro, aun no me sentiria satisfecho, por que a ese codigo como le agrego mi condiiconal If, para poder averiguar si el registro ya habia sido antes modificado, o si aun esta sin modificar, para que mi aplicacion entre y proceda..Bueno si pueden ayudarmen gracias y si no, pues me tocara seguir buscando....
Responder Con Cita