如何在自定义函数的单元文件中添加USES后就错了？

Question

unit unit2;
interface
  function a(abc,abc2:integer):integer;uses windows;   //为什么这个加上去后就错了呢？如果我想用到别的DELPHI提供的函数该怎么办呢？要怎么解决？implementation
  function a(abc,abc2:integer):integer;
    begin
...
    end;
end.

Answer 1

位置放错，应放在delphi的type下

Answer 2

我把TYPE放在了INTERFACE下，USES放在TYPE下，可是还是报错？能不能告诉我具体怎么放？

Answer 3

unit unit2;
interface
uses 
  windows;   //为什么这个加上去后就错了呢？如果我想用到别的DELPHI提供的函数该怎么办呢？要怎么解决？
Type
....
Var
  Form2 : TForm2;//
  function a(abc,abc2:integer):integer;//和你的目的是一样的，都是全局的
implementation
  function a(abc,abc2:integer):integer;
    begin
...
    end;
end.

Answer 4

UNIT2我只想把它做成一个专放函数的模块，不想要有窗口。

Answer 5

我按 ihihonline(小小->不要再流浪！！) 的做了，在VAR这一行有错。

Answer 6

不用Var，type，如果你不用窗体

Answer 7

那我想用到DELPHI提供的函数，该怎么办？能不能在我上面的程序中帮我改改？

Answer 8

unit unit2;
interface
  uses windows;
  function a(abc,abc2:integer):integer;implementation
  function a(abc,abc2:integer):integer;
    begin
...
    end;
end.
或者（如果 unit2 的接口部分没用到 windows 单元中的定义）unit unit2;
interface
  function a(abc,abc2:integer):integer;implementation
  uses windows;
  function a(abc,abc2:integer):integer;
    begin
...
    end;
end.
================================================================
人生最大的幸福莫过于顿顿有玉米吃
（CSDN 论坛助手，挺好使！俺们拨号上网的有福了）