| Kojarzenie typu pliku ze swoją aplikacją |
|
|
| Napisał: Berl | ||
| piątek, 31 marzec 2006 | ||
|
Czasem chcielibyśmy, aby po kliknięciu na plik z danym rozszerzeniem otwierał się on automatycznie w napisanej przez nas aplikacji. W tym celu musimy stworzyć odpowiednie klucze w rejestrze, odpowiadające za skojarzenie rozszerzenia z naszą aplikacją przez system operacyjny. Najpierw musimy otworzyć klucz główny HKEY_CLASSES_ROOT. Następnie otwieramy (lub tworzymy) w nim klucz o nazwie naszego rozszerzenia (z kropką), czyli na przykład .ext . Potem pod domyślną wartością ciągu zapisujemy ciąg ext_auto_file. Zamykamy ten klucz i możemy przejść do następnego kroku. Następnie otwieramy lub tworzymy klucz ext_auto_file\shell\open\command, a pod domyślną wartością ciągu zapisujemy ciąg ze ścieżką do naszej aplikacji oraz znakiem %1. Następnie zamykamy ten klucz, i od tej pory po kliknięciu na plik z rozszerzeniem .ext będzie otwierana aplikacja o podanej przez nas ścieżce. W Delphi zapis odpowiednich wartości do rejestru może wyglądać tak : procedure TForm1.Button1Click(Sender: TObject); var Reg : TRegistry; begin Reg := TRegistry.Create; Reg.RootKey := HKEY_CLASSES_ROOT; Reg.OpenKey('.ext', True); Reg.WriteString('', 'ext_auto_file'); Reg.CloseKey; Reg.OpenKey('ext_auto_file\shell\open\command', True); Reg.WriteString('', 'D:\aaa\Project1.exe %1'); Reg.CloseKey; Reg.Free; end;Oczywiście nie można zapomnieć o dodaniu modułu Registry do sekcji Uses. Teraz musimy przystosować naszą aplikację do otwierania pliku podanego w argumencie wywołania. Do tego celu można użyć funkcji ParamStr z modułu System.
Aby dodać komentarz zaloguj się. Jeśli nie masz konta, załóż je sobie. |
||
| wstecz | dalej » |
|---|
