例如:
对于下面这样一个单元
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls,uEvPrint, Db, DAODataset, DAOTable, DAODatabase;
type
TForm1 = class(TForm)
Button1: TButton; //可以调用
Button2: TButton; //可以调用
RadioGroup1: TRadioGroup; //可以调用
private
EvPrint:TEvPrint; //不可以调用
{ Private declarations }
public
sTmp:String; //可以调用
{ Public declarations }
end;
var
Form1: TForm1; //可以调用
var s:string; //可以调用
const
K='OK'; //可以调用
implementation
var j:integer; //可以调用
如果unit2 uses unit1
调用unit1的东东时
除了s,k可以直接调用,即s:='kk';
其它的调用要Form1.sTmp这样调用