Sunday, June 25, 2006

Otevření zadaného adresáře v Průzkumníku Windows

Průzkumník Windows. Možná jedna z prvních aplikací, na kterou začali uživatelé po vydání Windows 95 nadávat (tedy někteří; obzvláště ti, co byli zvyklí na klasický dvojitý panel jako má NC). Někdy se nám může v našich aplikacích hodit umět otevřít danou složku právě v Průzkumníkovi (jako standardní aplikaci pro práci se soubory ve Windows) a umožnit tak třeba uživateli provést nepřímo některé drobné úpravy, pokud to není zrovna "náplní práce" naší aplikace či zkrátka z jakéhokoliv jiného důvodu. Následující funkce, jejímž jediným parametrem je adresář, to zařídí:
.
.
.
uses ShellApi;
.
.
.

procedure UkazSlozku(Slozka : string);
begin
ShellExecute(Application.Handle, PChar('explore'), PChar(Slozka), nil, nil, SW_SHOWNORMAL);
end;