托盘属性中sztip是什么类型的?怎么传递其值? ( 积分: 80 )

  • 主题发起人 主题发起人 lotomer
  • 开始时间 开始时间
L

lotomer

Unregistered / Unconfirmed
GUEST, unregistred user!
我想把他放在DLL中,但是不知道怎么传递参数
Procedure ShowInTray(ahandle,aicon:thandle;atopic:pchar);
var
MyTray:NOTIFYICONDATA;
begin
MyTray.cbSize:=sizeof(Mytray);
MyTray.Wnd:=ahandle;
MyTray.szTip:=atopic;//就是这里不能通过
MyTray.uFlags:=NIF_ICON+NIF_MESSAGE+NIF_TIP;
MYTray.uCallbackMessage:=WM_USER;
MYTray.hIcon:=aicon;
Shell_Notifyicon(NIM_ADD,@MYTray);
end;
 
我想把他放在DLL中,但是不知道怎么传递参数
Procedure ShowInTray(ahandle,aicon:thandle;atopic:pchar);
var
MyTray:NOTIFYICONDATA;
begin
MyTray.cbSize:=sizeof(Mytray);
MyTray.Wnd:=ahandle;
MyTray.szTip:=atopic;//就是这里不能通过
MyTray.uFlags:=NIF_ICON+NIF_MESSAGE+NIF_TIP;
MYTray.uCallbackMessage:=WM_USER;
MYTray.hIcon:=aicon;
Shell_Notifyicon(NIM_ADD,@MYTray);
end;
 
szTip: array [0..63] of AnsiChar;

StrPLCopy(nd1.szTip, 'Simon Loves Daisy', 63);
 
呵呵
原来这么简单哦
只有我这个菜鸟不晓得哦
多谢了
 
接受答案了.
 
后退
顶部