Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  2 questions about screensavers - run preview and check setup

    Delphi
    by WojTec, 5. Jun 2009
  1st question: I want to show preview of selected screensaver on some control (such as TPanel). I checked on MSDN how to do it. I wanted do it with ShellExecute():
  
  procedure TForm1.Button1Click(Sender: TObject);
  var
  P: string;
  begin
  Edit1.Text := ExtractShortPathName(Edit1.Text);
  P := Format('"%s" /p %d', );
  Edit2.Text := P;
  ShellExecute(Handle, 'open', PChar(P), nil, nil,...