为什么MoveFile缺少运算符?

时间:2019-06-21 00:01:51

标签: delphi

我尝试了多种方法来复制/克隆文件并将其粘贴到另一个目录中,这是一种唯一的错误,只有一个错误

procedure TDelForm.moveFileClick(Sender: TObject);
begin
  if OpenDialog1.Execute then
  begin
    edit1.Text:=OpenDialog1.FileName;
    SaveDialog1.FileName:=OpenDialog1.FileName;
  end;

  if SaveDialog1.Execute then
    edit2.Text:=SaveDialog1.FileName;

  MoveFile(pchar(edit1.Text), pchar(edit2.Text));                         
end;

Unit1.pas(46):E2066缺少运算符或分号

Unit1.pas(46):预期为E2014语句,但找到了“ TButton”类型的表达式

1 个答案:

答案 0 :(得分:8)

基于事件处理程序(moveFileClick)的名称和IDE命名事物的方式,您的窗体上有一个名为moveFile的按钮,该按钮与函数名称冲突。编译器认为MoveFile引用了该按钮,并且正在寻找一个点,其后是属性或方法。重命名按钮,或通过将其引用为MoveFile来明确解决对SysUtils.MoveFile()的调用。

SysUtils.MoveFile(PChar(edit1.Text), PChar(edit2.Text));