🚀 go-pugleaf

> Czy ktoś orientuje się jak umożliwić w programie wołanie Dźwięki z
> Control Panel? Tak się składa, że jest to ukryte w ramach MMSYS.CPL
> stąd nie ma bezpośredniego dojścia.

Przesylam fragment obszerniejszego dokumentu jaki teraz przygotowuje (DelphiFAQ):


PROBLEM: 
Jak z poziomu aplikacji uruchomić wybrany element z Panelu Sterowania systemu Windows 95?

ROZWIĄZANIE 1:
Najprostszym sposobem jest uruchomienie programu 'control.exe' z odpowiednim parametrem. Dla przykładu weźmy ustawienia elementu Multimedia, czyli plik 'mmsys.cpl'. Aby tego dokonać należy wywołać funkcję ShellExecute  (moduł ShellAPI):
            ShellExecute(Form1.Handle, 'open', 'control.exe', 'mmsys.cpl', '' ,SW_SHOW);
gdzie  Form1  to nazwa naszego okienka, a  mmsys.cpl  to nazwa żądanego przez nas elementu. Aby poznać dokładniejszy opis funkcji ShellExecute zapoznaj się z dokumentacją zawartą w Plikach Pomocy Delphi.


ROZWIĄZANIE 2:
Innym sposobem jest uruchomienie programu `rundll32.exe', podając mu jako parametr bibliotekę `shell32.dll' stanowiącą bazę Panelu Sterowania. Jego przewagą jest fakt, że możemy podać numer zakładki, która ma zostać automatycznie uaktywniona po wyświetleniu okienka dialogowego. Program ten również wywołujemy przy pomocy funkcji ShellExecute:

            ShellExecute(Form1.Handle, 'open', 'rundll32.exe', 'shell32.dll,Control_RunDLL mmsys.cpl,,NR_ZAKLADKI', '', SW_SHOW);

gdzie  Form1  to nazwa naszego okienka, a  mmsys.cpl  to nazwa żądanego przez nas elementu. Zmienna NR_ZAKLADKI określa zakładkę jaka zostanie automatycznie uaktywniona, przy czym liczenie rozpoczyna się od 0.


_________________________
 f e n R i s  
 fenris@polbox.com
 "There is no life exept the death"

On Sun, 14 Sep 1997 22:49:13 GMT, in pl.comp.lang.delphi
ZmieńNa_trzcionk@us.edu.pl (Piotr Trzcionkowski) wrote:

>
>Czy ktoś orientuje się jak umożliwić w programie wołanie Dźwięki z
>Control Panel? Tak się składa, że jest to ukryte w ramach MMSYS.CPL
>stąd nie ma bezpośredniego dojścia.
Głowy że to pomoże to ja nie dam ale... Jest w Win95/NT4 komunikat
WM_CPL_LAUNCH, który w zasadzie chyba robi to co chcesz. Tylko musisz
najpierw uruchomić Control Panel, ale to nie jest problem. Oto opis:

 
WM_CPL_LAUNCH 
hwnd = (HWND) wParam;          // handle of sending window 
lpszAppName = (LPSTR) lParam;  // application-name string 
 
  
An application sends the WM_CPL_LAUNCH message to Windows Control Panel to
request that a Control Panel application be started. 

Parameters

hwnd
Value of wParam. Specifies the handle of the window sending the message. The
WM_CPL_LAUNCHED message is sent to this window. 

lpszAppName
Value of lParam. Specifies a far pointer to a string containing the name of
the Control Panel application to open. 

Return Value
If the application starts, the return value is TRUE; otherwise, it is FALSE.


HTH
Hobbit

--
--------------------------------- >>> replying cut nospam from my address
Krzysztof Swiatkowski - Lodz      >>> odpowiadajac usun nospam z adresu
e-Mail:  hobbit@dom.vr.pl.nospam [lub] hobbit@priv.onet.pl.nospam

"No! Try not. Do. Or do not.
There is no try." - Yoda the Jedi
__________________________________

Thu, 18 Sep 1997 07:16:34 +0200, hobbit@dom.vr.pl.nospam (Krzysztof
Swiatkowski) napisa�(a):

>No dobrze to ja to troszk� sprecyzuj�:
>
>chodzi o wywo�anie w postaci og�lnej:
>
>rundll32.exe shell32.dll,Control_RunDLL [nazwa_pliku_cpl],
>  @[numer_apletu_w_pliku_cpl],[zak�adka_w_aplecie]
>
>ma�pa przed numerem jest istotna, a numer jest liczony od 0
>st�d te� poniewa� "D�wi�ki" s� drugim apletem w mmsys.cpl ich wywo�anie ma
>posta�:
>
>rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,@1

O to w�a�nie biega�o. Rodzi si� tylko pytanie sk�d to wzi��e�...

>
>Oczywi�cie spos�b uruchomienia jest nieistotny, ja u�ywam WinExec bo
>najprostsze chocia� obsolete :-)

Swoj� drog� u�ywaj�c z programu przyda�oby si� otwiera� applet
bardziej bezpo�rednio np. jako dialog i to na pewno nie jest
"obsolete":-)


pzdrwm
Piotr Trzcionkowski
tel. +48 (32) 2-284-907
http://www.cto.us.edu.pl/~trzcionk/

On 17 Sep 1997 17:56:00 GMT, in pl.comp.lang.delphi "fenRis"
<fenris@polbox.com> wrote:

>> Czy ktoś orientuje się jak umożliwić w programie wołanie Dźwięki z
>> Control Panel? Tak się składa, że jest to ukryte w ramach MMSYS.CPL
>> stąd nie ma bezpośredniego dojścia.
>
>Przesylam fragment obszerniejszego dokumentu jaki teraz przygotowuje
>(DelphiFAQ):
>
>
>PROBLEM: 
>Jak z poziomu aplikacji uruchomić wybrany element z Panelu Sterowania 
>systemu Windows 95?
>
>ROZWIĄZANIE 1:
>Najprostszym sposobem jest uruchomienie programu 'control.exe' z 
>odpowiednim parametrem. Dla przykładu weźmy ustawienia elementu Multimedia
>, czyli plik 'mmsys.cpl'. Aby tego dokonać należy wywołać funkcję 
>ShellExecute  (moduł ShellAPI):
>ShellExecute(Form1.Handle, 'open', 'control.exe', 'mmsys.cpl', '' ,SW_SHOW);
>gdzie  Form1  to nazwa naszego okienka, a  mmsys.cpl  to nazwa żądanego 
>przez nas elementu. Aby poznać dokładniejszy opis funkcji ShellExecute 
>zapoznaj się z dokumentacją zawartą w Plikach Pomocy Delphi.
>
>ROZWIĄZANIE 2:
>Innym sposobem jest uruchomienie programu `rundll32.exe', podając mu jako 
>parametr bibliotekę `shell32.dll' stanowiącą bazę Panelu Sterowania. Jego
>przewagą jest fakt, że możemy podać numer zakładki, która ma zostać
>automatycznie uaktywniona po wyświetleniu okienka dialogowego. Program ten
>również wywołujemy przy pomocy funkcji ShellExecute:
>
> ShellExecute(Form1.Handle, 'open', 'rundll32.exe', 
>  'shell32.dll,Control_RunDLL mmsys.cpl,,NR_ZAKLADKI', '', SW_SHOW);
>
>gdzie  Form1  to nazwa naszego okienka, a  mmsys.cpl  to nazwa żądanego
>przez nas elementu. Zmienna NR_ZAKLADKI określa zakładkę jaka zostanie
>automatycznie uaktywniona, przy czym liczenie rozpoczyna się od 0.


No dobrze to ja to troszkę sprecyzuję:

chodzi o wywołanie w postaci ogólnej:

rundll32.exe shell32.dll,Control_RunDLL [nazwa_pliku_cpl],
  @[numer_apletu_w_pliku_cpl],[zakładka_w_aplecie]

małpa przed numerem jest istotna, a numer jest liczony od 0
stąd też ponieważ "Dźwięki" są drugim apletem w mmsys.cpl ich wywołanie ma
postać:

rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,@1

Oczywiście sposób uruchomienia jest nieistotny, ja używam WinExec bo
najprostsze chociaż obsolete :-)

i to by było na tyle
Hobbit

--
--------------------------------- >>> replying cut nospam from my address
Krzysztof Swiatkowski - Lodz      >>> odpowiadajac usun nospam z adresu
e-Mail:  hobbit@dom.vr.pl.nospam [lub] hobbit@priv.onet.pl.nospam

"Najlepiej uniknac nieporozumien
nie porozumiewajac sie" - S.J. Lec
__________________________________

On Thu, 18 Sep 1997 22:56:11 GMT, in pl.comp.lang.delphi
Zmie�Na_tr...@us.edu.pl (Piotr Trzcionkowski) wrote:

>Thu, 18 Sep 1997 07:16:34 +0200, hobbit@dom.vr.pl.nospam (Krzysztof
>Swiatkowski) napisa�(a):
>
>>No dobrze to ja to troszk� sprecyzuj�:
>>
>>chodzi o wywo�anie w postaci og�lnej:
>>
>>rundll32.exe shell32.dll,Control_RunDLL [nazwa_pliku_cpl],
>>  @[numer_apletu_w_pliku_cpl],[zak�adka_w_aplecie]
>>
>>ma�pa przed numerem jest istotna, a numer jest liczony od 0
>>st�d te� poniewa� "D�wi�ki" s� drugim apletem w mmsys.cpl ich wywo�anie ma
>>posta�:
>>
>>rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,@1
>
>O to w�a�nie biega�o. Rodzi si� tylko pytanie sk�d to wzi��e�...
Microsoft Knowledge Base
"How to Start a Control Panel Applet in Windows 95"
PSS ID Number: Q135068
Article last modified on 08-16-1995

>>
>>Oczywi�cie spos�b uruchomienia jest nieistotny, ja u�ywam WinExec bo
>>najprostsze chocia� obsolete :-)
>
>Swoj� drog� u�ywaj�c z programu przyda�oby si� otwiera� applet
>bardziej bezpo�rednio np. jako dialog i to na pewno nie jest
>"obsolete":-)
By� mo�e tak ale to by by�o s�abo rozszerzalne,a zauwa� �e mo�na napisa�
w�asny applet do Control Panelu i wtedy musia�oby by� wi�cej standardowych
punkt�w wejscia do apletu, a tak jest tylko jeden i spok�j. Robisz zwyk�y
dialog bez �adnej cudowanej obs�ugi, a jedyne co musisz dostarczy� to
funkcja do gadania z control panelem. :-)

Hobbit

--
--------------------------------- >>> replying cut nospam from my address
Krzysztof Swiatkowski - Lodz      >>> odpowiadajac usun nospam z adresu
e-Mail:  hobbit@dom.vr.pl.nospam [lub] hobbit@priv.onet.pl.nospam

"GPF is registered trademark of Microsoft"
__________________________________