Einzelnen Beitrag anzeigen

nuclearping

Registriert seit: 7. Jun 2008
708 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#10

AW: Prüfen ob mein Programm bereits läuft

  Alt 25. Jun 2014, 21:47
Die OneInstance.pas nutzt du so:

In deiner DPR:
Delphi-Quellcode:
program ...;

uses
  ...,
  OneInstance.pas;

...

procedure NewInstance(ProcessId: Cardinal; CmdLine: String; var Allow: Boolean);
begin
  Allow := FALSE;
end;


begin
  NewInstProc := NewInstance;
  ...
end.
Steht aber auch in der Unit oben
Delphi-Quellcode:
// - Durch eine Zuweisung von OneInstance.NewInstProc kann eine Ereignis-
// prozedur definiert werden, welche beim Start einer neuen Anwendungsinstanz
// aufgerufen wird. Parameter:
// ProcessId: Die Prozess-ID der neuen Anwendungsinstanz
// CmdLine : Enthält Anwendungspfad sowie Startparameter
// Allow : Gibt an ob die Instanz gestartet werden
// soll. (Rückgabeparameter, Standard: False)
  Mit Zitat antworten Zitat