Wann wurde meine Anwendung gestartet?

Question

Was ist die Funktion, um Datum und Uhrzeit zu erhalten, zu der eine Anwendung ausgeführt wurde? Ich benutze Delphi.

Answer 1

Sie können den Windows-API-Aufruf GetProcessTimes (in Windows.pas deklariert), um Details für jeden Prozess zu erhalten.

Wenn es Ihre Anwendung, würde ich wahrscheinlich die Startzeit selbst bekommen und es irgendwo einzuloggen eine Geschichte zu halten.

Answer 2

Ich bin mir nicht sicher, ob es dafür eine Funktion oder einen API-Aufruf gibt. Aber Sie können es ziemlich leicht vortäuschen. Erstellen Sie eine Einheit, die wie folgt aussieht:

unit AppStartTime; 

interface 

function GetAppStartTime: TDateTime; 

implementation 
uses 
    SysUtils; 

var 
    fStartTime: TDateTime; 

function GetAppStartTime: TDateTime; 
begin 
    result := fStartTime; 
end; 

initialization 
    fStartTime := Now; 

end. 

Fügen Sie es zu Ihrem DPR verwendet Liste, an der Spitze, entweder zuerst oder unmittelbar nach etwas, dass „auf der Liste zuerst sein muss“, wie ein benutzerdefinierten Speicher Manager.

Answer 3

Sie können Ihre App einloggen die Startzeit in eine Textdatei oder Datenbank entweder in der DPR-Datei oder in Ihrem Hauptformular OnCreate() Veranstaltung. Sie können Delphis Now() - Funktion verwenden, um das aktuelle Datum und die aktuelle Uhrzeit abzurufen, und sie mit FormatDateTime() oder DateTimeToStr() als Zeichenfolge zu formatieren, je nachdem, was genau Sie tun möchten.

Der folgende Code speichert das Startdatum und die Zeit während der Konstruktor der Hauptform in eine Textdatei im selben Ordner wie die Anwendung selbst StartDateTime.txt genannt:

procedure TForm1.FormCreate(Sender: TObject); 
var 
    SL: TStringList; 
begin 
    SL := TStringList.Create; 
    try 
    SL.Add(FormatDateTime('mm/dd/yyyy hh:nn:ss', Now()); 
    SL.SaveToFile(ExtractFilePath(ParamStr(0)) + 'StartDateTime.txt'); 
    finally 
    SL.Free; 
    end; 
end; 

Answer 4

Verwenden NtQuerySystemInformation mit dem SystemProcessInformation informationclass, gibt diese eine Reihe von SYSTEM_PROCESSES Strukturen (Records), von denen die Create die genaue Uhrzeit enthält, wenn die Anwendungen gestartet wurde:

_SYSTEM_PROCESSES = record // Information Class 5 
    NextEntryDelta: ULONG; 
    ThreadCount: ULONG; 
    Reserved1: array[0..5] of ULONG; 
    CreateTime: LARGE_INTEGER; 
    UserTime: LARGE_INTEGER; 
    KernelTime: LARGE_INTEGER; 
    ProcessName: UNICODE_STRING; 
    BasePriority: KPRIORITY; 
    ProcessId: ULONG; 
    InheritedFromProcessId: ULONG; 
    HandleCount: ULONG; 
    // next two were Reserved2: array [0..1] of ULONG; thanks to Nico Bendlin 
    SessionId: ULONG; 
    Reserved2: ULONG; 
    VmCounters: VM_COUNTERS; 
    PrivatePageCount: ULONG; 
    IoCounters: IO_COUNTERSEX; // Windows 2000 only 
    Threads: array[0..0] of SYSTEM_THREADS; 
    end; 
    SYSTEM_PROCESSES = _SYSTEM_PROCESSES; 
    PSYSTEM_PROCESSES = ^SYSTEM_PROCESSES; 
    TSystemProcesses = SYSTEM_PROCESSES; 
    PSystemProcesses = PSYSTEM_PROCESSES; 

Wir haben bereits all dies übersetzt in die Jedi Apilib (JwaNative)