是它上一条语句的问题,看一看,是不是忘了";"或是"end"
解决方案 »
- 想向一个窗体模拟CTRL+F按键效果,FindWindow以后怎么写?
- 有关indy的TCP服务器与java开发的客户端通讯的问题.
- 如何隐藏控制台程序的DOS窗口?
- 短信接口
- 请问关于mysql的问题,我用dbexpress成功的连接到了mysql,但是....我无法通过TSQLTable得到当前数据库的表名?
- DBGrid显示的一个问题,难道是一个Delphi的Bug
- 为什么我注册COM+组件时提示拒绝访问??
- 用ADOQUERY.SQL能否改变'TEXT'类型字段大小,且保留原有数据?
- 提示Class tbutton not found ??为什么呢?
- delphi7 dbgrideh显示主从表,增记录时,主表显示,从表不显示问题。
- 从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里定义这个过程的语句是否正确并和下面参数等一致