delphi 编译出现的问题

[gongzhaohan]

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils,
Unit1 in 'Unit1.pas',
Unit2 in 'Unit2.pas',
Unit3 in 'Unit3.pas',
Unit4 in 'Unit4.pas',
Unit5 in 'Unit5.pas',
Unit6 in 'Unit6.pas';

var t_send : TSend;
var t_rcv : TRecv;
var t_msg :=CMessage.Create(136,111,'hello world');
begin
{ TODO -oUser -cConsole Main : Insert code here }
t_send.msgConnectedTo(t_rcv);
t_send.sendMessage(t_msg);
end.




编译后var t_msg :=CMessage.Create(136,111,'hello world');
这行有问题：error为[Error] Project2.dpr(16): ',' or ':' expected but ':=' found
[Error] Project2.dpr(16): ',' or ':' expected but '(' found
这是什么问题啊？
其中CMessage是一个类 就是初始化一个对象。

谢谢

[chenzhuo]

uses
  SysUtils,
  Unit1 in 'Unit1.pas',
  Unit2 in 'Unit2.pas',
  Unit3 in 'Unit3.pas',
  Unit4 in 'Unit4.pas',
  Unit5 in 'Unit5.pas',
  Unit6 in 'Unit6.pas';

var t_send : TSend;
 t_rcv : TRecv;
 t_msg : CMessage;

begin
  Ct_msg := CMessage.Create(136,111,'hello world');

  { TODO -oUser -cConsole Main : Insert code here }
  t_send.msgConnectedTo(t_rcv);
  t_send.sendMessage(t_msg);
end.

[bdmh]

var t_msg :=CMessage.Create(136,111,'hello world');
这种定义不允许，创建要放到代码中

[sforiz]

[Quote=引用 2 楼 bdmh 的回复:]

var t_msg :=CMessage.Create(136,111,'hello world');
这种定义不允许，创建要放到代码中
[/Quote]

正解

[lw19860412]

这个问题