end;

class procedure TA.A;

begin

Showmessage(Self.Name); //正確

end;

procedure TA.B;

begin

Showmessage(Self.Name); 所以不是編譯都會過 如果你不想建實體 (instance)
嚴謹一點應該要用Class Method

全部都定義成 Object Methods ,是比較從簡的做法


===================引 用 P.D. 文 章===================
我不做原理的說明, 只做實作的說明
unit 是一支pas, pas之間互相引用, b uses a, 其實編譯時 b已經把 a 包進來了, 所以沒有建立的問題,
就好像 你直接開一支 form1.pas, 看看檔頭 uses 的那些, form, widows, graphics, ..
那一支你有create過, 還不是照樣編釋通過, 還可以運作!
這只是很單純兩支 pas 引用問題, 在 a.pas中, 如果有呼叫到一些物件而沒有進行 create,
那 b 去引用 a, 一樣會發生錯誤 (Access Error xxxxx)
===================引 用 stacker_liew 文 章===================
小弟做一個單元，內含一個class，class裡有兩個方法：


[code delphi]
unit A;

type
TA = class(TObject)
public
procedure A;
procedure B;
end;

var
A: TA;
implementation

procedure TA.A;
begin
...
end;

procedure TA.B;
begin
...
end;
[/code]

然後我在別的單元裡加入單元A，但奇怪的是，我竟然可以不必建立A，就可以直接使用裡面的兩個方法，編譯器也不會報錯。
有沒有大大可以解釋一下是什麼原因嗎？這應該是觀念上的問題吧。