System Delphi

//ozgurfidan@email.com tüm sorunlarınız için e mail atabilirsiniz
//www.sevgi.get.to
{
Exampels of AppletFileNames:
---------------------------------------------
Timedate.cpl : Time and date
Joy.cpl : Game controlers
Telephon.cpl : TAPI
bdeadmin.cpl : BDE administrator
odbccp32.cpl : 32 bit ODBC setup
directx.cpl : DirectX
Appwiz.cpl : Add and remove programs
Desk.cpl : Desktop and Screen
Inetcpl.cpl : Internet
Intl.cpl : International settings
Main.cpl : Mouse
Mmsys.cpl : Multimedia
Modem.cpl : Modem
Netcpl.cpl : Network
Password.cpl : Password
Powercfg.cpl : Power configuration
}
function RunControlPanelApplet(AppletFileName:string):Integer;
begin
Result:=WinExec(PChar('rundll32.exe shell32.dll,'+
'Control_RunDLL '+AppletFileName),SW_SHOWNORMAL);
end;
//ozgurfidan@email.com tüm sorunlarınız için e mail atabilirsiniz
//www.sevgi.get.to