fsetdficon:=false; //有了自定义的图标,则默认图标自动设为false
if ficon.empty then
fsetdficon:=true;
if (ismin)and(factive) then
settray(nim_modify );
end;
//设置是否为默认图标,与ficon为互相的变量,只能有其中一个
procedure tmytray.setdficon(value:boolean);
begin
if fsetdficon<>value then
begin
fsetdficon:=value;
if not fsetdficon then
begin
if ficon.empty then begin
fsetdficon:=true;
exit;
end;
end
else begin
if (ismin)and(factive) then
settray(nim_modify);