我装了delphi7,xp菜单不知怎么用,tstringlist,出错,不知怎么搞(100分)

X

xzfyes2

Unregistered / Unconfirmed
GUEST, unregistred user!
我装了delphi7,xp菜单不知怎么用,tstringlist,出错,不知怎么搞
 
在程序目录下增加一文件 文件名为 AppName.exe.manifest
其中AppName.exe为你的主执行程序名

文件内容如下:

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity version="1.0.0.0" processorArchitecture="X86" name="AmazeSoft.FlashGet.DownloadManager" type="win32" />
<description></description>
<dependency>
<dependentAssembly>
<assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="X86" publicKeyToken="6595b64144ccf1df" language="*" />
</dependentAssembly>
</dependency>
</assembly>
 
在Delphi 7 中的XP控件 只能够在Win XP中显示才会正常,abc_xp的代码意思是在你的程序运行时
提示用户下载MS的一个控件更新一下系统!我没试过:)
 
TActionManager 和 TActionMainMenuBar 一起使用,它们在 Additional 控件页,
不过它们使用 TAction 构建菜单,也就是说所有的菜单项都是 TAction,
还有我刚问到 TAction 如果不加 OnEexecute 事件是无效的,做法如下:

procedure TfrmMain.actFileExecute(Sender: TObject);
begin
; // 加个分号,不影响程序,过后再加入处理程序
end;

好了!
 

Similar threads

顶部