Deinstalator systemu Windows

Jak uruchomić deinstalator w systemie Windows tzw. "Dodaj/Usuń programy"

tak nie działa:

ShellExecute(Handle, 'open', pchar('C:\Windows\System32\appwiz.cpl'), nil, nil, SW_SHOWNORMAL);

Mi działa bez problemu:

uses ShellApi;
...
ShellExecute(Handle, 'open', pchar('appwiz.cpl'), nil, nil, SW_SHOWNORMAL);

Jaki masz system? Wpisz w Start->Uruchom appwiz.cpl i zobacz czy nie wyrzuca błędu, jeżeli tak, to poszukaj apletu w Star->Wyszukaj

Cool_Programming napisał(a)

Mi działa bez problemu:

uses ShellApi;
...
ShellExecute(Handle, 'open', pchar('appwiz.cpl'), nil, nil, SW_SHOWNORMAL);

Nie działa... Dlaczego ?? nie wiem

Jaki masz system? Wpisz w Start->Uruchom appwiz.cpl i zobacz czy nie wyrzuca błędu, jeżeli tak, to poszukaj apletu w Star->Wyszukaj

XP Pro. Start/Uruchom i poszło pieknie !, ale nie przez Delphi, co może byc źle ???

U mnie też nie działało... ale wymyśliłem sposób:

ShellExecute(Handle, '', 'appwiz.cpl', nil, nil, SW_SHOWNORMAL);

Patyk napisał(a)

U mnie też nie działało... ale wymyśliłem sposób:

ShellExecute(Handle, '', 'appwiz.cpl', nil, nil, SW_SHOWNORMAL);

Hehe, no prosze DZIAŁA ! Dzięki Patyk ! :)