Mumar杰 发表于 2014-7-28 15:40:06

为什么错误,求解释

procedure TForm1.Button1Click(Sender: TObject);
var
x:string;

begin
x:=Edit1.Text;
Myproc(x);
end;

end.

procedure TForm1.Myproc(Str:String);
begin
ShowMessage(Str);
end;
end.

小甲鱼 发表于 2014-7-28 16:01:09

中间多了一个 end. 是吗?

Mumar杰 发表于 2014-7-29 18:01:49

好吧,多少年前的视频了,现在都难找到视频链接了,要么就是不齐的。。。

h1006272147 发表于 2014-7-30 09:01:53

Mumar杰 发表于 2014-7-29 18:01
好吧,多少年前的视频了,现在都难找到视频链接了,要么就是不齐的。。。

你说哪里的视频是不齐的

Mumar杰 发表于 2014-7-31 15:10:16

h1006272147 发表于 2014-7-30 09:01
你说哪里的视频是不齐的

delphi

h1006272147 发表于 2014-7-31 16:24:06

小甲鱼的视频不齐吗?我是最近下载的,全都可以下载呀
页: [1]
查看完整版本: 为什么错误,求解释