Jak to zrobić??
Prosze o jakiś kod bo nie wiem
Zapytać użytkownika?
Przeszukać cały dysk w poszukowaniu firefox.exe?
Zobaczyć czy Fx jest domyślną przeglądarką WWW i podążyć za ścieżką domyślnej przeglądarki (pewnei to gdzieś w rejestrze jest)?
Poszukać skrótów do "Mozilla Firefox" i zobaczyć dokąd prowadzą?
I pewnie inne możliwości, być może inteligentniejsze ;)
Być może poszukać w rejestrze. Tam są na pewno jakieś ścieżki.
Dla Win 98:
A ja proponuję uruchomić FireFoxa jeśli jest domyślną przeglądarką za pomoca ShellExecute, potem zrobić liste uruchomionych programów i zapisać ją gdzieś, a następnie odczytać z listy skąd jest FireFox uruchomiony
var
FireFox:string;
begin
FireFox:='www.wp.pl';
ShellExecute(handle,'open',Pchar(FireFox),nil,nil,sw_showdefault);
end;
a lista plików uruchomionych to chyba tak
<dla listbox1:tlistbox="ListBox1:TListBox">
var
_HWND : THandle;
Proc : TProcessEntry32;
begin
_HWND := CreateToolHelp32SnapShot(TH32CS_SNAPALL,0);
Proc.dwSize:=SizeOf(Proc); // okresl rozmiar struktury
if Integer(Process32First(_HWND, Proc)) <> 0 then
repeat
ListBox1.Items.Add(Proc.szExeFile); // dodaje sciezkie pliku do ListBox'a
showMessage(ExtractFileDir(Proc.szExeFile));
// to nie zadziała pod Windows XP, pod Win 98 tak
until Integer(Process32Next(_HWND, Proc)) = 0; // dopoki wartosc nie osiagnie 0
CloseHandle(_HWND);
end;
a potem zabić proces 'FireFox.exe' jak już otrzymamy ścieżke dostępu
mozna sprawdzic aplikacje skojarzona z plikiem *.htm
albo <ort>przejzec </ort>klucz
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
ale nie wiem dokladnie jak to jest z rejestrem w przypadku ffx...