100分,在线等待,请帮帮忙,代码不通过 是它上一条语句的问题,看一看,是不是忘了";"或是"end" 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 多半可能是你的上一段代码中的end缺少,你仔细检查一下,或者你先用{}把上一段代码注释掉你在看看 上面的声明语句没有结束.编译器期望声明但是碰到了Procedrue关键字.仔细看看错误提示,就不会不知所错了. 把 form2.release; end;begin中的begin去掉—————————————————————————————————MaximStr := '宠辱不惊,看庭前花开花落,去留无意; 毁誉由人,望天上云卷云舒,聚散任风。';if Not Assigned(I) then I := TI.Create(Nil);I.Maxim := MaximStr;I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';I.Desire := '加不加分随你';————————————————————————————————— 1、检查是不是少一个end;2、查看Tform1里定义这个过程的语句是否正确并和下面参数等一致 delphi7 安装 EmbeddedWB_D2005出错 Delphi 控件的拖动 简单的文本内容分类 招聘(深圳) [Delphi+Word]和大家共享(如何使用) ADO存取BLOB字段的问题~~~~~~~~~~~~~~~~~~~~~~ 求SQL 窗体释放的问题,急人啊.............呜呜呜呜呜呜!!!! 谁知道什么是B/S,我只知道C/S! 用Real Player的控件播放ram,Mp3文件,怎样才能知道它的时间长度? 从ShellListView如何将局域网中指定的文件名复制到本地文件家中? 进来看看
end缺少,你仔细检查一下,或者你先用{}把上一段代码注释掉你在看看
编译器期望声明但是碰到了Procedrue关键字.仔细看看错误提示,就不会不知所错了.
end;
begin中的begin去掉—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————
2、查看Tform1里定义这个过程的语句是否正确并和下面参数等一致