For all your AutoUpdating needs -
SCAR Code:Function Download(URL, WhereTo: String; Shared: Boolean): Boolean;
Var
theFile: Integer;
fileData: String;
Begin
theFile := ReWriteFile(WhereTo, Shared);
If theFile > -1 Then
Begin
fileData := GetPage(URL);
If fileData <> '' Then
If WriteFileString(theFile, fileData) Then
Result := True;
End;
Try
CloseFile(theFile);
Except
Writeln('Failed to rewrite file...');
End;
End;

