--- dao/DelphiScanner/Configuration.pas 2016/07/28 20:03:18 3076 +++ dao/DelphiScanner/Configuration.pas 2016/07/28 21:25:58 3077 @@ -36,6 +36,8 @@ YPosSmskode : integer; FontSizeSmskode : integer; + BaseURL : string; + procedure ReadFromInifile( iniFile: TIniFile); end; @@ -45,6 +47,10 @@ procedure TConfiguration.ReadFromInifile( iniFile: TIniFile); begin + + // ToDO : Omskriv alle URL referncer til at basere sig på BaseURL + BaseURL := 'http://omdeling.info/webservices'; + with iniFile do begin