Inno Setup Modifica il file app.config quando si esegue setup.exe

Question

Ho un servizio WCF che sto ospitando come servizio Windows. Normalmente vado al prompt dei comandi VS e installo il servizio usando installutil.exe, quindi modifica l'indirizzo di base del servizio in app.config in base al nome del computer su cui lo sto installando ed eseguo il servizio.

indirizzo di base è questa:

<endpoint address="http://MACHINE_NAME/NFCReader/" binding="webHttpBinding"/> 

modifico il MACHINE_NAME nel file app.config.

Voglio usare inno setup per fare lo stesso per me.

Quello che voglio è quando l'utente esegue il file setup.exe per installare il servizio, voglio chiedere all'utente l'indirizzo di base del servizio e usare quell'indirizzo per ospitarlo. Non sono in grado di capire se è possibile O come farlo.

Qualsiasi aiuto per favore? Grazie in anticipo. :)

Answer 1

Solo un esempio che uso per sostituire la stringa nella configurazione della mia app.
Sono sicuro che si può fare meglio :-)

Quello che mi sostituisco è:

add key = valore "appVersion" = "YYMMDD.HH.MM"

[Code] 
procedure Update; 
var 
C: AnsiString; 
CU: String; 
begin 
     LoadStringFromFile(ExpandConstant('{src}\CdpDownloader.exe_base.config'), C); 
     CU := C; 
     StringChange(CU, 'YYMMDD.HH.MM', GetDateTimeString('yymmdd/hh:nn', '.', '.')); 
     C := CU; 
     SaveStringToFile(ExpandConstant('{src}\Config\CdpDownloader.exe.config'), C, False);   
end; 

function InitializeSetup: Boolean; 
begin 
    Update; 
result := True; 
end; 

Answer 2

I ti consigliamo di utilizzare il parser XML per aggiornare i tuoi file di configurazione. La seguente funzione può esserti d'aiuto. Utilizza MSXML come parser di file:

[Code] 
const 
    ConfigEndpointPath = '//configuration/system.serviceModel/client/endpoint'; 

function ChangeEndpointAddress(const FileName, Address: string): Boolean; 
var 
    XMLNode: Variant; 
    XMLDocument: Variant; 
begin 
    Result := False; 
    XMLDocument := CreateOleObject('Msxml2.DOMDocument.6.0'); 
    try 
    XMLDocument.async := False; 
    XMLDocument.preserveWhiteSpace := True; 
    XMLDocument.load(FileName);  
    if (XMLDocument.parseError.errorCode <> 0) then 
     RaiseException(XMLDocument.parseError.reason) 
    else 
    begin 
     XMLDocument.setProperty('SelectionLanguage', 'XPath'); 
     XMLNode := XMLDocument.selectSingleNode(ConfigEndpointPath); 
     XMLNode.setAttribute('address', Address); 
     XMLDocument.save(FileName); 
     Result := True; 
    end; 
    except 
    MsgBox('An error occured during processing application ' + 
     'config file!' + #13#10 + GetExceptionMessage, mbError, MB_OK); 
    end; 
end;