How to build the relation of one Extention name? (just like *.txt->Notepad)?

[dycdyc123]

[smartboyme]

写注册表啊！

[dycdyc123]

smartboyme(小东): Are you mailed ????(@~@)
How to realize with BCB???

[wjzhuang]

问题太模糊,不太明白!

[smartboyme]

我想他是要问怎么设置文件的默认打开程序！

[dycdyc123]

我想他是要问怎么设置文件的默认打开程序!
Yes!
How to realize with bcb??

[cabbagebai]

什么叫设置文件的默认打开程序？
用BCB不是直接在你自己的程序中打开吗?

[wjzhuang]

两种方法:
1.修改注册表(可惜我不知道在那里修改)
2.把原来的程序覆盖掉,比如写一个notepad覆盖windows自带的notepad

[smartboyme]

//这是VC下的设置open with .exe txt的代码，就是直接对注册表进行操作，是sdk的，
//你可以参考一下。要忙点别的事，我没有时间为你改写，抱歉！
BOOL StdEnableShellOpen（ UINT uExtension, UINT uAppName)
{
TCHAR szExtension[EXT_MAX]="";
TCHAR szSubKey[CCH_MAX]="";
TCHAR szKeyValue[CCH_MAX]="";
TCHAR szAppFullName[CCH_MAX]="";
TCHAR szAppName[CCH_MAX]="";
TCHAR szFileKey[CCH_MAX]="";
HKEY hKey;
DWORD dw;

LoadString(g_hInstance,uExtension,szExtension,sizeof(szExtension));

ZeroMemory(szSubKey,sizeof(szSubKey));
*szSubKey='.';
lstrcat(szSubKey,szExtension);
hKey=StdRegCreateKey(HKEY_CLASSES_ROOT,szSubKey,&dw);
RETURN_0_IF_0(hKey);

if (REG_OPENED_EXISTING_KEY==dw)
{
StdRegReadString(hKey,NULL,szKeyValue);
}
else
{
ZeroMemory(szKeyValue,sizeof(szKeyValue));
lstrcpy(szKeyValue,szExtension);
lstrcat(szKeyValue,"file");
lstrcpy(szFileKey,szKeyValue);
StdRegWriteString(hKey,NULL,szKeyValue);
}
RegCloseKey(hKey);
lstrcpy(szKeyValue,"txtfile");

ZeroMemory(szSubKey,sizeof(szSubKey));
lstrcpy(szSubKey,szKeyValue);
hKey=StdRegCreateKey(HKEY_CLASSES_ROOT,szSubKey,&dw);
RETURN_0_IF_0(hKey);
RegCloseKey(hKey);

StdGetAppFullName(szAppFullName);

lstrcat(szSubKey,"\\DefaultIcon");
hKey=StdRegCreateKey(HKEY_CLASSES_ROOT,szSubKey,&dw);
RETURN_0_IF_0(hKey);
if (REG_CREATED_NEW_KEY==dw)
{
lstrcpy(szKeyValue,szAppFullName);
lstrcat(szKeyValue,",0");
StdRegWriteString(hKey,NULL,szKeyValue);
}
RegCloseKey(hKey);

lstrcpy(szSubKey,szKeyValue);
lstrcat(szSubKey,"\\Shell");
hKey=StdRegCreateKey(HKEY_CLASSES_ROOT,szSubKey,&dw);
RETURN_0_IF_0(hKey);
ZeroMemory(szKeyValue,sizeof(szKeyValue));
if (REG_OPENED_EXISTING_KEY==dw)
{
StdRegReadString(hKey,NULL,szKeyValue);
}
if ('\0'==*szKeyValue)
{
lstrcpy(szKeyValue,"Open_with");
LoadString(g_hInstance,uAppName,szAppName,sizeof(szAppName));
lstrcat(szKeyValue,szAppName);
StdRegWriteString(hKey,NULL,szKeyValue);
}
RegCloseKey(hKey);

lstrcat(szSubKey,"\\");
lstrcat(szSubKey,szKeyValue);
lstrcat(szSubKey,"\\Command");
hKey=StdRegCreateKey(HKEY_CLASSES_ROOT,szSubKey,&dw);
RETURN_0_IF_0(hKey);
lstrcpy(szKeyValue,szAppFullName);
lstrcat(szKeyValue," %1");
StdRegWriteString(hKey,NULL,szKeyValue);
RegCloseKey(hKey);

return TRUE;
}

[dycdyc123]

OK!
Thanks!

[smartboyme]

这样的做法比较复杂点，但是我觉得可能比较好！
其实最简单的就是修改HKEY_CLASSES_ROOT\txtfile\shell\open\command下的项了
当然是针对.txt文件了。