Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.12.19;
Скачать: [xml.tar.bz2];

Вниз

Как ассоцировать расширение файла с моей программой.   Найти похожие ветки 

 
maxXP   (2003-12-07 18:39) [0]

Как ассоциировать расширение файла с моей программой.


 
TUser   (2003-12-07 18:52) [1]

Регистрировать в реестре. Посмотри, как их описывают в HKLM\Software\classes


 
Dred2k   (2003-12-07 19:38) [2]

Примерно так:


function AppRegisterFileType(Ext : String; AppName : String; AppDesc : String; AppEXE : String; AppOpenParams : String; IconID : Integer) : Boolean;
var tmpReg : TRegistry;
begin
tmpReg := TRegistry.Create;
try
try
with tmpReg do begin
RootKey := HKEY_CLASSES_ROOT;
OpenKey(Ext, True);
WriteString("", AppName);
CloseKey;
OpenKey(AppName, True);
WriteString("", AppDesc);
CloseKey;
OpenKey(AppName + "\Shell\Open\Command", True);
WriteString("", AppEXE + " " + AppOpenParams);
CloseKey;
OpenKey(AppName + "\DefaultIcon", True);
WriteString("", AppEXE + "," + IntToStr(IconID));
CloseKey;
end;
Result := True;
except
Result := False;
end;
finally
tmpReg.Free;
end;
end;



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.12.19;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.007 c
11-61994
FOZi
2003-04-05 07:39
2003.12.19
Многопоточное приложение


4-62321
Turonix
2003-10-24 15:58
2003.12.19
Установка соединения Dial-up с Интернетом


1-62111
Vetal
2003-12-05 17:22
2003.12.19
Не работает связка Делфи<->СОМ-объект написанный на Visual Basic


3-61958
_noname_
2003-11-26 14:52
2003.12.19
Как, через ADO, открыть *.dbf файл?


14-62283
Serginio666
2003-11-19 19:29
2003.12.19
Delphi 8 - ПО под Win32 заканчивается на Delphi 7





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский