我按照这个例程进行编写，网址为：http://blog.163.com/maentao_1014/blog/static/326310320088423637101/，结果总是不能编译，对于的代码为：
cbSize:=SizeOf(TNotifyIconData);
错误信息如下：
[DCC Error] Unit1.pas(41): E2034 Too many actual parameters
[DCC Error] Unit1.pas(41): E2029 '(' expected but ')' found
[DCC Error] Unit1.pas(42): E2029 ')' expected but identifier 'Wnd' found
[DCC Fatal Error] Project1.dpr(5): F2063 Could not compile used unit 'Unit1.pas'
用的版本是XE2，请大神指点！

要不你装个翻译软件？

感觉像符号输入的时候输的不对，

话说现在都自带有TTrayIcon控件了，还用得着去写那么一堆代码？

我估计是你的分号有问题，
不是英语输入方式下的“;”

我到时编过托盘程序，我去找找，找到了再贴出来。

首先定义一个用户自定义的消息const WM_NID=WM_USER+1000;
然后添加
public
{ Public declarations }
icondata:TNotifyIconData;
然后就是你自己在某个过程或者函数中写实现托盘的代码了
with icondata do
begin
cbSize:=SizeOf(TNotifyIconData);
Wnd:=Handle; //指向当前窗体Form1的句柄
uID:=1;
uFlags:=NIF_ICON or NIF_MESSAGE or NIF_TIP;
uCallBackMessage:=WM_NID;
hIcon:=Application.Icon.Handle;
szTip:='OOPTest';
end;
//以应用程序的标题做为图标的提示
strpcopy(icondata.sztip,application.title);
//向托盘中添加图标
shell_notifyicon(NIM_ADD,@icondata);
//...
代码大体上是没有什么问题的，可能的原因你是否是直接在网页的页面把人家的代码直接复制过去的，然后就是begin后面到cbSize之间的空格删除一边。还是有问题的话就慢慢找，别急！

代码如下，比较简单就是向托盘添加了一个Delphi7的图标
unit UnitNotidy;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,shellapi;
//要添加Shellapi引用
const WM_NID=WM_USER+1000;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
icondata:TNotifyIconData;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
with icondata do
begin
cbSize:=SizeOf(TNotifyIconData);
Wnd:=Handle; //指向当前窗体Form1的句柄
uID:=1;
uFlags:=NIF_ICON or NIF_MESSAGE or NIF_TIP;
uCallBackMessage:=WM_NID;
hIcon:=Application.Icon.Handle;
szTip:='OOPTest';
end;
//以应用程序的标题做为图标的提示
strpcopy(icondata.sztip,application.title);
//向托盘中添加图标
shell_notifyicon(NIM_ADD,@icondata);
//...
end;
end.
//代码运行图

把with do 去掉 写完整代码就OK了。。xe5 编译通过

错误提示1.过多的参数
2.括号不匹配
3.是也是括号问题

这个是XE升级的问题。
取得size, 得换成下面的写法。
cbSize:=TNotifyIconDataA.SizeOf;
别的不用动。