Проверка актуальности версии программы у пользователей.

CONST
    VERSION = 12; // текущая версия вашего проекта

procedure Form1_OnShow (Sender: TObject; Action: string);
var
  tmpTimer:TTimer;
begin
  // создаем таймер на 5 минут
  tmpTimer := TTimer.Create(Application);
  tmpTimer.OnTimer := @OnTimer;
  tmpTimer.Interval := 1000*60*5;  // 5 минут
  tmpTimer.Enabled := True;
  // первая проверка при запуске программы
  OnTimer(tmpTimer);
end;

procedure OnTimer(Sender: TObject);
var
    s: string;
begin
    s := HTTPGet('http://yoursite.com/version.txt');
    if ValidInt(s) then
    begin
        if StrToInt(s) > VERSION then
        begin
            TTimer(Sender).Enabled := False;
            ShowMessage('У Вас не актуальная версия программы, обратитесь к разработчику');
            Form1.Close;
        end;
    end;
end;