Systemsteuerung (Drucker und Faxgeräte) aufrufen???

[max666]

Hallo!

Weiß jemand, wie man das Fenster "Drucker und Faxgeräte" aus der Systemsteuerung aufruft.

Gruß aus dem Emsland.
Max666

[SirThornberry]

zieh dir ne verknüpfung von dem ding und starte diese. Oder mach ne verknüpfung und guck dann rein was die aufruft

[Andreas L.]

Hi,
das kannst du so machen:

Delphi-Quellcode:

uses ..., ShellAPI;



procedure Systemoptions(wnd: HWND; Applet: String); 
begin 
  ShellExecute(wnd,'open','rundll32.exe', 
    pchar('shell32.dll,Control_RunDLL ' + Applet), 
    nil,SW_SHOWNORMAL); 
end;


//Aufruf:
procedure TForm1.Button1Click(Sender: TObject);
begin
Systemoptions(self.Handle,'appwiz.cpl');
end;

Folgende Systemsteurungsapplikationen kannst du aufrufen:

access.cpl
appwiz.cpl
desk.cpl
intl.cpl
joy.cpl
main.cpl
mmsys.cpl
modem.cpl
sysdm.cpl
timedate.cpl

Gibt zwar noch ein paar, aber ich weiß jetzt nicht wie die heißen.

Greetz

[Nightshade]

Zitat:

Open the Printers folder:

RUNDLL32 SHELL32.DLL,Control_RunDLL MAIN.CPL @2

or for Windows 2000:
RUNDLL32 SHELL32.DLL,SHHelpShortcuts_RunDLL PrintersFolder

Credits: Pascal Rebsamen

Note: To create a shortcut in the Start Menu to open the Printers folder, create a directory using one of the following commands.

Windows 9x (without roaming profiles):
MD "%windir%\Start Menu\Programs\Printers.{2227A280-3AEA-1069-A2DE-08002B30309D}"

Windows NT 4/2000:
MD "%USERPROFILE%\Start Menu\Programs\Printers.{2227A280-3AEA-1069-A2DE-08002B30309D}"

Guck mal auf dieser Seite.

Dann einfach mit shellexecute aufrufen.

Sollte dir weiterhelfen.

[max666]

Hallo Leute!

Danke für die zahlreichen und sehr schnellen Antworten.

Der Tip von Nightshade hat jedoch ins Schwarze getroffen.
Den Folder "Drucker und Faxgeräte" kann man wie folgt öffnen.

-----------
var slCmdLine: PAnsiChar;

...
slCmdLine := 'SHELL32.DLL,SHHelpShortcuts_RunDLL PrintersFolder';
ShellExecute(handle, nil, 'rundll32.exe', slCmdLine, 0, SW_SHOWNORMAL);
-----------

Danke an euch alle!

Gruß
Max666