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

显示全部楼层 · 2018-5-1 13:42:34

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

千问 · 2018-5-1 13:42:34

一、首先，BS一下楼上回答者：a8622262 ，古语云，知之为知之，不知为不知，你要是不明白就别乱讲了，浪费人时间。二、楼主的问题可能很简单，产生的原因就是你用了不该用的单词。三、问题所在：在Delphi中“new ”是保留字，多数情况下这个单词用来动态生成一个类。如果我没理解错，你是定义了一个叫new的Handle。上面应该是一个播放声音的代码片断。四、解决方法：你只要把var中的 new : THandle; 改成 Mynew : THandle; 再把上面那句改成： Mynew := Pointer(FindResource(hInstance, 'new','wav

千问 · 2018-5-1 13:42:34

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

千问 · 2018-5-1 13:42:34

procedure TForm1.Button1Click(Sender: TObject); begin if MessageDlg('你要离开系统吗？',mtconfirmation,[mbYes,mbNo],0)=mrYes then begin if MessageDlg('系统关闭中',mtInformation,[mbOK],0)

千问 · 2018-5-1 13:42:34

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