Naja, im Grunde Datum des ersten Starts merken und in eine Datei speichern. Wenn der Wert in der Datei schon vorhanden ist, auslesen und von dem neuen Startdatum abziehen.
Delphi-Quellcode:
var
DatumAlt,
DatumNeu: TDateTime;
Ini: TIniFile;
Tage: Integer;
begin
Ini := TIniFile.Create ('...\Pfad\Datei.ini');
DatumAlt := Ini.ReadFloat ('Allgemein', 'LastStart', 0);
DatumNeu := Now;
if (DatumAlt <> 0) then
Tage := Trunc (DatumNeu - DatumAlt)
else Tage := 0;
Ini.WriteFloat ('Allgemein', 'LastStart', DatumNeu);
FreeAndNil (Ini);
if (Tage > 0) then
ShowMessage ('Das Programm wurde vor ' + inttostr (Tage) + ' Tagen das letzte mal gestartet.');
end;
(Nicht getestet)