Mouse Bewegung überprüfen

[Nils_13]

Hi,

1. der Code läuft nicht (der Code erfüllt nicht den Sinn für einen Bildschirmschoner)
2.

Delphi-Quellcode:

if ParamCount > 0 then begin
  if ParamStr(1) = '/c' then
  else if ParamStr(1) = '/s' then
  else  Application.Terminate;
end else   Application.Terminate;

wird leider wie der code von Airblader sofort geschlossen zumindest bei mir, das Create Ereignis benötigt man sowieso für den Bildschirmschoner, weil man ihn sonst nicht in den Desktop-Eigenschaften auswählen kann.