??如何把自己的程序加入到开始菜单里??
解决方案 »
- 求32*32点阵字库
- 为什么RegisterClass全不起作用(紧急求助!!!!)
- 500分!!急……怎么样把全屏的游戏窗体设置成为自己程序的父窗体
- 刚学delphi,希望得到指点~~~
- 运行错误提示:File not found: 'GIF89Lib_TLB.dcu'怎么解决?
- 告别苦闷的生活,明天上路....
- 为什么GB2312转换到UTF8,中文全部变为问号?
- 在delphi程序中怎么关闭其它正在运行的程序(WORD,EXCEL等)
- 请各位发表一下学习Delphi时应当注意的问题!!
- delphi中有没有类似vb中split的函数
- 强烈建议CSDN能够贴图!!!!支持有分,UP有分
- 哪有Delphi6下载?在线给分!
2 你可以将你的程序的会计方式考到系统目录program里
...
uses ShlObj;
...procedure TForm1.Button2Click(Sender:TObject);
begin
if OPd1.Execute then
edit1.Text:=Opd1.FileNmae;
end;SHAddToRecentDocs(SHARD_PATH,PChar(Edit1.text));//这个是增加
SHAddToRecentDocs(SHARD_PATH,nil);//这是取消