...einen Bildschirmschoner programmieren?

{
To develop a screensaver you have to pay attention to the
following things:

A screensaver has two modes: configuration and running mode
A screensaver has the prefix .scr and not .exe !
But it is identical to a normal program.

Windows starts the program with the parameter /c to
configure the screensaver and with /s to run the screensaver.
}

{
Um einen Bildschirmschoner zu programmieren, muss man folgendes beachten:

Ein Bildschirmschoner kann gestartet oder konfiguriert werden!
Ausserdem hat er die Endung .scr und nicht .exe !
Er ist aber mit einem Programm identisch!

Windows startet das Prgramm mit dem Parameter /c um ihn zu
konfigurieren und mit /s um ihn zu starten.
}





procedure TForm1.FormCreate(Sender: TObject);
begin
  if ParamCount > 0 then
  begin
    if ParamStr(1) = '/c' then
    begin
      {start configuration form}
    end
    else
    begin
      if ParamStr(1) = '/s' then
      begin
        {start screensaver}
      end;
    end;
  end;
end;

printed from
www.swissdelphicenter.ch
developers knowledge base