Question

DELPHI 错误提示 '(' expected but ':=' found

new := Pointer(FindResource(hInstance, 'new','wave'));
这句在一个PAS文件复制到另一个PAS文件，在原文件正常,不出错。但是一复制到另一个PAS文件就提示 '(' expected but ':=' found

Why?

Answer 1

一、首先，BS一下楼上回答者：a8622262 ，古语云，知之为知之，不知为不知，你要是不明白就别乱讲了，浪费人时间。

二、楼主的问题可能很简单，产生的原因就是你用了不该用的单词。

三、问题所在：
在Delphi中“new ”是保留字，多数情况下这个单词用来动态生成一个类。
如果我没理解错，你是定义了一个叫new的Handle。
上面应该是一个播放声音的代码片断。

四、解决方法：
你只要把var中的
new : THandle;
改成
Mynew : THandle;

再把上面那句改成：
Mynew := Pointer(FindResource(hInstance, 'new','wave'));

就应该Pass了。

五、最后，呵呵，这种错还真是犯得很低级的哦……多练练，多看看书哦，祝你进步。

Answer 2

不是这行的错，你往前看看，说的很清楚，本来需要一个（，可是使用了：。问题在前面，只是到了这里才报错的。

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
begin
if MessageDlg('你要离开系统吗？',mtconfirmation,[mbYes,mbNo],0)=mrYes then
begin
if MessageDlg('系统关闭中',mtInformation,[mbOK],0)=mrOK then
Close;
end;
end;
掉了一个if和end;
还有已经给了提示了':=' expected but '=' found
期望是:=,但是找到的是=

Answer 4

不太清楚，最好问问懂行的