[Fatal Error] Functions.pas(24): File not found: 'Unit1.dcu'

[husion01]

重装相同的delplhi7后,出现上面的错误,没重装之前都没问题,请问是什么原因?

[starluck]

項目裏沒有這個直接刪掉

[husion01]

项目里本来就没有这个Unit1.dcu'

部分代码如下:
unit MFG2000_unit;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, SPComm, ComCtrls;

type
TForm1 = class(TForm)
GroupBox1: TGroupBox;
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
Button5: TButton;
Button6: TButton;
Button7: TButton;
Button8: TButton;
GroupBox2: TGroupBox;
Button9: TButton;
Button10: TButton;
Button11: TButton;
Button12: TButton;
Button13: TButton;
Button14: TButton;
Button15: TButton;
Button16: TButton;
Button17: TButton;
Button18: TButton;
Button19: TButton;
Button20: TButton;
Button21: TButton;
Button22: TButton;
Button23: TButton;
Button24: TButton;
Button25: TButton;
Button26: TButton;
Button27: TButton;
Button28: TButton;
Button29: TButton;
Button30: TButton;
Button31: TButton;
Button32: TButton;
Button33: TButton;
Button34: TButton;
Button35: TButton;
Button36: TButton;
Button37: TButton;
Button38: TButton;
Button39: TButton;
Button40: TButton;
Button41: TButton;
Button42: TButton;
Button43: TButton;
Button44: TButton;
Button45: TButton;
Button46: TButton;
Button47: TButton;
Button48: TButton;
Button49: TButton;
Button50: TButton;
Button51: TButton;
Button52: TButton;
Button53: TButton;
Button54: TButton;
Button55: TButton;
Button56: TButton;
Button57: TButton;
Button58: TButton;
Button59: TButton;
Button60: TButton;
Button61: TButton;
Button62: TButton;
Button63: TButton;
Button64: TButton;
Button65: TButton;
GroupBox3: TGroupBox;
Button66: TButton;
Button67: TButton;
Button68: TButton;
Button69: TButton;
Button70: TButton;
Button71: TButton;
Button72: TButton;
Button73: TButton;
Button74: TButton;
Button75: TButton;
Button76: TButton;
Button77: TButton;
GroupBox4: TGroupBox;
Button78: TButton;
Button79: TButton;
Button80: TButton;
Button81: TButton;
Button82: TButton;
Button83: TButton;
Button84: TButton;
Button85: TButton;
Button86: TButton;
Button87: TButton;
Button88: TButton;
Button89: TButton;
Button90: TButton;
Button91: TButton;
Button92: TButton;
Button93: TButton;
GroupBox5: TGroupBox;
Button94: TButton;
Button95: TButton;
Label1: TLabel;
Edit1: TEdit;
Button96: TButton;
Button97: TButton;
Button98: TButton;
Button99: TButton;
Button100: TButton;
Comm1: TComm;
Label2: TLabel;
Edit3: TEdit;
Memo1: TMemo;
GroupBox6: TGroupBox;
RadioButton1: TRadioButton;
RadioButton2: TRadioButton;
Button101: TButton;
Edit2: TEdit;
pnpproce: TButton;
StatusBar1: TStatusBar;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button5Click(Sender: TObject);
procedure Button6Click(Sender: TObject);
procedure Button7Click(Sender: TObject);
procedure Button8Click(Sender: TObject);
procedure Button9Click(Sender: TObject);
procedure Button10Click(Sender: TObject);
procedure Button11Click(Sender: TObject);
procedure Button13Click(Sender: TObject);
procedure Button14Click(Sender: TObject);
procedure Button15Click(Sender: TObject);
procedure Button16Click(Sender: TObject);
procedure Button17Click(Sender: TObject);
procedure Button18Click(Sender: TObject);
procedure Button19Click(Sender: TObject);
procedure Button20Click(Sender: TObject);
procedure Button21Click(Sender: TObject);
procedure Button22Click(Sender: TObject);
procedure Button23Click(Sender: TObject);
procedure Button24Click(Sender: TObject);
procedure Button25Click(Sender: TObject);
procedure Button26Click(Sender: TObject);
procedure Button27Click(Sender: TObject);
procedure Button28Click(Sender: TObject);
procedure Button29Click(Sender: TObject);
procedure Button30Click(Sender: TObject);
procedure Button31Click(Sender: TObject);
procedure Button32Click(Sender: TObject);
procedure Button33Click(Sender: TObject);
procedure Button34Click(Sender: TObject);
procedure Button35Click(Sender: TObject);
procedure Button36Click(Sender: TObject);
procedure Button37Click(Sender: TObject);
procedure Button38Click(Sender: TObject);
procedure Button39Click(Sender: TObject);
procedure Button40Click(Sender: TObject);
procedure Button41Click(Sender: TObject);
procedure Button42Click(Sender: TObject);
procedure Button43Click(Sender: TObject);
procedure Button44Click(Sender: TObject);
procedure Button45Click(Sender: TObject);
procedure Button46Click(Sender: TObject);
procedure Button47Click(Sender: TObject);
procedure Button48Click(Sender: TObject);
procedure Button49Click(Sender: TObject);
procedure Button50Click(Sender: TObject);
procedure Button51Click(Sender: TObject);
procedure Button52Click(Sender: TObject);
procedure Button53Click(Sender: TObject);
procedure Button54Click(Sender: TObject);
procedure Button55Click(Sender: TObject);
procedure Button56Click(Sender: TObject);
procedure Button57Click(Sender: TObject);
procedure Button58Click(Sender: TObject);
procedure Button59Click(Sender: TObject);
procedure Button60Click(Sender: TObject);
procedure Button61Click(Sender: TObject);
procedure Button62Click(Sender: TObject);
procedure Button63Click(Sender: TObject);
procedure Button64Click(Sender: TObject);
procedure Button65Click(Sender: TObject);
procedure Button97Click(Sender: TObject);
procedure Button98Click(Sender: TObject);
procedure Button66Click(Sender: TObject);
procedure Button67Click(Sender: TObject);
procedure Button68Click(Sender: TObject);
procedure Button69Click(Sender: TObject);
procedure Button70Click(Sender: TObject);
procedure Button71Click(Sender: TObject);
procedure Button72Click(Sender: TObject);
procedure Button73Click(Sender: TObject);
procedure Button74Click(Sender: TObject);
procedure Button75Click(Sender: TObject);
procedure Button76Click(Sender: TObject);
procedure Button77Click(Sender: TObject);
procedure Button94Click(Sender: TObject);
procedure Button95Click(Sender: TObject);
procedure Button78Click(Sender: TObject);
procedure Button79Click(Sender: TObject);
procedure Button80Click(Sender: TObject);
procedure Button81Click(Sender: TObject);
procedure Button99Click(Sender: TObject);
procedure Button82Click(Sender: TObject);
procedure Button83Click(Sender: TObject);
procedure Button84Click(Sender: TObject);
procedure Button85Click(Sender: TObject);
procedure Button86Click(Sender: TObject);
procedure Button87Click(Sender: TObject);
procedure Button88Click(Sender: TObject);
procedure Button89Click(Sender: TObject);
procedure Button90Click(Sender: TObject);
procedure Button91Click(Sender: TObject);
procedure Button92Click(Sender: TObject);
procedure Button93Click(Sender: TObject);
procedure Button100Click(Sender: TObject);
procedure Button96Click(Sender: TObject);
procedure Comm1ReceiveData(Sender: TObject; Buffer: Pointer;
BufferLength: Word);
procedure FormShow(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure Button101Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure pnpproceKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);

private
{ Private declarations }
public
{ Public declarations }
end;

[hongqi162]

Functions.pas(24): File not found: 'Unit1.dcu'

Functions这个pas里面使用到了unit1，但是你的项目里面没有找到这个文件

[nebula845026]

你装的过程中出问题了 卸载干净后重装一次 看看

[husion01]

to hongqi162 :
以下是一段代码:
unit Functions;
...
uses MFG2000_unit,Init,Dialogs,SysUtils,CH375dll,Forms;

我的uses里面没有用到Unit1单元.

[kim53622744]

procedure Button100Click(Sender: TObject);
部分代码用到100个按钮了啊，真牛

[hongqi162]

这个你需要逐层来排查滴

[husion01]

程序在uses MFG2000_unit,Init,Dialogs,SysUtils,CH375dll,Forms;就停了,只出现Fatal Error] Functions.pas(24): File not found: 'Unit1.dcu'

[SuperTitan001]

用search-> find in files查找unit1试试

[husion01]

TO SuperTitan001 :
试过了,找不到unit1,因为我已经把unit1改为MFG2000_unit了..

[弘石]

你要是把你自己的所有单元和工程文件都看一遍，你一定能找到对Unit1.pas的引用

[husion01]

to youthon:

我已经用search-> find in files查找unit1.pas找不到..

[阿三]

[Quote=引用 10 楼 husion01 的回复:]
TO  SuperTitan001 :
试过了,找不到unit1,因为我已经把unit1改为MFG2000_unit了..
[/Quote]
你咋改的呀

[husion01]

to zxf_feng:
就是把保存的Unit1改为MFG2000_unit.

[弘石]

有些文件没有被加入到工程中，只是被引用，使用“search all file in project”就不会搜索这个文件
如果使用第三个“search in directories”并设置目录就可以搜索到

[husion01]

[Quote=引用 15 楼 youthon 的回复:]
有些文件没有被加入到工程中，只是被引用，使用“search all file in project”就不会搜索这个文件
如果使用第三个“search in directories”并设置目录就可以搜索到
[/Quote]

非常感谢,问题解决,两次感谢各位:)