Åbning af kontrolpanel(m.f.)-mappen

her er lidt blandet muligheder

Kontrolpanel:


Running Up Control Panel:
procedure TForm1.ToolButton3Click(Sender: TObject);
begin
    WinExec('Rundll32 Shell32.dll, Control_RunDLL', SW_SHOW);
end;

Running Up The Windows 95 Screensaver Options Dialog:
procedure TForm1.ScreenSaverClick(Sender: TObject); 
begin 
    WinExec('rundll32 shell32.dll,Control_RunDLL desk.cpl,,1',SW_SHOW); 
end;

Running Up Windows 95 Calculator:
procedure TForm1.CalcClick(Sender: TObject); 
begin 
    WinExec('C:\WINDOWS\CALC.EXE', SW_SHOWNormal); 
end;

Multimedia Properties - Audio:
procedure TForm1.AudioClick(Sender: TObject);
begin
    WinExec('rundll32 shell32.dll,Control_RunDLL MMSys.cpl,,0',SW_SHOW);
end;

Multimedia Properties - Video:
procedure TForm1.VideoClick(Sender: TObject);
begin
    WinExec('rundll32 shell32.dll,Control_RunDLL MMSys.cpl,,1',SW_SHOW);
end;

Multimedia Properties - Midi:
procedure TForm1.MidiClick(Sender: TObject);
begin
    WinExec('rundll32 shell32.dll,Control_RunDLL MMSys.cpl,,2',SW_SHOW);
end;

Multimedia Properties - CD Music:
procedure TForm1.CDMusicClick(Sender: TObject);
begin
    WinExec('rundll32 shell32.dll,Control_RunDLL MMSys.cpl,,3',SW_SHOW);
end;

Display Properties - Background:
procedure TForm1.BackgroundClick(Sender: TObject);
begin
    WinExec('rundll32 shell32.dll,Control_RunDLL desk.cpl,,0',SW_SHOW); 
end;

Mange tak stone, igen igen.