Aktív témák

• #3 stratos csendes tag Diskcopy #2

  2005-10-23 11:16:18 #3

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  stratos

  csendes tag

  válasz Diskcopy #2 üzenetére

  Ezer hála és köszönet,
  valamint bocsánat a rossz topikért...

• #2 Diskcopy tag stratos #1

  2005-10-23 10:10:32 #2

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Diskcopy

  tag

  válasz stratos #1 üzenetére

  Már van delphi topic, jobb lenne ha oda írnál....
  Amúgy meg:
  uses
  Inifiles, ShellApi;
  
  procedure TForm1.Button1Click(Sender: TObject);
  var
  Ini: TInifile;
  ScreenSaverFile: string;
  
  function GetLongFileName(const FileName: string): string;
  var
  aInfo: TSHFileInfo;
  begin
  if SHGetFileInfo(PChar(FileName), 0, aInfo, SizeOf(aInfo), SHGFI_DISPLAYNAME) <> 0 then
  Result := string(aInfo.szDisplayName)
  else
  Result := FileName;
  end;
  
  begin
  Ini := TInifile.Create('system.ini');
  ScreenSaverFile := GetLongFileName(Ini.Readstring('boot', 'SCRNSAVE.EXE', 'Not Available'));
  Ini.Free;
  label1.Caption := ScreenSaverFile;
  end;
  
  Innen: Bővebben: link
  Ezzel megkapod a nevét,utánna meg start kerepnyokimeloneve.scr /s
  azt meg utánna shellexecute-al elindítod.
  ShellExecute(Form1.Handle, nil, 'akarmi.exe',
  'paraméterek', nil, SW_SHOWMAXIMIZED); Innentől már megoldható.
  

• #1 stratos csendes tag

  2005-10-23 09:35:49 #1

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  stratos

  csendes tag

  Segítségre lenne szükségem...
  
  Delphiben készítenék egy ''azonnal jövök'' gombot ami zárolja a programot, és jelszót kér a folytatáshoz, ezzel egyidőben (illetve pár másodperces időzítéssel az egértologatás, stb. miatt) szeretném elindítani ''direktbe'' a windows alapértelmezett képernyőkímélőjét.
  Hogyan tehetem ezt meg? (mármint a start screensavert )
  
  Előre is köszi::
  
  
  [Szerkesztve]

Aktív témák