Ver Mensaje Individual
  #26  
Antiguo 16-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
, jajajaja, hay Dios esto si cambia, pero bueno que todo sea por el saber, entonces como es la estructura del integer ??, tengo que hacer todo exactamente como el BinaryData, pero con Integer ??, tengo que crear la variable o como tengo que hacer, mira aqui esta el codigo como lo plantee:

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

se hace igual que el string ? tengo que hacer el mismo metodo que el binary ?
Responder Con Cita