ShellNotifyIcon里面 szTip: array[0..63] of PAnsiChar;
我这么些为什么不行:procedure setShellIconHint(const strHint: String);
var
c: array[0..63] of AnsiChar;
i: Integer;
begin
for i := 0 to 63 do
begin
c[i] := strHint[i + 1];
end; Nid.szTip := c;
Shell_NotifyIcon(NIM_MODIFY, @Nid);
end;
我这么些为什么不行:procedure setShellIconHint(const strHint: String);
var
c: array[0..63] of AnsiChar;
i: Integer;
begin
for i := 0 to 63 do
begin
c[i] := strHint[i + 1];
end; Nid.szTip := c;
Shell_NotifyIcon(NIM_MODIFY, @Nid);
end;
解决方案 »
- 如何获取某个控件的光标图片,将它旋转后重新生成一个新的光标?
- dbgrid如何实现一行序号变更后,别行序号自动变更,并按序号重新排列?
- dbgrid怎么打印啊,我急着要啊,大哥,大姐麻烦拉!!小弟学Delphi才第三天啊!
- 如何在 ActiveX 中调用 COM 接口? ActiveX 用于 asp 网页
- 刚做完了这个产品,已发布了,感谢前些日子给予我帮助的朋友!谢谢!
- Drate(小虫)请来接1000分__5) 原贴:http://expert.csdn.net/Expert/topic/2227/2227167.xml?temp=.3559534
- 今晚打算搞次 Midas采鸟 版聚 晚上7点 ,大家感觉如何.摩托已经和小小商量好了,他不来的话,算他旷课 ^_^
- 急:三层开发,Delphi + EJB
- 多层中的变量
- 中关村要大裁员了,大家有什么感想进来谈谈吧! Welcome!
- 求传奇登录器源码或思路一份
- DBGRID中显示四个字段只对应数据库中的一个字段 如何实现?(着急ing)!
begin
szTip:=Pchar(strHint);
Shell_NotifyIcon(NIM_MODIFY, @Nid);
end;.............