== API for Software Update ==



=== Parameters ===
^ Parameter       ^ Value ^ Description ^ Example ^
| Task            | getswversion, getfilesize, getcurversion, test (string)  | Specify task to perform  | 'Task=getswversion'  |
| CurrentVersion  | 4.18 (double) | Specify current software version being used  | 'CurrentVersion=4.192008021801'  |
| DevStage        | Dev, Alpha, Beta, RC1, RC2 (string) | Specify current software development stage being used  | 'DevStage=Beta'  |
| LangLocale      | da, en, es, fr, ko, pt, ru (string) | Specify language locale of software to download | 'LangLocale=en' |
| CompanyCode     | 001 (string) | Specify company code of software to download (default = 001) | 'CompanyCode=001'  |
| NoahSupport     | yes (empty = no) | Specify whether to download the Noah support version of the software (default = <empty>) | 'NoahSupport=yes'  |

=== Example Code ===
Call to update software:
<code delphi>
resourceString

  rsEzFitVersionNum     = '4.19';
  rsEzFITDevStage       = 'Beta';   // 'Dev', 'Alpha', 'Beta', 'RC1', 'RC2', 'Stable'
  rsEzFITBuild          = '2008021801';
  rsLangLocale          = 'en';  // en (English), es (Spanish), fr (French),
                                 // pt (Portuguese), da (Danish), ko (Korean),
                                 // cn (Chinese), tr (Turkish), ru (Russian)

const
  {$ifdef NOAH}
      ezFitURL     = 'http://www.audina.net/downloads/ezfitnoahupdate.php';
  {$else}
      ezFitURL     = 'http://www.audina.net/downloads/ezfitupdate.php';  //'http://www.caribtrade.com/audina/ezfitupdate.php';
  {$endif}
  ezFitUrlChkVersion  = 'http://www.audina.net/downloads/chk-ezfit-version.php';
  ezFitUrlChkFilesize = 'http://www.audina.net/downloads/chk-ezfit-filesize.php';
  ezFitUrlParamTask        = 'Task=';
  ezFitUrlParamCurVersion  = 'CurrentVersion=';
  ezFitUrlParamDevStage    = 'DevStage=';
  ezFitUrlParamLangLocale  = 'LangLocale=';
  ezFitUrlParamCompanyCode = 'CompanyCode=';
  ezFitUrlParamNoahSupport = 'NoahSupport=';

  . . .

implementation

procedure TfrmMain.ChkNewSoftwareVersion();
var
  HttpClient: TIdHTTP;
  NewSwVersion: string;
begin
    // check if new software version exists
    HttpClient   := TIdHTTP.Create(Self);
    NewSwVersion := HttpClient.Get(ezFITURL +
                       '?' + ezFitUrlParamTask + 'getswversion'+
                       //'&' + ezFitUrlParamCurVersion  + frmSettings.CurrentVersion +
                       '&' + ezFitUrlParamCurVersion  + rsEzFitVersionNum + rsEzFITBuild +
                       '&' + ezFitUrlParamDevStage    + rsEzFITDevStage +
                       '&' + ezFitUrlParamLangLocale  + rsLangLocale +
                       '&' + ezFitUrlParamCompanyCode + datamod.lbl_ezCustomCompanyCode
                     );

   . . .

   FreeAndNil(HttpClient);
end;
</code>