急呀!这是什么错误!编译提示:[warning]backup.pas[7]:unit 'filectrl' is specific to a platform

Question

unit BACKUP;
            
interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ExtCtrls, ComCtrls, Buttons, FileCtrl;//就这里!!!delphi 6才这样的,delphi 5 不会,现在有何呱呱叫,怎办啊!!!! 

Answer 1

FileCtrl这个单元哪来的？里面是什么？我从来没见过！

Answer 2

里面用到copyfile、DELETEfile(pchar(MAIN.INSpath+searchrec.name))就会有filectrl单元的。急呀！用户呱呱叫呀，我的妈！！！！

Answer 3

我没有加FileCtrl，copyfile、DELETEfile也可以用呀

Answer 4

DELETEfile在 SysUtils 单元里的！

Answer 5

奇怪呀！我把所有调用的过程去掉，存盘后还是出现filectrl单元！！！
代码就是这样：
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ExtCtrls, ComCtrls, Buttons, FileCtrl;//, FileCtrl;type
  TBK_FOR = class(TForm)
    BK_Pan1: TPanel;
    BK_Bit1: TBitBtn;
    BK_Bit2: TBitBtn;
    BK_Edi1: TEdit;
    LAB1: TLabel;
    BK_Dri1: TDriveComboBox;
    BK_Dir1: TDirectoryListBox;
    BK_Fil1: TFileListBox;
    Label1: TLabel;
    PB: TProgressBar;
    BitBtn1: TBitBtn;
    procedure BK_Dir1Click(Sender: TObject);
    procedure BK_Bit1Click(Sender: TObject);
    procedure BK_Edi1Change(Sender: TObject);
    procedure FormActivate(Sender: TObject);
    procedure BK_Dir1Change(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    { Private declarations }
  public
     P,K:INTEGER;
    { Public declarations }
  end;

Answer 6

你安装过第三方的元件吧！去掉第三方元件的那个包，或者干脆删掉那个单元文件，重新启动Delphi,出错以后修改

Answer 7

这个delphi6实在让我哭!哭!哭！我要告borland!!!!!!!!!!!!!!!!!!!!

Answer 8

删掉那个单元文件，重新启动Delphi,出错以后修改 

Answer 9

可惜我的delphi5是D版，要不真要告它boland!!!哈哈哈！

Answer 10

您删除单元filectrl后，肯定要存盘吧？一存盘就自动加上了。

Answer 11

删掉那个实际的单元文件，不是在Uses中！！！！！~！

Answer 12

对了！重大发现：在win98第二版编译后在第二版运行没事，但在win98第一版就出事了。
但我是用BDE+paradox数据库呀。

Answer 13

我的delphi6安装5次了，我死定了。

Answer 14

蜗牛哥，小妹不哭了。嘻嘻！但filectrl是系统带的，不是我写的。

Answer 15

我找到了：
unit FileCtrl platform;
关于platform：Delphi的说明
he names of variables, constants, types, fields, properties, procedures, functions, programs, units, libraries, and packages are called identifiers. (Numeric constants like 26057 are not identifiers.) Identifiers must be declared before you can use them; the only exceptions are a few predefined types, routines, and constants that the compiler understands automatically, the variable Result when it occurs inside a function block, and the variable Self when it occurs inside a method implementation.A declaration defines an identifier and, where appropriate, allocates memory for it. For example,var Size: Extended;declares a variable called Size that holds an Extended (real) value, whilefunction DoThis(X, Y: string): Integer;declares a function called DoThis that takes two strings as arguments and returns an integer. Each declaration ends with a semicolon. When you declare several variables, constants, types, or labels at the same time, you need only write the appropriate reserved word once:var  Size: Extended;
  Quantity: Integer;
  Description: string;The syntax and placement of a declaration depend on the kind of identifier you are defining. In general, declarations can occur only at the beginning of a block or at the beginning of the interface or implementation section of a unit (after the uses clause). Specific conventions for declaring variables, constants, types, functions, and so forth are explained in the documentation for those topics.
The 揾int?directives platform, deprecated, and library may be appended to any declaration. In the case of a procedure or function declaration, the hint directive should be separated from the rest of the declaration with a semicolon. Examples:procedure SomeOldRoutine; stdcall; deprecated;
var VersionNumber: Real library;
type AppError = class(Exception) ...
end platform;When source code is compiled in the {$HINTS ON} {$WARNINGS ON} state, each reference to an identifier declared with one of these directives generates an appropriate hint or warning. Use platform to  items that are specific to a particular operating environment (such as Windows or Linux), deprecated to indicate that an item is obsolete or supported only for backward compatibility, and library to flag dependencies on a particular library or component framework (such as VCL or CLX).

Answer 16

 FileCtrl,我加在了我的程序里，没有任何问题！

Answer 17

这个提示是说你的filectrl文件包含和平台（windows or linux）相关的代码，这样
你就不能在另一个平台下编译

Answer 18

我我一直在win98下编的，也没定义其它什么平台

Answer 19

把重要的资料备分一下，重新安装WINDOWS在装D5

Answer 20

在Borland没有发表Delphi6的补钉，或没有大量的应用转向Delphi6之前，如果你没有这个实力，请用回Delphi5吧。-------对于新的产品或技术，总需要您练习一段时间后，才能在你的项目中采用。（对于任何新东西，这句话都会对你有帮助的。)

Answer 21

不要急，听我说
那个Warning, ‘unit 'filectrl' is specific to a ......'
和主窗口退出时的提示没有任何关系。
因为Warning只是告诉你，因为你的程序中(或者用到的控件)调用了的filectrl单元，而该单元只在Windows平台下被支持，当你跨平台时就有问题而已。 所以这个警告可以不必理会。至于access violation at address 0049601e , 这种错误多半是因为你访问了一个已经被释放了的对象而造成的。还是好好检查一下程序中的所有Form的FormClose,FormDestroy事件的代码吧。不要急，总会解决的。

Answer 22

解决了！写一个windows容错好了。