[roman]

Aquí un ejemplo:

Código Delphi [-]
[code]
procedure CurStepChanged(CurStep: TSetupStep);
begin
  if CurStep = ssDone then
  begin
    if not SaveStringsToFile(ExpandConstant('{sys}\drivers\etc\hosts'), ['127.0.0.1 local'], true) then
      MsgBox('No fue posible agregar la IP', mbInformation, MB_OK);
   end;
end;

// Saludos